implementation
{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
var
handle:thandle;
begin
handle:=loadlibrary(.....)
_______________________________问为什么loadlibrary(api)函数的handle变量只能定义在formcreate事件中,而不能定义在implementation下面呢?
如果要定义为当前单元公共变量,那应该怎么做?
{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
var
handle:thandle;
begin
handle:=loadlibrary(.....)
_______________________________问为什么loadlibrary(api)函数的handle变量只能定义在formcreate事件中,而不能定义在implementation下面呢?
如果要定义为当前单元公共变量,那应该怎么做?
解决方案 »
- delphi中如何点击某个按钮,跳出一个本地txt文档、?求高手解决啊。。
- I/O error 32 错?
- Idhttp向网站POST时出现问题。
- ListView1滚动条问题
- 学过的都会
- clientdataset过滤后在客户端使用RecordCount显示只有一条,把cds.xmldata赋值到data后提交到服务器端,却显示RecordCount是没有过滤前的
- 如何将自定义类写如文件?
- 再问PDF的问题,有使用pdf.ocx经验的大虾请进,同样入即给分
- ★大喊★谁有串口通讯的构件及例子FOR DELPHI5 的★本人有80分,晚了就没分了
- buff: array[1..64*1024] of PChar; 读成string ?
- 子窗口的问题?
- delphi dbgrid中如何多选,请给指点一下,急呀,谢谢
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;
gHandel : THandle;
implementation{$R *.dfm}initialization
gHandel := LoadLibrary('aaa.dll');
finalization
FreeLibrary(gHandel);
end.