Question

Delphi 声明在本单元中使用的变量到底怎么声的

Delphi 声明在本单元中使用的变量到底怎么声的 这样有错吗？

var
Form1: TForm1;

implementation

{$R *.dfm}
var
handle:THandle;
procedure TForm1.FormCreate(Sender: TObject);
begin
handle:=FindWindow(nil,Pchar('Torchlight'));
if handle =0 then
Start.Caption:='a
else
Start.Caption:='b';

//GetWindowThreadProcessID(handle,@PID);
//procid=OpenProcess(PROCESS_ALL_ACCESS,False,PID);
end;
end.
handle 变量总是找不到 如果把它放在begin
上面就不会出错
错误提示：
[Error] Wggame.pas(66): Cannot assign to a read-only property
放在implementation上面也一样

Answer 1

Cannot assign to a read-only property
翻译过来意思是：不能给一个只读的属性赋值
原因：
procedure TForm1.FormCreate(Sender: TObject);是TForm1的成员方法
TForm1从类TWinControl继承过来，而TWinControl中包含了属性Handle，而且是只读属性。
所以你直接在方法中写Handle是，编译器以为你指的是属性Handle。由此可看出，编译器编译时查找符号的优先级是：局部变量(方法)>成员变量(属性、方法)>全局变量(方法)

Answer 2

var
Form1: TForm1;
handle:THandle;

implementation

追问

你这样我试了 也不行

Answer 3

全局变量放public中(private)中，局部变量放过程的begin之前。

Answer 4

var handle:thandle 放在procedure TForm1.FormCreate(Sender: TObject); 下面的好吧？