Pripájam kódy:
Kód: Vybrať všetko
procedure TForm1.Button1Click(Sender:TObject);
var F: TextFile;
begin
AssignFile(F, 'data.txt');
Rewrite(F);
Write(F, Edit1.Text,' ');
Write(F, Edit2.Text,' ');
Write(F, Edit3.Text,' ');
CloseFile(F);
end;Alebo akým spôsobom by ste riešili zápis do textového súboru z delphi(myslím skôr aké elementy GUI použiť a tak), keď ten súbor by mohol vyzerať nejako takto:
Kód: Vybrať všetko
1 4 5
1 5 12
2 3 9
...Ďakujem
