Einzelnen Beitrag anzeigen

Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#1

"const" und Pfadzuweisung

  Alt 23. Jan 2005, 18:32
zusammen!

Gibt es eine Möglichkeit, so etwas irgendwie zu realisieren?

Delphi-Quellcode:
//folgende Konstante
const
  ResizedDir = IncludeTrailingBackslash(ExtractFilePath(ParamStr(0))) + 'resized';

var
  Form1: TForm1;

implementation

{$R *.dfm}
Klar, ich könnte das im OnCreate auch zuweisen, nur hätte ich's gerne über dem Implementation-Abschnitt.
  Mit Zitat antworten Zitat