[ XGhost @ 31.07.2006. 20:47 ] @
Kako da sprijecim da u npr Edit1 onemogucim unos znakova / i " (koji mi smetaju u sql) a da ostale a da ostale znakove mogu normalno unositi.
[ dogriz @ 31.07.2006. 21:00 ] @
Code:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key in [#34, #47] then  //#34 = "   #47 = /
    Key:=#0;
end;