To"拖動(dòng)"在鼠標(biāo)移動(dòng)時(shí)按住計(jì)算機(jī)鼠標(biāo)按鈕，然后釋放按鈕以放下對(duì)象。Delphi可以輕松編程拖動(dòng)和丟棄到應(yīng)用程序中。 您可以在您喜歡的任何地方拖動(dòng)，例如從一種形式到另一種形式，

//這是在 System 單元定義的一組標(biāo)識(shí)數(shù)據(jù)類型的常量:
vtInteger = 0;
vtBoolean = 1;
vtChar = 2;
vtExtended = 3;
vtString = 4;
vtPointer = 5;
vtPChar = 6;
vtObject =

數(shù)組竟然可以這樣定義
//這是常規(guī)思路:
const
arr: array[0..1] of Char = ('A','B');
begin
ShowMessage(arr); {AB}
ShowMessage(IntToStr(Length(arr)))

動(dòng)態(tài)數(shù)組的釋放
//動(dòng)態(tài)數(shù)組一般是不需要手動(dòng)釋放的, 如果需要...
var
arr: array of Integer;
begin
{設(shè)置動(dòng)態(tài)數(shù)組維數(shù)}
SetLength(arr,10);

{釋放方法一}
arr := nil;

{

數(shù)組與子界
type
TABC = 'A'..'G'; {定義子界}
var
abcArr: array[TABC] of Integer; {定義數(shù)組}
abc: TABC; {定義子界變量}
begin
{數(shù)組賦值}
abcArr[&#3

數(shù)組與枚舉
type
TMyEnum = (Monday,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday); {定義枚舉}
var
weekArr: array[TMyEnum] of string; {定義數(shù)組}
myEnum: TMyEn

變體數(shù)組
var
Arr: array[0..3] of Variant;
begin
Arr[0] := 123;
Arr[1] := 'wy';
Arr[2] := True;
Arr[3] := VarArrayOf([1,'wanyi',1.5]); //變體數(shù)組

動(dòng)態(tài)數(shù)組的使用
//例1:
var
StrArr: array of String; //動(dòng)態(tài)數(shù)組定義時(shí)不與維數(shù)
begin
SetLength(StrArr,6); //分配6個(gè)元素位置: 0-5
StrArr[0] := '萬一'; //動(dòng)