Textdatei anlegen

[MuTzE]

Ich versteh nicht wo dein Problem liegt.

Delphi-Quellcode:

var
  StringList: TStringList;


procedure TForm1.FormCreate(Sender: TObject);
begin
  StringList := TStringList.Create;
  if not FileExists('Text.txt') then
   StringList.SaveToFile('Text.txt');
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  StringList.Destroy;
end;

Der speichert doch! Du solltest vllt mal genau sagen wie das funktionieren soll! Das hilft anderen auch weiter.

Da brauchste nicht mit den Augen zu rollen!

[danku]

ich hab das problem bereits gelöst. (siehe prog)
mit den tstrings habe ich es schon probiert.
tfilestream gefiel mir besser.

[inherited]

Öhm, bist du sicher das das prog funzt? Laut dem hab ich ein BMI von 12.63

[danku]

hat du auch das geburtsjahr, größe in cm! und gewicht beachtet?

[MuTzE]

^^ Wahrscheinlich ist er 2 m groß und wiegt 60 kilo oder so, hehe


Also bei mir geht er!

[inherited]

1.75 m und 54 kg.
Hab grad gelesen das der Test erst ab 19. Lebensjahr gilt^^

[MuTzE]

Naja sag ich doch, das is aber trotzdem nich viel!

Ich bin 1,85 m und wiege ca 80 Kilo. Das ist Normalgewicht, aber nich deins.

[richie]

Also bei mir geht er auch. Aber inherited , was bist du denn für ein Spargeltarzan?

[MuTzE]

^^ sag ich doch

[danku]

könnten wir ja gleiche eine umfrage zwecks dem bmi machen...