Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Datei ausgeben in Konsolenanwendung (https://www.delphipraxis.net/74014-datei-ausgeben-konsolenanwendung.html)

faux 26. Jul 2006 20:57


Datei ausgeben in Konsolenanwendung
 
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 26. Jul 2006 21:18

Re: Datei ausgeben in Konsolenanwendung
 
Mit nem TFileStream zum Beispiel.
Oder mit ner Dateivariablen und Write/WriteLn.
Oder wenns um Text geht TStringList und SaveToFile.

Michael Habbe 26. Jul 2006 21:19

Re: Datei ausgeben in Konsolenanwendung
 
Vielleicht ganz einfach so:
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 26. Jul 2006 21:21

Re: Datei ausgeben in Konsolenanwendung
 
@Michael Habbe: Genau so hab ich mir das vorgestellt!
Danke! :thumb:


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:48 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz