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?

Code wird übersprungen

Code wird übersprungen

Forumregeln