MessageDlg wird dopellt angezeigt - Solle er aber nicht

[Die Muhkuh]

Hi,

poste bitte das nächste mal nur den relevanten Code und nicht alles...

Delphi-Quellcode:

if form1.RadioButton2.Checked then
      begin
        decode;
        l2;
        decode; //ich weis das es zählschleifen gibt! :-)
        l2;
        MessageDlg('Decodieren erfolgreich beendet',
        mtinformation, [mbOk], 0);
        form1.ProgressBar2.Position:=0;
      end
    else   // <<< Beachte das else

    if form1.radiobutton3.checked then
      begin
        decode;
        l3;
        decode;
        l3;
        decode;
        l3;
        MessageDlg('Decodieren erfolgreich beendet',
        mtinformation, [mbOk], 0);
        form1.ProgressBar2.Position:=0;
      end;

Zitat:

doch komischer weise bekomme ich bei der gewählten radio button2 und 3 die erfolgsmeldung immer 2 mal. ich konnte aber keinen fehler entdecken