31-12-2017, 08:10 PM
(31-12-2017, 07:34 PM)ALG2009 كتب : وعليكم السلام
ضع هذا الكود في الحدث OnKeyPress
كود :procedure TForm4.Edit1KeyPress(Sender: TObject; var Key: Char); begin if key =#32 then ShowMessage('المسافه غير مقبوله'); end; end.
شكرا لك اريد فقط عدم السماح كتابتها اكثر من مرة او عدم كتابتها اكثر من مرة بين الجمل

