hi
i've had to make the following change to get the lcl to compile for
windows ce (fpc 2.2.3):
Index: lcl/include/fileutil.inc
===================================================================
--- lcl/include/fileutil.inc (revision 17031)
+++ lcl/include/fileutil.inc (working copy)
@@ -83,13 +83,13 @@
end;
function UTF8ToConsole(const s: string): string;
-{$ifdef Windows}
+{$ifdef MSWindows}
var
Dst: PChar;
{$endif}
begin
Result := UTF8ToSys(s);
- {$ifdef Windows}
+ {$ifdef MSWindows}
Dst := AllocMem((Length(Result) + 1) * SizeOf(Char));
if CharToOEM(PChar(Result), Dst) then
Result := StrPas(Dst);
this is because i don't think CharToOem exists for windows ce. i'm
not sure if this points to an underlying problem, though.
henry
_______________________________________________
Lazarus mailing list
[email protected]
http://www.lazarus.freepascal.org/mailman/listinfo/lazarus
