delphi ukladanie do suboru

septerr · Napísal **septerr**: 27.05.2010 14:18

cafte
Potreboval bz som vediet ako mozem ulozit nejaky text ktory zadam do EDIT do suboru?
Isiel som podla navodu na niekolkych strankach(premenna,assignfile,rewrite) ale stale to pise nejake errory.
Dik

coldak · Napísal **coldak**: 27.05.2010 15:13

ake errory ? bez znenia erroru ti nepomozem , a vhod by padol a zdrojak alebo aspon jeho cast

shiro · Napísal **shiro**: 27.05.2010 16:14

delphi ma ohladne tohoto super napovedu aj s prikladmi, takze kuk do nej.
Nejake errory si nejako oprav.

Fico · Napísal **Fico**: 27.05.2010 16:25

septerr píše:

cafte
Potreboval bz som vediet ako mozem ulozit nejaky text ktory zadam do EDIT do suboru?
Isiel som podla navodu na niekolkych strankach(premenna,assignfile,rewrite) ale stale to pise nejake errory.
Dik

Pokiaľ sa jedná o TEdit, tak takto:

Kód:

procedure TForm1.Button1Click(Sender: TObject);
var
  f: TextFile;
begin

  AssignFile(f, 'C:\edit.txt');
  Rewrite(f);
  write(f, Edit1.Text);
  CloseFile(f);

end;

Ak by sa mal ukladať text z TMemo komponentu, tak by to bolo o niečo jednoduchšie:

Kód:

Memo1.Lines.SaveToFile('C:\memo.txt');

septerr · Napísal autor témy **septerr**: 27.05.2010 16:34

diki moc Fico, neislo to lebo som nezadal do adresy suboru aj to C:/

delphi ukladanie do suboru

Podobné témy