大神来帮我一下。 - delphi吧 - RAT

大神来帮我一下。

level 4

平常心qq10 楼主

变量出错。

2015年01月25日 00点01分 1

level 4

平常心qq10 楼主

procedure TForm1.FormCreate(Sender: TObject);
var
t:thandle;
nn:char;
begin
nn='计算器';
t:=findwindow(nil,nn);
showmessage(inttostr(t));
end;
end.

2015年01月25日 00点01分 2

level 4

平常心qq10 楼主

这个定义得不对吗，为什么会出错？

2015年01月25日 00点01分 3

level 4

平常心qq10 楼主

nn:char;
begin
nn='计算器';

2015年01月25日 00点01分 4

level 13

顶之座__赫卡特

定义为string

2015年01月25日 05点01分 5

1