Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#12

AW: ShlObj: Implementierung der Interface-Methode IContextMenu

  Alt 4. Okt 2011, 16:03
Damit die codes nicht zu sehr ausarten (falls/wenn man UINT_PTR nochmal braucht)
Delphi-Quellcode:
{$IFNDEF VER230}
  type UINT_PTR = UINT;
{$ENDIF}

function GetCommandString(idCmd: UINT_PTR; uFlags: UINT; pwReserved: PUINT;
  pszName: LPSTR; cchMax: UINT): HResult; stdcall;

oder besser so (dafür kann man sich ja mal eine kleine Types-Unit zusammenstellen)
Delphi-Quellcode:
// ebenfalls die CompilerVersion prüfen
{$IF CompilerVersion < 23.0}
  type UINT_PTR = UINT;
{$IFEND}

// auf den Typen selber prüfen
{$IF not Declared(UINT_PTR)}  // es gibt auch Defined, für Compilerschalter
  type UINT_PTR = UINT;
{$IFEND}


Dieses IFDEF VERxxx hat einen sehr großen Nachteil. Es ist immer auf genau eine Version ausgelegt, aber meistens will man ja etwas ab/bis zu einer bestimmten Version haben.
$2B or not $2B

Geändert von himitsu ( 4. Okt 2011 um 16:08 Uhr)
  Mit Zitat antworten Zitat