var p: PWideChar;
s: string;
s:='type a bit of text';
p := s;
pwidechar
кто знает как перевести из string в pwidechar?
примерно так
Код:
var
pwdstr:pwidechar;
str:string;
wch:=pwidechar(str);
pwdstr:pwidechar;
str:string;
wch:=pwidechar(str);
to ahilles
НЕа делфя будет ругаться
[Warning] Unit1.pas(31): Suspicious typecast of String to PWideChar
юзай
НЕа делфя будет ругаться
[Warning] Unit1.pas(31): Suspicious typecast of String to PWideChar
юзай
Код:
procedure OleStrToStrVar(Source: PWideChar; var Dest: string);
Цитата: Sania
НЕа делфя будет ругаться
а вот BDS2006 вполне кушаеть код.