Hi,
also, ich habe nun 2 Buffer vom Typ _USER_INFO_0 (so steht es auch im
PSDK). Nun habe ich folgenden Source:
Delphi-Quellcode:
procedure TMainFrm.FormCreate(Sender: TObject);
var
aBuffer1, aBuffer2: _USER_INFO_0;
iUsers: Cardinal;
begin
if NetUserEnum(nil, 0, FILTER_NORMAL_ACCOUNT, @aBuffer1,{<-} MAX_PATH+1,
iUsers, iUsers{2}, nil) = NERR_SUCCESS then begin
aBuffer2 := aBuffer1;
NetApiBufferFree(@aBuffer1);
Label1.Caption := aBuffer2.usri0_name;
end;
end;
Allerdings gibt es an der Stelle, wo der Pfeil ist folgenden Fehler:
Zitat von
Delphi-Debugger:
[Error] Unit1.pas(31): Types of actual and formal var parameters must be identical
Hast du da eine Idee, Chris?
Chris