unbekannte Eigenschaften zur Laufzeit ändern

[Erichgue]

Hallo,
wenn es um die Unterscheidung der Delphi versionen geht, kann ich dir hiermit aushelfen:
Delphi definiert Symbold, die die akteuelle Version kennzeichnet

Abfragen kannst du diese wie folgt:

{$IFDEF VER120} { Delphi 4 }
{$DEFINE DELPHI_4_OR_HIGHER}
{$DEFINE DELPHI_4}
{$ENDIF}

{$IFDEF VER125} { C++ Builder 4 }
{$DEFINE DELPHI_4_OR_HIGHER}
{$DEFINE DELPHI_4}
{$ENDIF}

{$IFDEF VER130} { Delphi 5 and C++ Builder 5 }
{$DEFINE DELPHI_4_OR_HIGHER}
{$DEFINE DELPHI_5_OR_HIGHER}
{$DEFINE DELPHI_5}
{$ENDIF}

{$IFDEF VER140} { Delphi 6 }
{$DEFINE DELPHI_4_OR_HIGHER}
{$DEFINE DELPHI_5_OR_HIGHER}
{$DEFINE DELPHI_6_OR_HIGHER}
{$DEFINE DELPHI_6}
{$ENDIF}

{$IFDEF VER150} { Delphi 7 }
{$DEFINE DELPHI_4_OR_HIGHER}
{$DEFINE DELPHI_5_OR_HIGHER}
{$DEFINE DELPHI_6_OR_HIGHER}
{$DEFINE DELPHI_7_OR_HIGHER}
{$DEFINE DELPHI_7}
{$ENDIF}

Im Quellcode dann wie folgt abfragen:
(Zum Beispiel nach Delphi 5

{$IFDEF DELPHI_5_OR_HIGHER} // Delphi 6.0
ShowMessage(''Delphi 5 oder höher')
{$Else}
ShowMessage('nicht Delphi 5')
{$EndIf}

Also, je nach Delphi-Version musst du dann deine Anweisung die die TypInfo betreffen abändern