Рисование окружности

[Kitty]

Здравствуйте.
Мне надо нарисовать окружность с жирной обводкой и цифрой посередине. Цифру сделать легко – просто метка поверх окружности. Мне нужна окружность не сразу – она должна появиться постепенно рисованием дуги из ничего до полного замыкания (пример на картинке). Каков правильный путь реализации этого? Речь идет для андроида.
Спасибо.

 

[krapotkin]

где-то видел реализацию через TPath, меняя там pathData

[Rusland]

Наверное с помощью TPie можно сделать.

Тут что-то подобное, правда картинок уже нет, но есть код )

http://www.vr-online.ru/blog/daesh-fmx-firemonkey-v-massy-9147

 

Изменено 12 апреля, 2016 пользователем Rusland

[Кирилл]

Можно использовать TArc, изменяя свойство EndAngle.

[Rusland]

30 минут назад, Кирилл сказал:

Можно использовать TArc, изменяя свойство EndAngle.

Кстати да, он более подходящий 

[Kitty]

Большое спасибо!

 

Изменено 13 апреля, 2016 пользователем Kitty

[Rusland]

Ну в данном случае, думаю, не сложно вместо точек ставить ->, в остальном все также

[Rusland]

Как-то так

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.fmx"
TForm1 *Form1;
int c=0;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
	c=c+20;
	Arc1->EndAngle=c;
	if (c<90)       {Text1->Text="4";}
	else if (c<180) {Text1->Text="3";}
	else if (c<270) {Text1->Text="2";}
	else if (c<360) {Text1->Text="1";}
	else if (c==360) {Timer1->Enabled=False;Text1->Text="0";c=0;}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
	Arc1->EndAngle=0;
	Timer1->Enabled=true;
}
//---------------------------------------------------------------------------

 

ArcTimer.zip