Eğer bir mesaj penceresi içinde açılıyorsa
aşağıdaki şekilde kullanabilirsin
type
tMessajID = (idOK = 1,
idCancel = 2,
idAbort = 3,
idRetry = 4,
idIgnore = 5,
idYes = 6,
idNo = 7,
idClose = 8,
idHelp = 9);
....
type
tMesajIslem = (tMsg_Yok=0, tMsg_Var=1, tMsg_Vekle=2);
procedure ...