А если приведенный выше пример записать в исходниках библиотеки так:
Цитата:
function Test_Function1(buf1,buf2: Pchar; size: integer): integer;stdcall;
begin
StrLCopy(buf2,Pchar(String(buf1)+'1111'),size);
Result:=1;
end;
или так
Цитата:
function Test_Function1(buf1,buf2: Pchar; size: integer): integer;cdecl;
begin
StrLCopy(buf2,Pchar(String(buf1)+'1111'),size);
Result:=1;
end;
???
У меня просо нет этой последней длл, чтобы попробовать. Но почему-то я очень сомневаюсь, что
Цитата:
с директивой STDCALL нельзя обратиться к Pascal-DLL
правда.