Delphi-Quellcode:
// Deklarationen des Dialoges
const
ServerBrowseDialogA0_name = 'ServerBrowseDialogA0';
type
TServerBrowseDialogA0 = function(hwnd: HWND; pchBuffer: pointer; cchBufSize:
DWord): bool; stdcall;
var
ServerBrowseDialogA0: TServerBrowseDialogA0 = nil;
Delphi-Quellcode:
var
Buffer: array[0..1024] of Char;
s: String;
begin
ServerBrowseDialogA0(hDlg, @Buffer, sizeof(Buffer));
s := copy(string(Buffer), 3, length(string(Buffer)));
hDlg ist das
Handle deines Fensters. In
s steht dann der gewählte Computer ohne die "\\" am Anfang.