Hi John,
A TLabel with Caption:='Abc' and Canvas.TextOut(1,1,'Abc') gives
exactly the same output.
I've tried it in KOL and it works perfectly. I really like the small
size of the exe, but I want my software to work with LCL. Eventually I
want to port half a million lines of Delphi code and deploy on Linux,
Mac, etc. Right now I just need to draw a diagram in WinCE which
includes text...
Regards,
Paul.
John vd Waeter wrote:
Paul van Helden wrote:
Hi All,
I'm new to Lazarus having decided to switch from Delphi for a WinCE
project. I'm stumped though. Labels on forms display garbage characters.
Having spent a whole two days learning about Lazarus internals, Unicode,
Widestrings, etc., I'm now pulling out my hair and the project cannot
continue.
The following code produces the same "garbage characters":
procedure TGPSForm.SatellitePaintBoxPaint(Sender: TObject);
var
Rect: TRect;
Dx: Integer;
W: WideString;
begin
with SatellitePaintBox do
begin
Rect:=ClientRect;
W:='Abc';
Windows.ExtTextOutW(Canvas.Handle, 1, 1, 0, LPRECT(@Rect),
PWideChar(W), Length(W), @Dx);
end;
end;
Any ideas?
Hmm,
Dunno, I use KOL without major problems.
But what is output when you try:
with SatellitePaintBox do
begin
Canvas.Textou(1,1,'Abc');
end;
?
John
_______________________________________________
Lazarus mailing list
[email protected]
http://www.lazarus.freepascal.org/mailman/listinfo/lazarus
|
_______________________________________________
Lazarus mailing list
[email protected]
http://www.lazarus.freepascal.org/mailman/listinfo/lazarus
