w pole edit1 wpisuje znaki,
musze zablokowac wpisanie srednika ";" (key=#59)
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
If key=#59 then
begin
Application.MessageBox('Nie wolno wprowadzac znaku: ; ', 'Blad przy wprowadzaniu danych',
mb_OK+Mb_defButton1+MB_IconExclamation);
edit1.Text:='';
end;
end;
po wykonaniu tego, program czysci edit1 i dopisuje srednik, ktory
nie moze byc tam wpisany. Jak temu zapobiec?