Не могу получить CSTRING из библиотеки.
Уже все танцы с бубном использовал.
Код: Выделить всё
libfptr_create(*LONG fptr),LONG,RAW,PASCAL,PROC
libfptr_error_description(LONG fptr, LONG pValue, LONG lValueSize),LONG,RAW,PASCAL,PROC
...
fptr EQUATE(LONG)
LOC:ResultStr CSTRING(256)
LOC:Size LONG
...
libfptr_create(fptr)
...
!тут какие то действия приводящие к 100% ошибке
...
LOC:Size = libfptr_error_description(fptr, ADDRESS(LOC:ResultStr), SIZE(LOC:ResultStr))
MESSAGE(LOC:Size & ' ' & LOC:ResultStr)