Under Windows (XP SP3) the Version page of Lazarus' About dialog does not display correctly, with 'Lazarus' text obscuring 'Free Pascal' (see attached screenshot).
By amending the OnPaint method of the PaintBox1 control in \lazarus\ide\aboutfrm.pas
as follows:
procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
with PaintBox1.Canvas do
begin
Font.Color:= RGBToColor(63,97,197);
Font.Size:= 14; // Font.Size:= 16;
TextOut(66,0, 'Free Pascal'); // TextOut(55,0, 'Free Pascal');
Font.Size:= 24; // Font.Size:= 36;
Font.Style:= [fsBold];
TextOut(51,20, 'Lazarus'); // TextOut(5,10, 'Lazarus');
Brush.Color:= clRed;
Pen.Color:= clRed;
Rectangle(60,63,170,81);
Font.Color:= clWhite;
Font.Size:= 10;
TextOut(90,63, 'Project');
end;
end;the page displays correctly in Windows.
Presumably the developer of this bit of the ide tried it on his Mac or Linux system and it displayed OK as coded in the repository.
Is there a cross-platform way to code such fancily formatted strings which would ensure they are centred and non-overlapping and so avoid altogether the need to hard-code pixel positions and text lengths?
yours
Howard
-------------- next part --------------
A non-text attachment was scrubbed...
Name: About.JPG
Type: image/jpeg
Size: 21649 bytes
Desc: not available
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus/attachments/20091102/94610994/attachment-0001.jpe>
