Z
ZBJ2001_KF
Unregistered / Unconfirmed
GUEST, unregistred user!
最近看了一些关于DLL和BPL使用的资料.给我的感觉是如果要将程序化分我个模块,并且主要使用DELPHI的话,还是应该使用BPL.
1.如果要开发一个C/S结构系统,那DLL与BPL区别有哪些呢.
2.如果在FORM2中,能不能调用FORM1的属性或方法呢.如何调用.
3.我测试了一个BPL.如果FORM1动态调用FORM2.同时,FORM2动态调用FORM3.(FORM2,FORM3已在BPL中.)那要在FORM1和FOMR2中使用
var
PackageModule: HModule;
AClass: TPersistentClass;
begin
PackageModule := LoadPackage('Package1.bpl');
IF PACKAGEMODULE>0 THEN
BEGIN
SHOWMESSAGE('NOT ZERO');
AClass := GetClass('TForm3');
END;
if aclass=nil then
begin
showmessage('aclass is nil');
exit;
end;
with TCOMPONENTClass(AClass).Create(Application) as TFORM do
begin
ShowModal;
Free;
end;
UnloadPackage(PackageModule);
end;
不知道我理解的对不对
谁有比较这方面比较全的资源和例子,不胜感谢.
1.如果要开发一个C/S结构系统,那DLL与BPL区别有哪些呢.
2.如果在FORM2中,能不能调用FORM1的属性或方法呢.如何调用.
3.我测试了一个BPL.如果FORM1动态调用FORM2.同时,FORM2动态调用FORM3.(FORM2,FORM3已在BPL中.)那要在FORM1和FOMR2中使用
var
PackageModule: HModule;
AClass: TPersistentClass;
begin
PackageModule := LoadPackage('Package1.bpl');
IF PACKAGEMODULE>0 THEN
BEGIN
SHOWMESSAGE('NOT ZERO');
AClass := GetClass('TForm3');
END;
if aclass=nil then
begin
showmessage('aclass is nil');
exit;
end;
with TCOMPONENTClass(AClass).Create(Application) as TFORM do
begin
ShowModal;
Free;
end;
UnloadPackage(PackageModule);
end;
不知道我理解的对不对
谁有比较这方面比较全的资源和例子,不胜感谢.
][
][