Страница 1 из 1

Getfulladdress

Добавлено: 14 ноя 2014, 07:30
s2176
Добрый день!

В интерфейсе нужно достать адрес по прописке. Вроде в ресурсе Z_STAFF есть функция Getfulladdress.
Как правильно синтаксически к ней обратиться?
В проекте есть строка
#include AdrFunc.vih
Но компилятор не находит функцию, возможно, ее как-то нужно дополнительно описать?

Re: Getfulladdress

Добавлено: 14 ноя 2014, 09:55
Masygreen

Код: Выделить всё

_addrService : Z_Staff::AddressFunc;

persons.PASSPADDR
persons.LIVEADDR

_addrService.GetFullAddressInd(comp)

Re: Getfulladdress

Добавлено: 14 ноя 2014, 10:10
s2176
Не понятно ((
_addrService : Z_Staff::AddressFunc;
в каком месте интерфейса должна быть эта строка?

interface control_persinf '' escclose;
...
! работающие сотрудники
create view tsotr
as select ...
...
;
HandleEvent
cmInit:
{
...
sss:=_addrService.GetFullAddress(tsotr.persons.bornaddr)
...
}
end;
end.

Re: Getfulladdress

Добавлено: 14 ноя 2014, 10:49
Irina_
Здравствуйте. Строка должна быть в описании переменных, это имя и тип переменной.

Re: Getfulladdress

Добавлено: 14 ноя 2014, 10:57
s2176
я так делала.

interface control_persinf '' escclose;
var _addrService : Z_Staff::AddressFunc;
...

компилятор ругается: не найден компонент Z_Staff

Re: Getfulladdress

Добавлено: 14 ноя 2014, 11:01
Irina_
В списке дополнительно подключаемых ресурсов в проекте укажите Z_Staff.res

Re: Getfulladdress

Добавлено: 14 ноя 2014, 12:09
RAJAH

Код: Выделить всё

#define ComponentVersion
#include AdrFunc.vih
...
var
...
  adres: string;
  persnrec: comp;
  #include AdrFunc.var
...
     adres:=iAdrFunc.GetFullAddressInd(persnrec);
...
#undef ComponentVersion
end.

Re: Getfulladdress

Добавлено: 14 ноя 2014, 12:43
s2176
Спасибо, Rajah!
Добавила
#define ComponentVersion, и все получилось!