speichern von daten

[quendolineDD]

Du kannst dir eine Strinlist erstellen, in diese deine 10 Inhalte der Datei laden und dann mit einer Schleife die 10 Daten aus der Stringlist auf die TEdit's verteilen.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var open : TOpenDialog;
    values: TStringlist;
    i : integer;

begin
open := TOpenDialog.Create(self);
if open.execute then begin
        values := TStringList.Create;
        values.loadfromfile(open.filename);

for i := 0 to values.Count -1 do
    memo1.lines[i] := values.Strings[i];
end;
open.Destroy; values.Free;
end;

Solang du deinen absoluten Pfad hast, der sich auch wirklich nicht verändern wird, kannst du den teil mit "if open.execute then begin" weglassen und anstatt open.filename den absoluten Pfad eingeben in den Quelltext.
Desweiteren müsstest du dann nicht den Opendialog initialisieren bzw. zerstören.

Ich wusst jetzt nicht, wie man das Dynamisch auch die Zählvariable i für die Edit's nehmen kann. Hab in letzter Zeit zu viel mit PHP und Javascript gearbeitet :-\