Title: Get List of active users in Sql Server 2000?procedure TForm1.Button1Click(Sender: TObject);begin ADOQuery1.SQL.Add('Exec SP_WHO'); ADOQuery1.Active := True;end;{* For Any Information mail me *Mail : Mostafa@Touska.co.ir}