Fehler mit GetVolumeInformation

[Tiuri]

Hi,

ich versuche, unter Delphi 3 den Zipmaster zu compilieren. Ich komme bei folgendem Code aber auf eine Fehlermeldung:

Delphi-Quellcode:

  if (not FDriveFixed) and    // 1.72 only get Volume label for removable drives
  {If}(not GetVolumeInformation(pChar(FDrive), VolNameAry, NamLen, @DiskSerial,
    SysLen, SysFlags, nil, 0)) then

Delphi meldet den Fehler hinter SysLen. Die Fehlermeldung ist:

Code:

Die Typen der tatsächlichen und formalen Var-Parametern müssen übereinstimmen.

Ich hab hier auch schon danach gesucht, aber nichts gefunden.