Проблемы с DLL, Delphi 6 и Windows XP

← →
LeO U (2003-02-23 13:21) [0]

Использую не свою DLL с функцией, возвращающей PChar. Компилирую в Delphi 5 - все работает. Компилирую в Delphi 6 - на Win 9x работает, на Win XP возвращается какое-то дикое значение. Помогите! Нужен именно Delphi 6.

← →
ION T © (2003-02-23 15:57) [1]

Код

← →
Leo U (2003-02-23 16:27) [2]

unit aaa;
interface
function DecryptStr (EInput, EKey: PChar): PChar; stdcall;
implementation
function CryptStr; external "crypt.dll";
end.
...
program bbb;
...
PChar1 := DeCryptStr (PChar2, PChar3);
или
PChar1 := DeCryptStr (PChar (String2), PChar2);
или
String1 := DeCryptStr (PChar (String2), PChar1);

все равно возвращаемое значение - в Delphi 5 типа "Вася"; в Delphi 6 типа #14 (только на Win XP !)

← →
Юрий Зотов © (2003-02-23 16:33) [3]

Возможно, это из-за Unicode. Попробуйте переопределить тип на PWideChar.

← →
Leo U (2003-02-23 16:48) [4]

Мужики, получилось :-)))!!!

Проблемы с DLL, Delphi 6 и Windows XP Найти похожие ветки