dll的资源中有一个叫"MAINFORM"的对话框,dll导出一个"DialogProc"函数用于对话框的消息处理,主程序Button1Click代码
Procedure TForm1.Button1Click(Sender: TObject);
var
dllhd:Thandle;
dlgpro:pointer;//Tdlgpro;
Begin
dllhd:=LoadLibrary('dlgdll.dll');
dlgpro:=GetProcAddress(dllhd,"DialogProc");
DialogBox(dllhd, 'MAINFORM', dllhd, @DialogProc);
End;
但无法达到预期效果
为何出错??
Procedure TForm1.Button1Click(Sender: TObject);
var
dllhd:Thandle;
dlgpro:pointer;//Tdlgpro;
Begin
dllhd:=LoadLibrary('dlgdll.dll');
dlgpro:=GetProcAddress(dllhd,"DialogProc");
DialogBox(dllhd, 'MAINFORM', dllhd, @DialogProc);
End;
但无法达到预期效果
为何出错??
解决方案 »
- CONSOLE和GUI双模式
- 调用DLL时正确,但退出时提示错误
- 请教:::::我想用一个设计一个固定行(固定输入四行)的DBGrid,如何做..
- 比如取字符串a21左边两个字符a2的函数是什么?我这样生成treeview三级子结点为什么不对?
- dsgnintf.pas
- Delphi 2007(with Vista Support)来了!新用点预览
- 同时调用多个EXE文件,能不能在程序中指定特定的程序为当前激活程序
- CreateOleObject('ADODB.Connection')怎么用?
- 初学者的问题之二(50分酬谢)请朋友们说的详尽些
- 怎样建立和调用资源文件
- 显示图片的问题
- 请问:怎么控制DBGrid中的光标不到某一列中,就按Tab键,当到这一列时,跳过这一列,到下一列呢?
这里还有个MDI程序调用dll中的mdiChildForm例子:
http://www.delphibox.com/article.asp?articleid=563