Guten Morgen
DP!
Ich benötige für die Umsetzung eines Codes einen Ersatz für Max_Path. In der Hilfe von DP7 konnte ich nicht finden; ich denke, es ist aus einer alten Delphi Version...
Für DWord muss Types in die Uses.
Hier der Code:
Delphi-Quellcode:
function GetNetworkDriveMappings(SList:TStrings):Integer;
var
I:Char;
ThePath:string;
MaxNetPathLen:DWord;
begin
SList.Clear;
MaxNetPathLen:=MAX_PATH;
SetLength(ThePath,MAX_PATH);
for I := 'A' to 'Z' do
if WNetGetConnection(
PChar(''+I+':'),PChar(ThePath),
MaxNetPathLen)=NO_ERROR then
SList.Add(I+': '+ThePath);
Result := SList.Count;
end;
Wie kann ich den Max_path ersetzen?
Beste Grüße
Go2EITS