Datei ausgeben in Konsolenanwendung

**faux**

Hallo!

Ich würde gerne in einem Konsolenanwendungganz einfach eine Datei speichern. Also ich will, dass zum Beispiel die Hilfe als txt-File gespeichert werden kann. Wie realisiere ich das ganz einfach?

Grüße
Faux

**SnuffMaster23**

Mit nem TFileStream zum Beispiel.
Oder mit ner Dateivariablen und Write/WriteLn.
Oder wenns um Text geht TStringList und SaveToFile.

**Michael Habbe**

Vielleicht ganz einfach so:

zusammenfalten · markieren

Delphi-Quellcode:

			program Project1;

{$APPTYPE CONSOLE}

uses

  SysUtils;

var

  f: Textfile;

begin

  if ParamStr(1) = '/h' then

  begin

    AssignFile(f, ChangeFileExt(ParamStr(0), '.hlp'));

    Rewrite(f);

    WriteLn(f, 'Hier kommt die Hilfe:');

    WriteLn(f, '... noch mehr ...');

    CloseFile(f);

  end;

end.

**faux**

@Michael Habbe: Genau so hab ich mir das vorgestellt!
Danke!

Datei ausgeben in Konsolenanwendung

Datei ausgeben in Konsolenanwendung

Re: Datei ausgeben in Konsolenanwendung

Re: Datei ausgeben in Konsolenanwendung

Re: Datei ausgeben in Konsolenanwendung

Forumregeln

faux Registriert seit: 18. Apr 2004 Ort: Linz 2.044 Beiträge Turbo Delphi für Win32	#1 Datei ausgeben in Konsolenanwendung 26. Jul 2006, 20:57 Hallo! Ich würde gerne in einem Konsolenanwendungganz einfach eine Datei speichern. Also ich will, dass zum Beispiel die Hilfe als txt-File gespeichert werden kann. Wie realisiere ich das ganz einfach? Grüße Faux Faux Manuel Wer weiß, dass er nichts weiß, weiß mehr, als der der nicht weiß, dass er nichts weiß. GoTrillian
	Zitat

SnuffMaster23 Registriert seit: 13. Feb 2006 Ort: Kempten 253 Beiträge	#2 Re: Datei ausgeben in Konsolenanwendung 26. Jul 2006, 21:18 Mit nem TFileStream zum Beispiel. Oder mit ner Dateivariablen und Write/WriteLn. Oder wenns um Text geht TStringList und SaveToFile. "Conspiracy is the poor man's mapping of the world" - Fredric Jameson
	Zitat

faux Registriert seit: 18. Apr 2004 Ort: Linz 2.044 Beiträge Turbo Delphi für Win32	#4 Re: Datei ausgeben in Konsolenanwendung 26. Jul 2006, 21:21 @Michael Habbe: Genau so hab ich mir das vorgestellt! Danke! Faux Manuel Wer weiß, dass er nichts weiß, weiß mehr, als der der nicht weiß, dass er nichts weiß. GoTrillian
	Zitat