Sizler İçin Çok kolay (Yardım)

[ekrem61]

Öncelikle merhaba Delphi severler nasılsınız.Ben Delphi kullanmaya yeni başlamaış bir kullanıcıyım.

Inputbox a verileri girdikten sonra

procedure TForm1.FormClick(Sender: TObject);
var
soyad:string;
begin
soyad:=InputBox('Bilgi girişi','Adınız','');
MessageDlg(soyad,mtWarning,[mbOK],0);
end;

Ben burada bir if döngüsü açmak istiyorum ve cancel a bastığım zaman projenin çalışmasını istemiyorum bana bu konuda yardımcı olabilirmisiniz şimdiden çok teşekkürler

[naile]

Kod: Tümünü seç

procedure TForm1.FormClick(Sender: TObject);
var
soyad:string;
begin
soyad:=InputBox('Bilgi girişi','Adınız','');
if MessageDlg(soyad,mtWarning,mbOKCancel,0) = mrOK Then
  //ok denilince çalışacak ifade. cancel denilirse çalışmaz!
end;

[ekrem61]

Naile teşekkürler

[mussimsek]

Naile teşekkürler

babacım forum kurallarını okuyup uyalım. Bir admin var burda deli diyorlar, aman tikkat

[tuanna]

admin doğru sölüyor...