Convert sample from platform SDK to Delphi

[ste_ett]

Zitat von Remko:

Code:

dwBytes += (sbstrADsPath.Length() + 1) * sizeof(WCHAR);

dwBytes := (length(sbstrADspath) + 1) * SizeOf(WChar); // Or use Inc here as Olli suggests?

Must be
dwBytes := dwBytes + ((length(sbstrADspath) + 1) * SizeOf(WChar)); otherwise you get a false value.

Inc(dwBytes, (length(sbstrADspath) + 1) * SizeOf(WChar)); is possbile also.