WindowsNT prüfen ob ausführbar

[DeddyH]

Etwas anders ausgedrückt heißt das:

Versuch, mit LoadLibrary die DLL zu laden. Wenn das klappt, versuchst Du mit GetProcAddress die Adresse der Funktion zu ermitteln. Bekommst Du hier eine gültige Adresse zurück, ist alles klar.

Delphi-Quellcode:

function FunktionVorhanden: Boolean;
var DLLHandle: THandle;
begin
  Result := false;
  DLLHandle := LoadLibrary('user32.dll');
  if DLLHandle <> 0 then
    begin
      Result := GetProcAddress(DLLHandle,'GetLastInputInfo') <> nil;
      FreeLibrary(DLLHandle);
    end;
end;

Ungetestet, probier' s mal aus (und schön in der Hilfe nachlesen )