Code wird übersprungen

[Die Muhkuh]

Hi,

ich hab folgenden Code:

Delphi-Quellcode:

case Sprachwahl of
    0: { Deutsch }
      begin
        if Dialog then
        begin
          if sdSave.Execute then //<--
          begin
            CreatePDF(EFileErrorD, sdSave.Filename, False);
            ShellExec;
          end;
        end
        else
        begin
          CreatePDF(EFileErrorD, sdSave.Filename, False);
          ShellExec;
        end;
      end;
    end;

Dieser Code steht in einer Unit C.

Wenn ich den Code aus Unit A aufrufe klappt alles. Rufe ich aber den Code aus Unit B auf überspringt er die Zeile mit dem Pfeil und geht direkt ans ende der procedure. Stimmt da was mit der Optimierung nicht?

[Aenogym]

hi,

das kann eigentlich nur auftreten, wenn sdSave.Execute false zurückgibt, also abbrechen geklickt wurde.

Aenogym

[Die Muhkuh]

Hmm,

aber warum? Wenn ich den Code aus einer anderen Unit ausführe gehts ja acuh.

[Aenogym]

hi,

wie sieht denn der aufruf aus? wäre schön, wenn du mal den aufrufs-code beider units posten könntest.

Aenogym

[Die Muhkuh]

Hi,

hab den Fehler grad gefunden. Im Dateinamen war ein "/" drinne. Deswegen wurde es nicht aufgerufen ;)