20-02-2017, 12:08 PM
(20-02-2017, 11:36 AM)maosalah كتب : [ -> ]الة الكود بار ترسل Enter عند نهاية الكودشكرا لك أخي الكريم هاذا ماكنت أبحث عنه
يمكنك استغلال onkeypress
كود :procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if Key = #13 then begin showmessage(edit1.text); end; end;