Hallo,

hab mal wieder ein seltsames Problem. Ich rufe den SaveDialog über Execute auf, dieser erscheint und führt alles korrekt aus. Danach beende ich das Programm und beim Beenden verschwindet das ausgeführte Programm und Delphi "wartet auf Rückmeldung" in einer Endlosschleife. Mir bleibt nur übrig, es zu killen.

Der Dialog wird in einer ganz kleinen Prozedur aufgrufen (kein Thread). Kommentiere ich alles aus dieser Prozedur aus, schließt sich das Programm normal und Delphi "überlebt".

Kommentiere ich alles aus, außer das SaveDialog.Execute, tritt das o.g. Verhalten auf.

Es liegt aber irgendwie an der Exe bzw. dem Projekt. Wenn ich den gleichen, simplen Code in einem neuen Projekt aufrufe, dann klappt alles.

markieren

Delphi-Quellcode:

  if (SaveDialog1.Execute) then
  begin
    MessageDLG('ok', mtInformation, [mbOK], 0);
  end;

Könnt ihr mir helfen? Was könnte das nun wieder sein?

Danke im Voraus

Guten Tag,
was genau möchtest du mit dem SaveDialog bewirken ?
Es ist ja eigentlich sinnfrei diesen SaveDialog auszuführen, nur um eine Information in einem Fenster anzuzeigen.
Vielleicht könntest du ein bisschen mehr von deinem Quelltext posten.

Mit freundlichem Gruß

Hi,

ehm ja - eigentlich wollte ich mit dem SaveDialog schon eine Datei speichern. Nur zu Test-/Debugzwecken habe ich jegliche Code-Zeilen entfernt / auskommentiert, sodass nur diese zwei Zeilen übrig geblieben sind.

Ich wollte damit verdeutlichen, dass es nicht an meinem Code liegt (da dieser ja auskommentiert ist) und der Fehler auch dann auftritt, wenn nur die Methode "SaveDialog1.Execute" aufgerufen wird.

Dies ist aber nur in diesem Projekt so.

Ich starte die Exe, gehe auf exportieren und dann kommt auch gleich die SaveDialog-Zeile. Mehr mache ich nicht.

Zitat von Bernhard Geyer:

Was passiert wenn das Programm außerhalb der IDE ausgeführt wird?

Falls nur innerhalb der IDE würde ich auf den Virenscanner tippen? Evtl. Avira installiert?

Ehm wow: Außerhalb der IDE funktioniert es. Jetzt bin ich erstaunt. Avira ist installiert, hatte aber nie Probleme in der Hinsicht.

EDIT: Mit ausgeschaltetem Avira (Echtzeitscan deaktivieren) tritt das gleiche - falsche - Verhalten auf.

Danke

Hmm…
ich habe bei mir jetzt auch den gleichen Quelltext eingefügt und auf einen Button gelegt, doch komischerweise läuft mein Delphi Programm beim Beenden nicht in den Wald, obwohl sich lediglich dieses Fenster zum Speichern öffnet und noch nicht einmal ein Message Dialog angezeigt wird. Hast du schon einmal versucht Delphi neu zu starten oder ein anderen Quelltext mit dem SaveDialog zu belegen. Probier mal diesen hier:

markieren

Delphi-Quellcode:

if SaveDialog1.Execute then
  ShowMessage('Datei: ' + SaveDialog1.FileName)
else ShowMessage('Speichervorgang abgebrochen');

MfG

Hi,

hab wieder alles auskommentiert und deinen Code eingefügt. Gleiches Verhalten. Ich habe zusätzlich auch mal alles auf den Events onCloseQuery und onClose auskommentiert. Auch das half nicht.

Das Compiler-Fenster schreibt beim Beenden des Programms - an der Stelle an der der Fehler auftritt:

Zitat von Compiler:

Modul entladen: MSVCR80.DLL. Prozess xxxxxxxxx.exe (2284)

An dieser Stelle hängt's immer.

Hmm…
die msvcr80.dll Datei gehört zur C Runtime Library. Ich weiß jetzt nicht, ob Delphi die Runtimes von Microsoft braucht, um bestimmte Programme ausführen zu können ? Hast du in den uses in deinem Quelltext vielleicht irgendwelche Bibliotheken, die auf die C Runtime verweisen deklariert. Schau einmal nach, ob du dort irgendetwas findest. Vielleicht auch einmal bei deinen installierten Programmen und Updates nachschauen, ob du vielleicht keine Runtimes installiert hast. Aber ich gehe nicht davon aus, dass es daran liegt.
Wie gesagt starte Delphi noch einmal neu, und probiere es noch einmal. Vielleicht auch einmal Delphi mit Administratorrechten starten, sofern du Vista oder Windows 7 hast.

MfG

Was passiert wenn das Programm außerhalb der IDE ausgeführt wird?

Falls nur innerhalb der IDE würde ich auf den Virenscanner tippen? Evtl. Avira installiert?