Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

подключение [D6, Paradox]

Ag2002 © (2002-10-25 14:35:00)
Подскажите пожалуйста, каким образом можно узнать как кто в данный момент подключен и использует сетевую БД ?

Ag2002 (2002-10-30 18:29:00) [1]
Ренат а какие именно функции ?

stone (2002-10-29 11:18:00) [2]
А лог вести не пытался, чтобы клиентская прога после запуска писала в него, что подключилась, а после завершения работы, что отключилась. Выбирай все активные подключения и вперед...

Ренат (2002-10-29 11:09:00) [3]
Лучше смотри кто открыл файл используя winapi если база под
виндами

kudatsky (2002-10-29 10:47:00) [4]
Я поступаю так, но только с DBF-файлами:
1. В директории БД создаётся файл с именеи ID.use, где ID-сетевое имя машины, работающей с БД.
Этот файл открывается в момент начала работы с БД и закрывается при окончании. Пока он открыт, другое приложение его удалить не может.
2. Чтобы получить список машин, которые работают с БД, нужно получить список файлов ID.use и попытаться удалить их. Имена файлов, которые не удалились, и содержат имена подключенных машин.

Ag2002 (2002-10-29 10:20:00) [5]
Нет мне нужно узнать не оккрыта ли она а сетевое ИМЯ компа где используют БД ? реально это ??

MsGuns (2002-10-25 14:51:00) [6]
Для парадокса самое простое
type
TMyForm = class(TForm)
...
db: TDatabase;
...

implementation

function DataBaseBusy: boolean;

...

function DataBaseBusy: boolean;
var
OldStatus: boolean;
begin
result:=false;
OldBoolean := db.connected;
try
If db.connected then
db.connected := false;
db.Exclusive := true;
db.Connected := true;
db.Exclusive := false;
result := true;
except
ShowMessage("С БД работают !");
end;
db.connected := OldBoolean;
end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »