level 1
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; var KeyChar: Char;
Shift: TShiftState);
begin
if Key=#13 then
form1.Edit2.SetFocus;
end;
end.
[dcc64 Error] Unit1.pas(32): E2008 Incompatible types
Key=#13这句话错哪了??
2018年01月28日 11点01分
1
level 13
应该是 key=13
13是数字类型
#13是字符类型
2018年01月30日 08点01分
4