hi Kollegen,
habe hier ein merkwürdiges Problem und weiss nicht warum. Eine Messagebox verschwindet im Hintergrund, wenn ich das aufrufende Fenster anklicke. Hier die Funktion:
Delphi-Quellcode:
function Ja_Nein(tcText,tcJaNein : PChar) : boolean;
begin
// MessageDlg geht mangels Default-Button nicht!
Result := iif(MessageBox(0, tcText, PROGRAMM_LOC, MB_ICONQUESTION + MB_YESNO +
iif(tcJaNein = 'N', MB_DEFBUTTON2, MB_DEFBUTTON1)) = 6, True,False);
end;
Und das ist der Aufruf:
if ja_nein('Diese Zeile löschen?', 'N') then _DBC.Verp.Delete;
Wenn ich an der Messagebox vorbeiklicke, befindet sie sich hinter meiner Form. Gips da ne einfache Lösung?