Registriert seit: 8. Dez 2005
Ort: am Chiemsee
304 Beiträge
Delphi 7 Professional
|
Re: Direktiven auf Konstanten anwenden
27. Jan 2006, 11:25
Zitat:
Delphi-Quellcode:
const
{$IFDEF BDSRUN}
MYCONST = ' Die Delphi-IDE ist gestartet';
{$ENDIF} {$ELSE} <----------------------------------------------- Fehler, $ENDIF muss hier weg
MYCONST = ' Delphi läuft nicht';
{$ENDIF}
Ein Experte ist ein Mann, der hinterher genau sagen kann, warum seine Prognose nicht gestimmt hat. (Winston Churchill)
|