<div dir="ltr"><div><div>May you also check the DefaultSystemCodePage value<br><br></div>and StringCodePage(wParam) before and after assigning wParam<br><br></div>Luiz<br></div><div class="gmail_extra"><br><div class="gmail_quote">2015-02-19 8:02 GMT-03:00 luiz americo pereira camara <span dir="ltr"><<a href="mailto:luizmed@oi.com.br" target="_blank">luizmed@oi.com.br</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><br><div class="gmail_extra"><br><div class="gmail_quote">2015-02-19 5:30 GMT-03:00 FreeMan <span dir="ltr"><<a href="mailto:freeman35@delphiturkiye.com" target="_blank">freeman35@delphiturkiye.com</a>></span>:<span class=""><br><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">
<div bgcolor="#FFFFFF" text="#000000">
osx fpc & lazarus svn QT x64<br>
my project's Compiler options has<br>
-FcUTF8<br>
-dEnableUTF8<br>
<br>
this is my code: this code work normal without ut8 params<br>
<br>
const<br>
WIN_EXE: String = 'MZ';<br>
LINUX_EXE: String = #127 + 'ELF';<br>
var<br>
wFileStr: TFileStream;<br>
ar: array[0..4] of byte;<br>
ExecType: char;<br>
wProgram := ParamStrUTF8(0);<br></div></blockquote><div><br></div></span><div><br>What type is wParam?<br><br>Can you check the return value of the below procedure when passing wParam with and without -FcUTF8?<br><br>function StrToHex(const S: RawByteString): String;<br>var<br> i: Integer;<br>begin<br> Result := '';<br> if S = '' then<br> Exit;<br> for i := 1 to Length(S) do<br> begin<br> Result := Result + IntToHex(Byte(S[i]), 0);<br> end;<br>end;<br><br></div><div>Luiz<br></div></div></div></div>
</blockquote></div><br></div>