Neuer Versuch: Ich habe es jetzt so:
Delphi-Quellcode:
ShowMessage(hDlg, GetItemTextW(hDlg, ID_EDT_COMP_X));
Computer := SysAllocString(PWideChar(GetItemTextW(hDlg, ID_EDT_COMP_X)));
ShowMessage(hDlg, Computer);
//User := GetItemTextW(hDlg, ID_EDT_ACCOUNT_X);
//PW := GetItemTextW(hDlg, ID_EDT_PW_X);
//DisconnectNetworkDrivew(CurComputer);
ret := ConnectToNetworkDriveW('
', Computer + '
\IPC$',
In beiden ShowMessages steht der Computername, aber im Funktionsaufruf von ConnectToNetWorkDriveW steht dann "nicht verfügbarer Wert", wen ich dort mit dem Debugger stoppe.