关于变量(50分)

L

lanmate

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-12

• #1

如何在DELPHI程序中定义一个在所有FORM中都可以使用的公共变量。

 

B

bluerain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-12

• #2

建一个公用单元里定义,然后在每个form中use 这个单元

 

D

dhl2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-12

• #3

打开工程，　
点菜单project->view source

program Project1;
uses
; Forms,
; Unit1 in 'Unit1.pas' {Form1},
; dm in '../../../his/dm.pas' {adodm: TDataModule};

{$R *.res}
; ;var myvar:integer;//看这句
begin
; Application.Initialize;
; Application.CreateForm(TForm1, Form1);
; Application.CreateForm(Tadodm, adodm);
; Application.Run;
end.

但是最好是在某单元的public定义，
全局变量在面向对象编程中，不是推荐用法

 

L

lanmate

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #4

to dhl2001
请问定义后如何在FORM中调用。

 

Z

zyy04

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #5

直接用变量名应用就行了

 

白

白海森

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #6

(form中use 这个单元.)
不用调用，直接使用即可。
myvar := 123;

 

L

lanmate

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #7

编译无法通过

 

B

bluerain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #8

本来在工程文件里加公用变量就不好,还是新建一个Unit,然后在别的地方如果要
用到这个PubParam变量,就uses Unit2就行了.

unit Unit2;
interface
var
; PubParam : string;

implementation
end.

 

L

lanmate

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-14

• #9

多人接受答案了。