很复杂的问题

[flyingworm]

那位大侠给讲讲delphi里边关于定义变量、声明和继承类的具体方法？

[qwertyasd]

定义变量
var dd:string;
定义类
TTitle = class(tpersistent)
private
fPrint:boolean;
fText:tstrings;
fFont:tfont;
fAlignment:talignment;
ftop:integer;
fRowspace:integer;
fEveryPage:boolean;
procedure SetText(value:tstrings);
procedure SetFont(value:tfont);
published
property Print:boolean read fprint write fprint ;
property Text:tstrings read fText write settext;
property Font: TFont read fFont write SetFont;
property Top:integer read ftop write ftop;
property Alignment:talignment read fAlignment write fAlignment;
property Rowspace:integer read fRowspace write fRowspace;
property EveryPage:boolean read fEveryPage write fEveryPage;
end;

[flyingworm]

全局变量呢？

[qwertyasd]

type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
dd:string//全局变量

[flyingworm]

谢了

[crapex]

全局变量可以在文件头的private或者public里面声明，可以这么写：
private
aaa:string;
public
i:integer;
要在别的窗体里引用变量，可以使用
Form1.i:=1;类似的写法。