Thema: Delphi Problem mit OpenDialog

Einzelnen Beitrag anzeigen

maddin1502

Registriert seit: 19. Aug 2009
6 Beiträge
 
#16

AW: Problem mit OpenDialog

  Alt 15. Jun 2010, 02:36
Hallo, ich weiß dieses Thema ist schon etwas älter, ist aber das Neuste, das ich finden konnte.

Ich habe das gleich Problem mit dem OpenDialog (mit dem SaveDialog ists das Gleiche).
Egal was für Quellcode zwischen den Zeilen steht. Hier ein einfaches nichts machendes Testprogramm:
DAS IST DAS KOMPLETTE PROGRAMM, ALSO BITTE NICHT DIE STANDARTANTWORT, DASS HIER CODE VERHEIMLICHT WIRD!!!
Wer es nicht glaubt sollte es doch erstmal kurz testen (Win7+Delphi2009)
Code:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    OpenDialog1: TOpenDialog;
    SaveDialog1: TSaveDialog;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  if form1.OpenDialog1.Execute then
  begin

  end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  if form1.SaveDialog1.Execute then
  begin

  end;
end;

end.
Und nun zur genauen Fehlerbeschreibung.
1. Ich öffne das Projekt
2. Klicke auf Start (F9, der kleine grüne Pfeil) --> Programm startet
3. klicke auf button1 ODER button2 (ist egal, beides führt zum gleichen Fehler)
4. schließe den entsprechend geöffneten Dialog
5. schließe das ausgeführte Programm per "X"

Nun spuckt mir Delphi die Fehlermeldung aus:
http://s5.directupload.net/images/100615/m9u2c9ig.jpg

Egal ob man nun ja oder nein drückt hängt sich Delphi beim nächsten bedienen auf, z.B.: wenn man Delphi dann schließen möchte oder das Projekt neu Starten (F9) möchte --> Freeze und man bekommts nur noch mit Gewalt geschlossen. Ob ein weiterarbeiten und speichern ohne weiteres möglich ist wieß ich nicht, habs nie probiert und wäre mir auch einfach zu unsicher zwecks Datenverlust.

Ohne Debugger läufts übrigegens und auch außerhalb von Delphi, wenn man dann einfach nur die EXE ausführt.
Es ist ja aber nicht Sinn und Zweck der Sache den Debugger immer auszuschalten...

Mein System ist WIN 7 Professional + Delphi 2009

Grüße
Maddin1502
Miniaturansicht angehängter Grafiken
m9u2c9ig.jpg  

Geändert von mkinzler (15. Jun 2010 um 06:30 Uhr) Grund: Verlinktes Bild angehängt
  Mit Zitat antworten Zitat