Haberler:

Zamanının büyük çoğunluğunu internette geçiren ve forumumuzla yeterince ilgilenebilecek moderatörler alınacaktır.

Ana Menü

Edit İçinde Enter Tuşuyla Butona Komut Göndermek

Başlatan Safirmedya, 08 Kasım , 2011, 15:29:29

« önceki - sonraki »

0 Üyeler ve 1 Ziyaretçi konuyu incelemekte.

Yazdır
Aşağı git Sayfa1
Kullanıcı Eylemleri

Safirmedya

08 Kasım , 2011, 15:29:29 Son düzenlenme: 08 Kasım , 2011, 16:01:27 Samanalevi
Edit içine girilen veriden sonra Enter tuşu ile Butona komut vermek.
Kod Seç




procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then begin
    SelectNext(Sender as tWinControl, True, True );
    if Sender = Edit10 then
      Button1.Click; // let the button click itself
    Key := #0;
  end;
end;
Bir insanın gerçek zenginliği, onun bu dünyada yaptığı iyilikleridir.

Hz.Muhammed

Safirmedya

08 Kasım , 2011, 15:29:29 Son düzenlenme: 08 Kasım , 2011, 16:01:27 Samanalevi
Bir insanın gerçek zenginliği, onun bu dünyada yaptığı iyilikleridir.

Hz.Muhammed
Yazdır
Yukarı git Sayfa1
Kullanıcı Eylemleri