深藍色論壇 • 如何得知有多少 USER 連上INTERBASE

第 1 頁 (共 1 頁)

如何得知有多少 USER 連上INTERBASE

發表於 : 2008年 11月 27日, 17:52

由 tim

要使用 IBServerProperties 元件

代碼: 選擇全部

    With IBServerProperties1 Do 
    Begin 
      Active := True; 
      Try 
        FetchDatabaseInfo; 
        StatusBar1.Panels[1].Text:=' '+IntToStr(DatabaseInfo.NoOfAttachments)+'人'; 
      Finally 
        Active := False; 
      End; 
    End;