Mit "try" an EXE geschriebene Daten auslesen

[Aljoscha]

Hi.
Ich habe mit der Funktion:
http://swissdelphicenter.ch/de/showcode.php?id=815
Daten an eine konpilierte exe geschrieben.
Das Funktioniert auch soweit, nur ich habe das auslesen der Daten in FormCreate gesetzt.
Und manchmal sind eben noch keine Daten eingefügt.
In diesem Fall kommt ein Error das der Speicher icht expandiert werden konnte.
Jetzt habe ich das ganze ein wenig umbegaut:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  aStream: TMemoryStream;
begin
  try
  begin
  aStream := TMemoryStream.Create;
  LoadFromFile(Application.ExeName, aStream);
  Memo1.Lines.LoadFromStream(aStream);
  end
  finally
  aStream.Free;
end;
end;

Es sollte also nur versucht werden die Daten auszulesen, da es ansonsten ja zu dem Fehler kommt.
Allerdings Funktioniert das auch nicht.
Weiß jemand wie ich den Fehler abfangen könnte?

thx 4 help