Wir sind uns einig, dass das komisch aussieht. Vielleicht doch UTF-16?
Delphi-Quellcode:
function readLogMessage(var logMessage: pChar;
var logMessageLength:Integer):integer;stdcall;external 'fremdedll.dll';
Delphi-Quellcode:
var
msg: pChar;
ergebnis: integer;
msgLength: integer;
str : String;
begin
ergebnis := readLogMessage(msg, msgLength);
memo1.lines.add(inttostr(msgLength));
SetString(str, msg, msgLength);
ShowMessage(str);
end;