Форум: "Базы";
Текущий архив: 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.004 c