[HELP]Assistant schaltet sich aus

[_BlackDragon_]

Hi,

du zeigst einen Dialog an

Delphi-Quellcode:

...
Assistant1.MessageDlg(Msg, mtInformation, [mbOK], 0);
...

aber du fragst den Rückgabewert des Message-Dialoges nicht ab. Die MessageDlg-Funktion gibt als Rückgabewert einen Integer zurück, für den es Konstanten gibt (mrOK, mrCancel, usw...).
Das könntest du so machen.

Delphi-Quellcode:

procedure IrgendEtwas;
var
  iResult: Integer;
begin
  iResult := MessageDlg(...);
  if iResult = mrOK then
  begin
    // hier auf OK reagieren
  end
  else if iResult = mrCancel
  begin
   // hier auf Cancel reagieren
  end
  else
  begin
   // hier evtl. alle anderen Fälle
  end;
end;

Ich hoffe ich hab die Frage richtig verstanden, ist nämlich etwas "schwammig" formuliert.
Dadurch rate ich jetzt mal dein Problem.

Gruss

BlackDragon