Einzelnen Beitrag anzeigen

Benutzerbild von divBy0
divBy0

Registriert seit: 4. Mär 2007
Ort: Sponheim
1.021 Beiträge
 
Delphi XE2 Professional
 
#1

Problem mit TOpenDialog...Laden in TStrings...

  Alt 13. Mai 2007, 15:50
Hallo!!

Ich sitze hier vor folgendem Problem:

Hab eine kleine Anwendung und möchte jetzt über ein OpenDialog eine Textdatei in ein TStrings-Objekt laden und dabei bricht das Programm mit EAccessViolation ab. Wenn ich die Datei aber direkt in ein Memo lade mit (z.B. Memo1.Lines.LoadFromFile(OpenDialog1.FileName)), dann funktioniert es.

Hier ist mal der Codeschnippel:

Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
  Datei : String;
begin
  OpenDialog1.Filter := 'DSP Preset (*.txt)|*.txt';
  if OpenDialog1.Execute then
  begin
    Datei := OpenDialog1.FileName;
  end;
  Memo1.Lines.LoadFromFile(Datei); // <== das funktioniert
  DSPPreset.LoadFromFile(Datei); // <== das nicht... :(
end;
DSPPreset ist als TStrings deklariert.


Danke schon mal...
Marc
  Mit Zitat antworten Zitat