Additional元件頁
圖示 |
元件名稱 |
功能說明 |
|
BitBtm |
圖形按鈕元件 |
|
SpeedButton |
快速按鈕元件 |
|
MaskEdit |
可遮罩的Edit元件 |
|
StringGride |
格子式字串顯示元件 |
|
DrawGrid |
格子式圖形顯示元件 |
|
image |
圖形顯示元件 |
|
Shape |
圖形產生元件 |
|
Bevel |
外框式Panel元件 |
|
ScrollBox |
捲動式Panel元件 |
|
CheckListBox |
提供選項式的清單元件 |
|
Splitter |
分隔線元件 |
|
StaticText |
多樣式的Text元件 |
|
|
|
|
Chart |
圖表製作元件 |
 BitButton與SpeedButton：
此兩者除具有Button元件的特性外還可以加入元件與圖示，同時SpeedBbutton還具備有群組規劃能力
 BitButton常用屬性
屬性 |
屬性值 |
說明 |
| Glyph |
|
設定按鈕圖示 |
| Layout |
BLGlyphLeft |
圖示出現在按鈕的左邊 |
 |
| BLGlyphRight |
圖示出現在按鈕的右邊 |
| BLGlyphTop |
圖示出現在按鈕的上方 |
| BLGlyphBotton |
圖示出現在按鈕的下方 |
| Margin |
|
調整圖示與元件邊界的距離 |
| Kind（BitButton預設圖示） |
BkCustom |
使用者自訂圖示 |
 |
| BkOK |
確定按鈕圖示 |
| BkCancel |
取消按鈕圖示 |
| BkYes |
接受按鈕圖示 |
| BkNo |
取消按鈕圖示 |
| BkHelp |
求助按鈕圖示 |
| BkClose |
關閉按鈕圖示 |
| BkAbort |
關於按鈕圖示 |
| BkRetry |
重試按鈕圖示 |
| BkIgnore |
繼續按鈕圖示 |
| BkAll |
所有按鈕圖示 |
SpeedButton常用屬性
| 屬性 |
說明 |
| AllowAllUp |
讓同一群組中每個SpeedButton元件恢復沒有選取狀態 |
| Down |
設定是否被按下 |
| Glyph |
同BitButton |
| Group Index |
設定多個按鈕為群組 |
|
此為在程式敘述中設定
Begin
SpeedButton1.GroupIndex:=1;
//三個一組
SpeedButton2.GroupIndex:=1;
SpeedButton3.GroupIndex:=1;
SpeedButton4.GroupIndex:=2; //兩個一組SpeedButton5.GroupIndex:=2;
End; |
StringGridm元件：資料輸出元件（矩陣型式）
常用屬性
| 屬性 |
屬性值 |
說明 |
| ColCount |
|
設定行數 |
| RowCount |
|
設定列數 |
| FixedCols |
|
設定標題行行數 |
| FixedRows |
|
設定標題列列數 |
| DefaultColWidth |
|
設定行寬 |
| DefaultRowWidth |
|
設定列高 |
| Option |
goFixedHorzLine |
顯示資料項與標題列之間的水平線 |
| goFixedVerLine |
顯示資料項與標題行之間的垂直線 |
| goHorzLine |
顯示在資料項內的水平線 |
| goVerLine |
顯示在資料項內的垂直線 |
| goRangeSelect |
允許使用滑鼠同時選取多個資料項 |
| goDrawFocusSelected |
同時選取多個資料項時，第一個資料項反白 |
| goRowSizing |
允許使用滑鼠改變列高 |
| goColSizing |
允許使用滑鼠改變行寬 |
| goRowMoving |
允許使用滑鼠搬移資料列 |
| goColMoving |
允許使用滑鼠搬移資料行 |
| goEditing |
允許直接在資料項上輸入資料，此模式無法使用滑鼠同時選取多個資料項 |
| goAlwaysShowEditor |
當goEditing為true時，此屬性頁自動設為true，且再滑鼠選擇某個資料項時，會自動產生游標等待輸入，如果goAlwaysShowEditor設為False則滑鼠選擇某個資料項時，需按下【Enter】方能產生游標等待輸入 |
| goTabs |
允許使用【Tab】與【Shift】+【Tab】鍵在資料項上移動游標 |
| goRowSelect |
在某資料項上按一下滑鼠可以選取整列但不可與goRangeSelect同時設定 |
| goThumbTracking |
如果是true，按住捲動軸捲動時，Grid也會跟著捲動，反之，按住捲動軸捲動時必須放開捲動軸Grid才會跟著捲動 |
 
