mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-26 07:08:14 +02:00
63 lines
3.3 KiB
PHP
63 lines
3.3 KiB
PHP
{ Include file for "Gradients" tests. Used by vtmain.pas. }
|
|
|
|
node := Tree.Items.AddChild(mainnode, 'horizontal');
|
|
Tree.Items.AddChildObject(node, 'Circle',
|
|
TRenderParams.Create(@Render_Shape, 'circle_gradienthor.png', $0101));
|
|
Tree.Items.AddChildObject(node, 'Ellipse',
|
|
TRenderParams.Create(@Render_Shape, 'ellipse_gradienthor.png', $0201));
|
|
Tree.Items.AddChildObject(node, 'Rectangle',
|
|
TRenderParams.Create(@Render_Shape, 'rect_gradienthor.png', $0301));
|
|
Tree.Items.AddChildObject(node, 'Rounded rectangle',
|
|
TRenderParams.Create(@Render_Shape, 'rounded_rect_gradienthor.png', $0401));
|
|
Tree.Items.AddChildObject(node, 'Polygon',
|
|
TRenderParams.Create(@Render_Shape, 'polygon_gradienthor.png', $0501));
|
|
|
|
node := Tree.Items.AddChild(mainnode, 'vertical');
|
|
Tree.Items.AddChildObject(node, 'Circle',
|
|
TRenderParams.Create(@Render_Shape, 'circle_gradientvert.png', $0102));
|
|
Tree.Items.AddChildObject(node, 'Ellipse',
|
|
TRenderParams.Create(@Render_Shape, 'ellipse_gradientvert.png', $0202));
|
|
Tree.Items.AddChildObject(node, 'Rectangle',
|
|
TRenderParams.Create(@Render_Shape, 'rect_gradientvert.png', $0302));
|
|
Tree.Items.AddChildObject(node, 'Rounded rectangle',
|
|
TRenderParams.Create(@Render_Shape, 'rounded_rect_gradientvert.png', $0402));
|
|
Tree.Items.AddChildObject(node, 'Polygon',
|
|
TRenderParams.Create(@Render_Shape, 'polygon_gradientvert.png', $0502));
|
|
|
|
node := Tree.Items.AddChild(mainnode, 'linear');
|
|
Tree.Items.AddChildObject(node, 'Circle',
|
|
TRenderParams.Create(@Render_Shape, 'circle_gradientlinear.png', $0103));
|
|
Tree.Items.AddChildObject(node, 'Ellipse',
|
|
TRenderParams.Create(@Render_Shape, 'ellipse_gradientlinear.png', $0203));
|
|
Tree.Items.AddChildObject(node, 'Rectangle',
|
|
TRenderParams.Create(@Render_Shape, 'rect_gradientlinear.png', $0303));
|
|
Tree.Items.AddChildObject(node, 'Rounded rectangle',
|
|
TRenderParams.Create(@Render_Shape, 'rounded_rect_gradientlinear.png', $0403));
|
|
Tree.Items.AddChildObject(node, 'Polygon',
|
|
TRenderParams.Create(@Render_Shape, 'polygon_gradientlinear.png', $0503));
|
|
|
|
node := Tree.Items.AddChild(mainnode, 'radial');
|
|
Tree.Items.AddChildObject(node, 'Circle',
|
|
TRenderParams.Create(@Render_Shape, 'circle_gradientradial.png', $0104));
|
|
Tree.Items.AddChildObject(node, 'Ellipse',
|
|
TRenderParams.Create(@Render_Shape, 'ellipse_gradientradial.png', $0204));
|
|
Tree.Items.AddChildObject(node, 'Rectangle',
|
|
TRenderParams.Create(@Render_Shape, 'rect_gradientradial.png', $0304));
|
|
Tree.Items.AddChildObject(node, 'Rounded rectangle',
|
|
TRenderParams.Create(@Render_Shape, 'rounded_rect_gradientradial.png', $0404));
|
|
Tree.Items.AddChildObject(node, 'Polygon',
|
|
TRenderParams.Create(@Render_Shape, 'polygon_gradientradial.png', $0504));
|
|
|
|
node := Tree.Items.AddChild(mainnode, 'radial off-center');
|
|
Tree.Items.AddChildObject(node, 'Circle',
|
|
TRenderParams.Create(@Render_Shape, 'circle_gradientradial_offc.png', $0105));
|
|
Tree.Items.AddChildObject(node, 'Ellipse',
|
|
TRenderParams.Create(@Render_Shape, 'ellipse_gradientradial_offc.png', $0205));
|
|
Tree.Items.AddChildObject(node, 'Rectangle',
|
|
TRenderParams.Create(@Render_Shape, 'rect_gradientradial_offc.png', $0305));
|
|
Tree.Items.AddChildObject(node, 'Rounded rectangle',
|
|
TRenderParams.Create(@Render_Shape, 'rounded_rect_gradientradial_offc.png', $0405));
|
|
Tree.Items.AddChildObject(node, 'Polygon',
|
|
TRenderParams.Create(@Render_Shape, 'polygon_gradientradial_offc.png', $0505));
|
|
|