Aşağıdaki Şekilde Çağrılan Message Dialog Nesnesi Form Üzerindeki Nesneleri Block Etmiyor ve TAB Tuşu ile üzerlerinde Gezine biliniyor Hatta Değişiklik bile yapılabiliyor
Bunu Engellemenin Bir Yöntemi Varmıdır. Yani MessageDLG Nesnesi ShowModal Açılabilirmi?
MessageDlg('Formu Kapatmak Üzeresiniz...', mtWarning, mbYesNo, CallBack);
procedure TUniForm1.CallBack(Sender: TComponent; Res: Integer); begin case Res of mrYes : Begin Close();
Exit; End; mrNo : Begin UniEdit1.SetFocus; Exit; End; end; end;