[Specialistvlad]

Доброго времени суток.

Есть библиотека dl, имеется к ней header.

Код:

int __stdcall SomeFunction(
    const int hFile,
    const char* varName,
    char* varLabel); 

Код:

function SomeFunction(hFile: Integer; varName: PAnsiChar; var varLabel: PAnsiChar): Integer; stdcall;

Функция сама память не выделяет, в мануале написано выделять вручную 121 байт.

Код:

...
var
Arr: Array [0..121] of AnsiChar;
MyPointer: PAnsiChar;
...

Arr := ''; //clear array
//У гансмокера прочитал, что это корректная запись, там есть пример таких же действий
MyPointer := Arr; //assign pointer to static array

SomeFunction(FileH, VarName, MyPointer));
Write(Format('|%s|,|%s|', [VarName, Arr]));

В результате у меня строка получается обрезанная спереди неизвестно на сколько байт, но обрезанная это точно. Что не правильно делаю?