Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Konstanten in externer Datei (https://www.delphipraxis.net/95986-konstanten-externer-datei.html)

hermidelphi 17. Jul 2007 11:11


Konstanten in externer Datei
 
Hallo

Ich möchte folgende Konstanten in einer externen Datei ablegen:

Delphi-Quellcode:

implementation

{$R *.dfm}
const
  Dateiname    = 'log.txt';
  LogFile      = 'log_zeit.txt';
  SubjectFile  = 'Betreff.txt';
  CategorieFile = 'Kategorie.txt';
  CompanyFile  = 'Firma.txt';
Wie geht das?

mfg
Hermidelphi

mkinzler 17. Jul 2007 11:12

Re: Konstanten in externer Datei
 
Einfach in datei schreiben und per {$I} einbinden

hermidelphi 17. Jul 2007 11:26

Re: Konstanten in externer Datei
 
Die Konstanten in der externen Datei sollen nach den compilieren aber veränderbar sein.

z.B. log.txt in log_1.txt

mkinzler 17. Jul 2007 11:30

Re: Konstanten in externer Datei
 
Dann sind es keine Konstanten. Aber das hat mit dem Include nichts zu tun.

Bernhard Geyer 17. Jul 2007 11:31

Re: Konstanten in externer Datei
 
Dann sind es Compilertechnisch keine Konstanten mehr.

Dann lädst du die Datei als Textdatei und interpretierst den Inhalt. Als Format würde sich hier eher das "Ini-Format" oder XML anbieten.

hermidelphi 17. Jul 2007 11:40

Re: Konstanten in externer Datei
 
Zitat:

Zitat von mkinzler
Aber das hat mit dem Include nichts zu tun.

Wo muss ich dann {$I} einfügen

mkinzler 17. Jul 2007 11:47

Re: Konstanten in externer Datei
 
Dort wo du es in der Unit auch reinschreiben würdest.

hermidelphi 17. Jul 2007 11:54

Re: Konstanten in externer Datei
 
Dann lassen sich nach dem compilieren die werte in der externen datei nicht mehr ändern.

Nuclear-Ping 17. Jul 2007 11:55

Re: Konstanten in externer Datei
 
Du drehst dich im Kreis.

Schau mal in die Hilfe unter TIniFile.

hoika 17. Jul 2007 12:10

Re: Konstanten in externer Datei
 
Hallo,

Delphi-Quellcode:
implementation

var
  Dateiname    : String;
  LogFile      : String;
  SubjectFile  : String;
  CategorieFile : String;
  CompanyFile  : String;

begin
  Dateiname    := 'log.txt';
  LogFile      := 'log_zeit.txt';
  SubjectFile  := 'Betreff.txt';
  CategorieFile := 'Kategorie.txt';
  CompanyFile  := 'Firma.txt';
end.
Vielleicht geht ja auch
Delphi-Quellcode:
var
  Dateiname    : String = 'log.txt';
habe gerade kein Delphi offen ;)


Damit sind es Variablen, die default-Werte haben.
Du kannst die immer noch überschreiben,
wo du die anderen Werte speicherst,
ist für die Frage irrelavant.


Heiko


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:52 Uhr.

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