On Mon, 08 May 2006 23:11:10 +0200
darekm <[EMAIL PROTECTED]> wrote:
> repaired patch
>
>
>
> >On Sun, 07 May 2006 00:28:23 +0200
> >darekm <[EMAIL PROTECTED]> wrote:
> >
> >
> >
> >>Hi
> >> My patch
> >> works better with size of font and font with XLFD name (see Tony Maro
> >
> >>mail)
> >> distinguish GTK1 from GTK2 on utf8 draw text
> >> better works with color
> >>
> >>
> >
> >About:
> >+ if (aSize=0) then FullString:='10'
> >+ else FullString:=IntToStr(aSize);
> >
> >The 10 is not the default size. Please add always a comment that it is a
> >ToDo to fetch the default font size.
> >
> >
> I don't understand what I should done, please modify it
>
> >
> >About:
> >+function TGTK2WidgetSet.FontCanUTF8(Font: HFont): boolean;
> >+begin
> >+ Result:=IsValidGDIObject(Font) and
> >+
> >FontIsDoubleByteCharsFont(gdk_font_from_description(PGdiObject(Font)^.GD
> >IFo ntObject));
> >+end;
> >
> >This is a mem leak. see gdk_font_from_description.
> >
> >
> removed
>
>
> >
> >About:
> >- aSize := StrToIntDef(ExtractXLFDItem(LongFontName,
> >XLFD_POINTSIZE),12); + aSize :=
> >StrToIntDef(ExtractXLFDItem(LongFontName, XLFD_POINTSIZE),0) div 10;
> >
> >Why is the size now ten times as big?
Applied. Thanks.
Mattias
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives