[EasyListView] SaveToFile funktioniert nicht

[Yheeky]

Hi,

ich arbeite mit der Komponente EasyListView. Ich möchte die ListView nun über SaveToFile in einer Datei speichern. Die Funktion rufe ich wiefolgt auf:

Delphi-Quellcode:

procedure TfrmMain.Button1Click(Sender: TObject);
begin
Profile.SaveToFile(ProgrammPfad + 'Profile.dat', 0);

end;

Die Funktion SaveToFile ist in der Komponente so definiert:

Delphi-Quellcode:

procedure TCustomEasyListview.SaveToFile(FileName: WideString; Mode: Word);
var
  F: TWideFileStream;
begin
  F := TWideFileStream.Create(FileName, Mode);
  try
    SaveToStream(F)
  finally
    F.Free
  end  
end;

Ich bekomme die Fehlermeldung: "Datei 'Dateiname.dat' kann nicht erstellt werden."

Weiss jemand, woran es liegt? Habe schon versucht, die Datei vorher mit FileCreate zu erstellen (auch mit try...finally, aber das hat nicht funktioniert).

[marabu]

Hallo Christian,

warum verwendest du nicht die vorgesehenen Konstanten für Mode - fmCreate etc. ?

Grüße vom marabu

[Yheeky]

Jetzt wo du es sagst, verwende ich die doch einfach mal ;-)
Danke, das hatte ich gesucht...hatte mich schon gewundert, warum die Variable Mode heisst.Mit Word hatte ich Zahlen zwischen 0...65535 im Hinterkopf, wieso kann eine Variable vom Typen Word sowohl Zahlen, als auch Bezeichner enthalten?

[Cyberbob]

Ist zwar etwas spät. Aber besser als nie!

fmCreate ist eine Konstante vom Typ Wort, der ein Wert zugewiesen wurde.