五行五列（含標題行、列各一）
|
procedure TForm1.StringGrid1Click(Sender: TObject);
var a,b:Integer;x,y:String;
begin
for a:=0 to StringGrid1.Colcount-1 do
for b:=0 to StringGrid1.Rowcount-1 do
Begin
x:=IntToStr(a); //將資料轉成字串型態
y:=IntToStr(b);
StringGrid1.Cells[a,b]:=x+','+y; //寫入資料要使用屬性Cells
End;
end; |
ScrollBox類似Panel唯一種嵌入元件，但它可隨嵌入元件的大小改變而出現捲動軸改變顯示範圍
常見屬性
| 屬性 |
說明 |
| HorzScrollBar |
水平捲動軸設定 |
| VertScrollBar |
垂直捲動軸設定 |
| Increment |
在捲動軸兩端箭頭上click時，所應該加或減的值 |
| Position |
目前定位鈕所在位置的值 |
| Range |
捲動軸捲動的範圍 |
 
|
procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Font.Size:=Label1.Font.Size+4;
end;procedure TForm1.Button2Click(Sender: TObject);
begin
Label1.Font.Size:=Label1.Font.Size-4;
end; |
Splitter元件：用來調整Panel元件的大小，間接改變視窗大小
Splitter元件預設的Align屬性為alLeft（靠左）
實作：
 |
建立順序由上而下，由左而右 |
| 物件 |
屬性 |
屬性值 |
| Panel1 |
Align |
alTop |
| Splitter1 |
Align |
altop |
| Panel2 |
Align |
alLeft |
| Splitter2 |
Align |
alLeft |
| Panel3 |
Align |
alClient |
CheckListBox與StaticText元件
CheckListBox元件是由CheckBox所組成的清單元件，就是將ChevkBox以清單方式列出來
StaticText元件類似Label元件，只是他多了一個BorderStyle屬性來設定外框
| 元件 |
屬性 |
說明 |
| CheckListBox |
Columns |
設定每列可容納多少選項 |
| Items |
在此屬性欄按下按鈕，即出現String
List Edit視窗可供設定CheckListBox中各個項目 |
| StaticTex |
BorderStyle |
設定外框 |
  |
var a:String; //宣告變數 procedure
TForm1.CheckListBox1Click(Sender: TObject);
begin
WITH CheckListBox1 do
case ItemIndex of //利用ItemIndex屬性來判斷選取項
0:a:=a+'WORD'+',';
1:a:=a+'EXCEL'+',';
2:a:=a+'POWERPOINT'+',';
3:a:=a+'OUTLOOK'+',';
4:a:=a+'DELPHI'+',';
5:a:=a+'VB'+',';
6:a:=a+'JAVA'+',';
END;
StaticText1.Caption:=a;
end; |
Chart元件：圖表製作元件
設計階段製作
加元件於表單中 Chart元件上單擊滑鼠右鍵
選取【Edit Chart】
按Add加入圖表 選擇圖表樣式 Close【圖一】
RUN後卻沒有圖表【圖二】
利用程式碼來加入數列物件
對照圖
圖一
|
圖二
|
以程式碼加入數列
Add屬性的各個參數分別代表【量】、【標題】、【顏色】
Count屬性為數列的數量
 |
procedure TForm1.FormCreate(Sender: TObject);
var
Total:Integer;
begin
Total:=0;
Series1.add(90,'英文',clRed);
Series1.add(80,'國文',clBlue);
Series1.add(75,'數學',clGreen);
Total:=90+80+75;
Series1.add(Total/Series1.Count,'平均',clYellow);
end; |
本網頁由昱得資訊工作室製作(C)
Copyright Valor-Studio since in 1993
|
麻辣學園
Office學園
昱得資訊
Delphi
VJ
VB
VC
討論
聯繫
首頁
DELPHI參考文件
免費下載
廠商軟體