ADO Database Delphi

  1. Home
  2. Delphi
  3. ADO Database
  4. 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;