dannym wrote:
Hi,

attached something I keep changing back and forth. Is the current
version of the gtk2 freepascal bindings using the one or the other
syntax ? If that is the new one, please apply :)

If not, uhmm... *confused* :)

cheers,
   Danny



------------------------------------------------------------------------

Index: lcl/interfaces/gtk/gtkobject.inc
===================================================================
--- lcl/interfaces/gtk/gtkobject.inc    (Revision 8076)
+++ lcl/interfaces/gtk/gtkobject.inc    (Arbeitskopie)
@@ -6024,10 +5887,10 @@
           
gdk_gc_set_line_attributes(GC,GDIPenWidth,GDK_LINE_ON_OFF_DASH,GDK_CAP_NOT_LAST,GDK_JOIN_MITER);
           case GDIPenStyle of
             {$If defined(GTK2) and defined(VER2_0_0)}
                                      ^^^^^^^^^^^^^^^^^

This can never happen for newer version of gtk2. You only get here if you have a fpc 2.0.0 and thus a gtk2 for this version. If you have a newer version of the gtk2 headers, don't use a fpc 2.0.0 to compile it.

This patch should *not* be applied !

Marc


-            PS_DASH:       SetDashes([#4,#4]);
-            PS_DOT:        SetDashes([#2,#2]);
-            PS_DASHDOT:    SetDashes([#4,#2,#2,#2]);
-            PS_DASHDOTDOT: SetDashes([#4,#2,#2,#2,#2,#2]);
+            PS_DASH:       SetDashes([4,4]);
+            PS_DOT:        SetDashes([2,2]);
+            PS_DASHDOT:    SetDashes([4,2,2,2]);
+            PS_DASHDOTDOT: SetDashes([4,2,2,2,2,2]);
             {$Else}
             PS_DASH:       SetDashes([4,4]);
             PS_DOT:        SetDashes([2,2]);

_________________________________________________________________
    To unsubscribe: mail [EMAIL PROTECTED] with
               "unsubscribe" as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives

Reply via email to