I have a problem
Look at this code
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift:
TShiftState );
begin
Key:=0;
end;
In this code, Edit1.Text still empty string but If I change the code like this
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift:
TShiftState);
begin
Key:=0;
ShowMessage('a');
end;
then the Edit1.Text become fill by char that I stroke.
Is this a bug ?
=============INTOSOFT============
ALEXIO CHAOS
[email protected]
Yahoo Messager
=================================
_______________________________________________
Lazarus mailing list
[email protected]
http://www.lazarus.freepascal.org/mailman/listinfo/lazarus
