Endlose Folge von Messagedlg's

[Steve]

Hi,

genauso wie Du bisher den Rückgabewert auswertest, so kannste das auch bei Text2a usw. machen:

Delphi-Quellcode:

if messagedlg('Text1.', mtinformation,[mbYes, mbNO], 0)=mryes then 
begin
  if messagedlg('Text2a.', mtconfirmation,[mbok], 0)=mrYes then
  begin
  ...
  end
  else
  begin
  ...
  end;
end
else
  messagedlg('Text2b.', mtconfirmation,[mbYes], 0)

Geschickter wäre es aber, da ne Funktion drumrumzubauen. Auch ein Case würde sich evtl. lohnen

Gruß
Stephan