PureBasic Forums - English

Posted: **Sat Nov 01, 2008 3:54 pm**

here is my work on cairo , i have updated the package to version 1.10
only for windows.
not all the lib is ported. because i une pango for rendering text,glyph...etc

the cairo website : http://www.cairographics.org

here is the package for cairo 1.10: http://www.4shared.com/file/ed03PUDJ/cairo.html

not forget to place an image png in the folder (without this the test code not work properly)

happy new year.

Posted: **Sat Nov 01, 2008 6:04 pm**

This is just very cool ! Thanks for sharing it.

Posted: **Sat Nov 01, 2008 6:36 pm**

Neat

Thanks for sharing this with us.

Posted: **Sat Nov 01, 2008 7:15 pm**

thanks guys,
note please that i haven't tested all the functions be carful when using it.

here is an other example a nice effect (at my point of view)for splash window without using any image

Code: Select all

XIncludeFile "cairo180.pbi"

  Procedure splash_background(win.i)
  
    Protected cr, pat
    
    cr = GetProp_(WindowID(win),"context")
    
    pat = cairo_pattern_create_linear (0.0, 0.0,  0.0, 256.0)
    cairo_pattern_add_color_stop_rgba (pat, 1, 0.9, 0.65, 0.42, 1)
    cairo_pattern_add_color_stop_rgba (pat, 0, 0.9, 0.8, 0.42, 1)
    cairo_rectangle (cr, 0, 0, WindowWidth(win),WindowHeight(win))
    cairo_set_source (cr, pat)
    cairo_fill (cr)
    cairo_pattern_destroy (pat)
   
    pat = cairo_pattern_create_radial (115.2, 202.4, 25.6, 102.4,  102.4, 128.0);
    cairo_pattern_add_color_stop_rgba (pat, 0, 1, 1, 1, 0.4);
    cairo_pattern_add_color_stop_rgba (pat, 1, 1, 1, 1, 0.1);
    cairo_set_source (cr, pat);
    cairo_arc (cr, 128.0, 128.0, 176.8, 0, 2 * #M_PI);
    cairo_fill (cr);
    cairo_pattern_destroy (pat)
            
  EndProcedure 
  
  
Global rr.RECT, ps.PAINTSTRUCT  
  
If OpenWindow(0,0,0,400,300,"",#PB_Window_BorderLess | #PB_Window_ScreenCentered)
  
  su = cairo_win32_surface_create(GetDC_(WindowID(0))) 
  cr = cairo_create(su)
  
  SetProp_(WindowID(0),"surface",su)
  SetProp_(WindowID(0),"context",cr)

  splash_background(0)

Repeat
 events = WaitWindowEvent()

 
 Select events
  Case #WM_ERASEBKGND : InvalidateRect_(WindowID(0),@rr,#False)
 
  Case #WM_PAINT 
   BeginPaint_(WindowID(0), @ps)
    splash_background(0)
   EndPaint_(WindowID(0), @ps)
  
  Case #PB_Event_CloseWindow  
   quit = 1
  ; destroy our surface and cairo context
  cairo_surface_destroy(su) 
  cairo_destroy(cr)
 EndSelect 

  
 Until quit = 1

 EndIf  
 
 End

Posted: **Sat Nov 01, 2008 7:30 pm**

Zajakallahoukhair

Posted: **Sat Nov 01, 2008 7:57 pm**

merci mon vieux.

Posted: **Sat Nov 01, 2008 11:59 pm**

Thank you!

Posted: **Sun Nov 02, 2008 12:34 am**

Thanks,

Posted: **Fri Nov 21, 2008 2:28 am**

looks very useful thanks

Posted: **Fri Dec 05, 2008 2:58 pm**

So very cool. I like it. Thank you very much.

Posted: **Sat Dec 06, 2008 4:22 pm**

Thanks, even if I am not abled this time (because still running 64 Bit Linux, will change) to try it.

Posted: **Sun Dec 06, 2009 1:06 pm**

File dead

, can upload "cairo180.pbi"? Thanks...

Posted: **Tue Mar 09, 2010 12:38 am**

Hi!

I'm looking for this lost include-file. Is anybody out there who's still having it? Would be very helpful ...

Thanks in advance! =)

Posted: **Tue Mar 09, 2010 8:24 am**

And with this include : http://code.google.com/p/rwrappers/sour ... runk/Cairo ?

Posted: **Tue Mar 09, 2010 10:12 am**

Here is a copy of the lib:

http://ɯoɔ.com/downloads/cairo.zip

PureBasic Forums - English

cairo lib update : version 1.10

cairo lib update : version 1.10

Re: cairo lib

Re: cairo lib

Re: cairo lib

Re: cairo lib