Gönderilme Tarihi: 10 Ara 2017 #1 MiRaT MiRaT 13 Kas 2017 2,077 Mesaj Aktiflik Seviye Deneyim TIM / GÖREV: Kod: procedure TForm1.Edit1Exit(Sender: TObject); begin showmessage('Asla yazı kutusundan çıkamassın'); postmessage(handle,WM_NEXTDLGCTL,0,0); postmessage(handle,WM_NEXTDLGCTL,1,0); end;
Kod: procedure TForm1.Edit1Exit(Sender: TObject); begin showmessage('Asla yazı kutusundan çıkamassın'); postmessage(handle,WM_NEXTDLGCTL,0,0); postmessage(handle,WM_NEXTDLGCTL,1,0); end;
