Wer ist online?
Buchempfehlung
FreeBASIC-Chat
FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!fb:porticula NoPaste
3D Effekt mit Hintergrundbild (Pixelgrafik) und Loten (GooData-Beispiel)
| Uploader: |  TJF |
| Datum/Zeit: | 21.04.2012 20:01:32 |
Hinweis: Dieser Quelltext ist Bestandteil des Projekts GooData, zu dem es auf FreeBASIC-Portal.de eine Projektseite gibt.
' This is file ex_3d_perpens.bas
'
' Licence: GPLv3
' (C) 2012 Thomas[ dot ]Freiherr[ at ]gmx[ dot ]net
VAR root = goo_canvas_group_new(Glob, _
"line_width", line_group, _
NULL)
VAR title = goo_canvas_text_new(root, _
"<span size=""xx-large"">"_
"3D Effect, Perpendiculars, Background Pixbuf" _
!"</span>\n", _
0.0, 0.0, W, GOO_CANVAS_ANCHOR_SW, _
"font", "Purisa Bold Italic", _
"use_markup", TRUE, _
"alignment", PANGO_ALIGN_CENTER, _
NULL)
VAR pixbuf = gdk_pixbuf_new_from_file("FreeBasic.png", 0)
VAR grid = goo_canvas_rect_new(root, _
0.0, 0.0, W, H, _
"stroke_color", "yellow", _
"fill_color", "lightyellow", _
"line_width", line_group, _
NULL)
VAR image = goo_canvas_image_new(root, _
pixbuf, _
0.0, 0.0, _
"width", W, _
"height", H, _
"scale-to-fit", TRUE, _
NULL)
VAR x = goo_axis_new(root, grid, Tx, GOO_AXIS_SOUTH, _
"stroke_color", "yellow", _
"fill_color", "yellow", _
"offset", "25 27", _
"borders", "-3.3 3.3", _
"tick_length", "0.01", _
"tick_angle", -30.0, _
"ticks", "1", _
NULL)
goo_axis_set_ticks_properties(x, _
"stroke_color", "black", _
NULL)
goo_axis_set_text_properties(x, _
"fill_color", "black", _
NULL)
VAR y = goo_axis_new(root, grid, Ty, GOO_AXIS_EAST, _
"stroke_color", "yellow", _
"fill_color", "yellow", _
"offset", "25 -27", _
"text_offset", 7., _
"borders", "-1.15 1.15", _
"ticks", ".5", _
"tick_length", "0.01", _
"tick_angle", -30.0, _
NULL)
goo_axis_set_ticks_properties(y, _
"stroke_color", "black", _
NULL)
goo_axis_set_text_properties(y, _
"fill_color", "black", _
NULL)
VAR zz = goo_curve_new(root, x, y, Dat, 0, 2, 0, _
"stroke_color", "green", _
"perpendiculars", "C1", _
NULL)
goo_curve_set_perpens_properties(zz, _
"stroke_color_rgba", &hC0C0C090, _
NULL)
VAR z = goo_curve_new(root, x, y, Dat, 0, 1, 0, _
"stroke_color", "red", _
NULL)
goo_canvas_item_set_simple_transform(root, W / 2, h / 2, 1.0, 30.0)