Forum: Object-Pascal / Delphi-Language
Delphi
by WojTec,
20. Jun 2011
Thanks guys, you helped me so much! :D
Forum: Object-Pascal / Delphi-Language
Delphi
by WojTec,
19. Jun 2011
library StringDLL;
uses
SysUtils;
function Foonction(Data: PWideChar; Buffer: PWideChar; lenBuffer: Cardinal): Cardinal; stdcall;
var
S: string;
begin
S := 'foo' + Data;
Forum: Object-Pascal / Delphi-Language
Delphi
by WojTec,
19. Jun 2011
Code (function from @Luckie article).
library StringDLL;
uses
SysUtils;
function func1(s: PWideChar; Buffer: PWideChar; lenBuffer: Integer): Integer; stdcall;
var
foo: String;
Forum: Object-Pascal / Delphi-Language
Delphi
by WojTec,
19. Jun 2011
I tested @Luckies code and it working in example, but don't work in this case:
function func1(s: PChar; Buffer: PChar; lenBuffer: Integer): Integer; external 'StringDLL.dll';
var
Buffer: array of Char;
BufferSize: DWORD;
begin
BufferSize := High(Buffer);
Forum: Object-Pascal / Delphi-Language
Delphi
by WojTec,
17. Jun 2011
Thanks @Luckie!
Can I ask for example how to use functions @himitsu listed? Or just use WideString as Delphi's string?