Problem mit OpenDialog

[xi.xi]

Hallo Leute!

Mein kleines Projekt stürzt nach rund 1min ab, nachdem ich versucht habe eine Datei zu öffnen. Kann mir jemand den Grund sagen?
Würde mich echt freuen. Ich bekomm schon graue Haare. Der Fehler sollte bei Open Dialog sein, denn ohne das öffnen einer Datei läuft es.

Delphi-Quellcode:

unit Unit1;

interface

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

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

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin

  if OpenDialog1.Execute() then begin

  end;

end;

end.

Danke schon mal !!