Hallo Michael,
beim Verwerfen des Funktions-Rückgabewertes hast du wohl übersehen, dass das Beispiel im
PSDK das Makro verwendet und nicht die
API-Funktion, aber das hat dir Basilikum ja schon gezeigt. Nur der Ordnung halber - ConditionMask sollte nicht DWORD sondern DWORDLONG sein, hast den Typ doch extra deklariert. Und die Abfrage von ServicePacks unter XP funktioniert nicht, auch wenn der Platform
SDK anderes behauptet. Du wirst es merken, wenn du dein System befragst:
if not WinXPorLater then ShowMessage(SysErrorMessage(GetLastError));
Übrigens: Der ServicePack-Test (wenn er denn funktionieren würde) und dein Meldungstext harmonieren nicht so ganz.
Freundliche Grüße vom marabu