in datei schreiben

[skai]

ich bräuchte mal hilfe.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  FileCreate('test.txt');

end;

wie kann ich es machen, dass es direkt nach dem erzeugen zb 'dies ist ein test' in diese datei schreibt?


schomal danke im voraus für die hilfe

[SirThornberry]

schaut dir am besten die Klasse TFileStream an. Dazu findet sich auch schon einiges im Forum an Beispielen.

[p0w3r5tr34m3r]

Reset(), ReWrite(), Append(), AssignFile(), CloseFile()

schau dir mal diese funktionen an. Sollte zum einstieg reichen

btw
Herzlich Willkommen in der DP

[skai]

das FileCreate('test.txt');
is aber schonmal richtig?

[p0w3r5tr34m3r]

würde auch mit assignfile und rewrite klappen aber im großen und ganzen is es richtig, ja

[himitsu]

Nein.

Schau doch mal ganz unauffällig in deine OH

entweder nach:
> AssignFile
> Reset, ReWrite, oder Append
> Write und WriteLn
> CloseFile

oder auch mal nach
> TFileStream

und wenn du da wirklich nichts ausreichendes findest, dann gibt's da noch weitere Funktionen/Klassen.


[add]
ach ja .... herzlich willkommen,
aber etwas mehr eigeninitiative hätte dir auch weitergeholfen, denn die O und notfalls auch die ForenSuche hätten dir alles nötigt hierzu sagen können.

[skai]

hab schon gesucht.... aber so richtig was gefunden...
es soll ja was ganz simples sein.... einfahc nut eine datei mit inhalt erzeugen, weder verändern, noch sonstwas...

ich will eiegndlich auch nich ernsthaft programmierer werden, bis jetz is es noch nich geplant.

ich brauch nur diese kleine programm für mich selbt.

[skai]

hat keiner ein konkretes beispiel für mich?

[p0w3r5tr34m3r]

Delphi-Quellcode:

var 
  datei: Textfile;
begin
  assignfile(datei, 'C:\meinedatei.txt');
  rewrite(datei);
  writeln(datei, 'Das ist die erste Zeile in meiner Textdatei');
  closefile(datei);
end;

[himitsu]

PS: solche Bespiele wie von p0w3r5tr34m3r findet man übrigens auch in der OH.

z.B. wenn ich mal unter "Rewrite" in der OH nachschaue, dann gibt's da 'nen Link ala "Beispiel", mit volgendem Inhalt:

Delphi-Quellcode:

var F: TextFile;

begin
  AssignFile(F, 'NEWFILE.$$$');
  Rewrite(F);
  Writeln(F, 'Just created file with this text in it...');
  CloseFile(F);
end;

also, wo gibt's da nichts zu finden?