Delphi VJ VB VC 討論 聯繫 首頁
DELPHI參考文件

 單元架構元件
 Pascal語言元件
 Standard元件
 Additional元件
 Win31元件
 Win32元件
 Dialog元件
 Dialog範例
 資料庫(上)
 資料庫(中)
 資料庫(下)
 報表製作
 鍵盤資料(上)
 鍵盤資料(中)
 鍵盤資料(下)

作品介紹

免費下載

廠商軟體


Win32元件頁

TrackBar元件

UpDown元件

Procedure TForm1.FormCreate(Sender: TObject);
begin
TrackBar1.Position:=0;
//開始位置TrackBar1.Max:=100; //最大量
TrackBar1.Min:=0; //最小量
TrackBar1.Frequency:=10; //刻度值
end;

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
Label1.Caption:=IntToStr(TrackBar1.Position);
end;

procedure TForm1.UpDown1Click(Sender: TObject; Button: TUDBtnType);
begin
Label1.Caption:=IntToStr(UpDown1.Position);
end;

 


ProgressBar

AniMate


procedure TForm1.FormCreate(Sender: TObject);
begin
ProgressBar1.Position:=0;
ProgressBar1.Max:=100;
ProgressBar1.Min:=0;
ProgressBar1.step:=10;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
       With ProgressBar1 Do
          If Position=Max Then
              Position:=0
          Else
              Position:=Position+1;
Label1.Caption:=IntToStr(ProgressBar1.Position);
end;


CommonAVI屬性選擇動畫


要使動畫動起來Active屬性設為True

 


DateTimePicker

MonthCalender

Kind設定顯示為日期或時間
DateFormat設定顯示日的格式

 


HeaderCtrol

HeAderCtrl與Win3.1元件頁中Header元件不同的是多了動態調整寬度的功能,


本網頁由昱得資訊工作室製作(C) Copyright Valor-Studio since in 1993

 

本網站全部內容係屬【昱得資訊工作室】版權所有,轉載必究,
非經正式書面同意,不得將全部或部分內容,以任何方式轉載於其他網站或用於任何商業行為