Форум: "Базы";
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];
ВнизГде запущена программа? Найти похожие ветки
← →
Igor_ (2002-02-27 13:24) [0]Есть клиент серверная БД. Как клиентской программой определить на каком компьютере она работает (на том, где стоит сервер InterBase или просто на компьютере в сети).
← →
Praco (2002-02-27 13:42) [1]GetComputerName сравнить с именем IB сервера
← →
Igor_ (2002-02-27 14:44) [2]Если не сложно, напиши пожалуста с какими параметрами она вызывается, а то я что-то разобраться не могу
← →
Praco (2002-02-27 15:54) [3]var s : PChar;
i : Integer;
begin
i := MAX_COMPUTERNAME_LENGTH + 1;
GetMem(s,i);
if GetComputerName(s, i) then
Caption := s;
FreeMem(s);
end;
← →
Igor_ (2002-02-27 16:47) [4]Спасибо, помогло. Только i:Cardinal -иначе ругается
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c