1樓:匿名使用者
這個可以找控制項,或者自己畫乙個。
2樓:匿名使用者
你在網上找下吧。很easy的。
delphi做時鐘程式,分鐘和小時刻度怎麼新增?
3樓:網友
我係統裡找的,希望幫到你。
procedure : tobject);
varmynow : tdatetime;
hour, min, sec, msec : word;
vh, vm, vs : real;
beginmynow := now;
decodetime(mynow,hour,min,sec,msec);
vh := hour/;
vm := min/;
vs := sec/;
with canvas dobegin
clblack;
moveto(60,60);
lineto(60+round(25*sin(vh)),60-round(25*cos(vh)))
clblack;
moveto(60,60);
lineto(60+round(45*sin(vm)),60-round(45*cos(vm)))
clred;
moveto(60,60);
lineto(60+round(55*sin(vs)),60-round(55*cos(vs)))
end;end;
4樓:網友
換個思路 分鐘刻度相當於 圓周的1/60 你用乙個迴圈就搞定了 為啥每個刻度都要公式呢?
5樓:網友
你的刻度是繪製的啊,那樣效果肯定不會好,因為是按照畫素點顯示的,而且座標值也是取的近似值,實在不行可以搞個**嘛。
在delphi介面上同步顯示系統時間怎麼弄啊?
6樓:匿名使用者
在form上放乙個timer控制項,在其事件**中取系統時間,並將時間串顯示到乙個標籤上。
delphi程式裡日期時間怎麼控制
7樓:網友
請說明具體需要,要拿時間來做什麼,還是說只是為了顯示下時間,如果只是為了標籤上顯示下時間的話,:=now;
8樓:
問題太抽象了,能否詳細點?
怎樣用Sesson做乙個購物車
一 建立購物車類 cartitem 屬性 商品類物件,商品數量。二 建立新增商譽搭品至購物車的servlet新增步驟 .在servlet中取出session 慶虛遲 httpsession session .用取出的session取出儲存的購物車物件 cartitem .判斷購物車物件是否為null...
怎樣用筷子搭支架怎樣用筷子做乙個穩固的正方形框架
方案一1 先用5根竹筷子捆成乙個稜形,就是有共同邊的兩個等邊三角形,做為基礎拉梁。2 再用6根竹筷子做兩個三角形支架,底根捆紮在底部稜形的4個頂點上,注意稜形短對角線每一頂點捆紮的2根竹筷子是分向兩邊的。3 最後的1根竹筷子與兩個三角形支架的頂點相聯捆紮在一起。優點 結構好 牢固。缺點 承重樑只一根...
怎樣用c建立簡單程序怎樣用c建立乙個簡單程序
include int main 用createprocess 用法見msdn 以下迴圈開啟記事本 startupinfo startupinfo startupinfo.cb sizeof startupinfo process information process info for int i...