المشاركات : 111
المواضيع 30
:
: 11
الإنتساب : Apr 2014
(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;
شكرا لك أخي الكريم هاذا ماكنت أبحث عنه
المشاركات : 78
المواضيع 37
:
: 14
الإنتساب : Aug 2015