W
wxws
Unregistered / Unconfirmed
GUEST, unregistred user!
如果不在编辑状态下拦截能够成功,但是在编辑状态却拦截不了,
FORM的KEYPREView已经设置为TRUE了
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
memo1.Lines.Add(inttostr(ord(key)));
end;
不知道各位有没有碰上过,
FORM的KEYPREView已经设置为TRUE了
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
memo1.Lines.Add(inttostr(ord(key)));
end;
不知道各位有没有碰上过,