bi tane dialog oluştur..

global fonksiyona

string_Kontrol=false;

ekle
projenin on startup evresine

DialogEx.Show("Dialog1", true, nil, nil);
if string_Kontrol == true then
Application.Exit();
end

ekle

dialog kapat butonuna da

string_Kontrol=true;
result = DialogEx.Close(0);

ve sonra dene