pascalabcnet/InstallerSamples/Graphics/WPFObjects/gr_Star_Rotate_WPF.pas
Mikhalkovich Stanislav bd52663612 Invoke -> Redraw в GraphWPF и WPFObjects
With... ->Set... в  WPFObjects
Конструкторы с шириной и цветом границы в  WPFObjects
Несколько примеров в WPFObjects
2019-08-05 00:23:28 +03:00

17 lines
348 B
ObjectPascal

// Изменение свойств объекта StarWPF
uses WPFObjects, GraphWPF;
begin
var z := new StarWPF(Window.Width / 2, Window.Height / 2, Window.Height / 2 - 5, Window.Height / 4 + 16, 6, Colors.Red);
loop 20 do
begin
Sleep(100);
z.Count += 1;
end;
loop 200 do
begin
Sleep(10);
z.Rotate(1);
end;
end.