kullanıcı listesi

[i_zec]

windows ta bulunan kullanıcıların listesini nasıl alabilirim....

[miskin]

Aslinda kayitlarin anonim kalmasi icin alamaman lazim.
Ama istanbul da yasayanlarin senin le baglanti kurmasi icin burda duyuu yapabilirsin.

[i_zec]

pardon ne demek istediğini anlyamadım.ben programımda bir makına uzerine ki kullanıcıların listesini almak istiyorum.Bunu sormuştum ama....

[miskin]

pardon ne demek istediğini anlyamadım.ben programımda bir makına uzerine ki kullanıcıların listesini almak istiyorum.Bunu sormuştum ama....

Pardon ben istanbul okudugumu saniyordum.
Indy nin aradigin konuyla ilgili bileseni(nesnesi) varmis.
GetUserName ile de ögrenebilirsin

[fduman]

http://www.experts-exchange.com/Program ... 54083.html

[guney_tosun]

procedure TForm1.Button1Click(Sender: TObject);
var
u: array[0..127] of Char;
c: array[0..127] of Char;
KullaniciAdi: string;
BilgisayarAdi: string;
s: dword;
begin
s := SizeOf(u);
GetUserName(u, s);

s := SizeOf(c);
GetComputerName(c, s);

KullaniciAdi := u;
BilgisayarAdi := c;

Label1.Caption := u;
Label2.Caption := c;
end.