Wenn ich mich nicht irre, dann ist in der
OH eine Demo dazu (vermutlich unter TOpenDialog/TSaveDialog, oder so)
Du brauchst dazu nur die entsprechende Komponenten auf dein Form ziehen
und (ich glaube) mit Execute den gewünschten Dialog aufrufen.
Delphi-Quellcode:
If OpenDialog1.Execute Then Begin
// Daten aus der Datei mit dem Namen in OpenDialog1.Filename auslesen
End;
Falls du noch eine bestimmte Dateiendung, oder andere Wünsche hast,
dann kanst du dieses direkt im
OI einstellen oder vorher noch in OpenDialog.xyz verändern.
[add]
wenn in dem Array keine Pointer (z.B. lange Strings) vorhanden sind, dann kanst du die Daten z.B. so Speichern.
Delphi-Quellcode:
Var A: Array[1..100] of TDaten;
F: File;
AssignFile(F, SaveDialog1.FileName);
Rewrite(F);
WriteBlock(F, @A, 100 * SizeOf(TDaten));
Close(F)
Delphi-Quellcode:
Var A: Array[1..100] of TDaten;
F: File of TDaten;
AssignFile(F, SaveDialog1.FileName);
Rewrite(F);
For i := 1 to 100 do Write(F, A[i]);
Close(F);
[add2]
ichbins hat wohl schneller geschrieben, als ich editiert hab :cy: