Probleme mit WTSEnumerateServers unter Windows Server 2003

[UweR]

Hallo Leute,

ich kriege unter einem Windows Server 2003 die folgende Fehlermeldung:

Das Format des angegebenen Domänennamens ist unzulässig.

wenn ich den folgenden Code ausführe.

Delphi-Quellcode:

Memo1.Lines.Clear;
if WTSEnumerateServers(NIL, 0, 1, ServerInfoPtr, nCount) then begin
   WorkPtr := ServerInfoPtr;
   for i:=1 to nCount do begin
      Memo1.Lines.Add(WorkPtr^.pServerName);
      inc(WorkPtr);
   end; // for i:=1 to nCount
end else begin
   FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, nil, GetLastError(), 0, acBuffer,sizeof(acBuffer), nil);
   MessageBox(Handle, acBuffer, 'Fehler', MB_ICONSTOP);
end; // if WTSEnumerateServers(NIL, 0, 1, ServerInfoPtr, nCount)
WTSFreeMemory(ServerInfoPtr);

Auf anderen Systemen (auch 2003er darunter) klappt das wunderbar. Kann mir jemand nen Tip geben woran das liegen könnte.

[Matt]

Hi,
bin mir nicht 100%ig sicher, aber müsste es nicht

WorkPtr^.pDomainName

heißen?

Schau ansonsten noch mal in das MS SDK!

Gruß Matt

[UweR]

Hallo Matt,

das mit dem pServerName ist schon OK. Mein Problem liegt auch eher darin das WTSEnumerateServers ein FALSE zurückliefert