کامپونت ساعت انالوگ [بایگانی]

rezaie_s

شنبه 03 مهر 1389, 17:40 عصر

سلام به دوستان
کسی کامپونت ساعت انالوگ خوشگل داره
داشته باشه؟
ممنون

hossein_h62

یک شنبه 04 مهر 1389, 12:17 عصر

سلام
در مجموعه JEDI-VCL یه ساعت آنالوگ هست از اون استفاده کنید.

bootshow

سه شنبه 06 مهر 1389, 12:33 عصر

پکیج Tms کنترل AdvTimePickerDropDown داره که چند نمونه ساعت داره.
میتونی یونیت AdvTimePickerDropDown را به فرم اضافه کنی و شی ساعت در زمان اجرا به برنامت اضافه کنی.
watch:TAdvWatch;
watch:=TAdvWatch.Create(pnlclock);
watch.Align:=alClient;
watch.Parent:=pnlclock;
watch.Left:=0;
watch.Top:=0;
watch.Height:=pnlclock.Height;
watch.Width:=pnlclock.Width;
watch.SetComponentStyle(tsOffice2007Silver);
watch.Settings.Auto:=True;
watch.Appearance.AMPMFrame:=apRoundRect;
watch.Appearance.AMPMFont.Size:=6;
watch.Appearance.Shape:=wsRoundRect;