紧急求救！变量定义的位置问题！ ( 积分: 28 )

W

wishme2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-27

• #1

delphi中某个函数不属于该form,比如:
procedure MyTest();
begin
end;

现在我要定义一个全局变量，让该过程和form上的过程可以共同使用，
应该定义在哪里？
我定义在form的public中，但该过程不能用
不能改成Tform.MyTest(),因为我要开新线程，线程的函数不属于form

 

W

wishme2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-27

• #2

delphi中某个函数不属于该form,比如:
procedure MyTest();
begin
end;

现在我要定义一个全局变量，让该过程和form上的过程可以共同使用，
应该定义在哪里？
我定义在form的public中，但该过程不能用
不能改成Tform.MyTest(),因为我要开新线程，线程的函数不属于form

 

H

hotboys

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-27

• #3

你定義在
var
Form1:TForm1;
　procedure myTest();
//在這裡就可以了
implementation
{$R *.dfm}
下面就可以了

 

A

abookdog

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-27

• #4

定义到一个独立的单元文件中，
然后将该单元引用到其他单元中。
这时该单元定义的变量即为全局变量。

 

H

hibi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-27

• #5

只要单独定义在implementation的上面就行

 

W

wufongming

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-27

• #6

别的单元也可以用 :interface
本单元 implementation

 

M

missinwind

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-27

• #7

在这儿定义，调用时要引用该单元文件：
var Form1:TForm1;
　 procedure myTest();
implementation
{$R *.dfm}

 

W

wishme2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-27

• #8

我是要变量定义的位置,比如str:string定义在哪里才能让
Tform1.button1_click()和
procedure myTest()都可以用

 

W

wishme2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-22

• #9

接受答案了.