  Delphi 4 Աд׼ָ
                               Ȩ 1998 Xavier Perched Steve Teiseira

һ
ͨԴʽ
2.1 
2.2 ҳ߿ո
2.3 Begin...End 
Object Pascal
3.1 
3.2 ֺ͹ؼ
3.3 ̺ͺ̣
    3.3.1 /ʽ
    3.3.2 ʽ
        3.3.2.1 ʽ
        3.3.2.2 
        3.3.2.3 
        3.3.2.4 
        3.3.2.5 Ƶĳͻ
3.4 
    3.4.1 ͸ʽ
    3.4.2 ֲ
    3.4.3 ȫֱʹ
3.5 
    3.5.1 дԼ
        3.5.1.1 ָ
        3.5.1.2 ö
        3.5.1.3 ole
    3.5.2 ṹ
        3.5.2.1 
        3.5.2.2 ¼
3.6 
    3.6.1 if 
    3.6.2 case 
        3.6.2.1 һԻ
        3.6.2.2 ʽ
    3.6.3 while 
    3.6.4 for 
    3.6.5 repeat 
    3.6.6 with  
        3.6.6.1 һ㻰
        3.6.6.2 ʽ
3.7 ṹ쳣
    3.7.1 һ㻰
    3.7.2 try...finallyʹ
    3.7.3 try...exceptʹ
    3.7.4 try...except...elseʹ
3.8 
    3.8.1 ͸ʽ
    3.8.2 
        3.8.2.1 /ʽ
        3.8.2.2 ӻ
    3.8.3 
        3.8.3.1 /ʽ
        3.8.3.2 ʹþ̬ķ
        3.8.3.3 ʹ/̬ķ
        3.8.3.4 ʹóķ
        3.8.3.5 Դȡ
    3.8.4 
        3.8.4.1 /ʽ
        3.8.4.2 ʹôȡķ
ġļ
4.1 ļ
    4.1.1 
4.2 ļ
    4.2.1 
4.3 ģļ
    4.3.1 
4.4 Զģļ
    4.4.1 
4.5 Unitļ
    4.5.1 ͨUnitṹ
        4.5.1.1 unit
        4.5.1.2 usesӾ
        4.5.1.3 interface
        4.5.1.4 implementation
        4.5.1.5 initialization
        4.5.1.6 finalization
    4.5.2 嵥Ԫ
        4.5.2.1 
    4.5.3 ģ嵥Ԫ
        4.5.3.1 
    4.5.4 һĿĵԪ
        4.5.4.1 
    4.5.5 Ԫ
        4.5.5.1 
4.6 ļͷ
塢ģ
5.1 
    5.1.1 ׼
    5.1.2 ʵ׼
    5.1.3 Զ
    5.1.4 ģʽʵ
5.2 ģ
    5.2.1 ģ׼
    5.2.2 ģʵ׼

6.1 ʹаưıȽ
6.2 ļ׼
ߡ
7.1 ûԶ幹
7.2 Ԫ
7.3 ʹעᵥԪ
7.4 ʵԼ
7.5 ǰ׺
7.6 Standardҳ
7.7 Additionalҳ
7.8 Win32ҳ
7.9 Systemҳ
7.10 Internetҳ
7.11 Data Accessҳ
7.12 Data Controlsҳ
7.13 Decision Cubeҳ
7.14 QReportҳ
7.15 Dialogsҳ
7.16 Win3.1ҳ
7.17 Samplesҳ
7.18 ActiveXҳ
7.19 Midasҳ

һ

ĵDelphi 4ָ½б̵Ĵд׼ͨ£ĵѭȡʽʽָ룬÷BorlandͨһЩʹáDelphi 4ָаĵĿڲһַͨ÷СдĴбһķĿʹڿСеÿһԱԱĴ롣ߴдĿɶԺʹõһԡ

ĵζŰдڴеı׼ǣ㹻ͷɵ޸Щ׼Ҫǲ޳ƫЩBorlandԱʹõı׼̫ԶƼôΪһµĳԱ뵽ĿСУϲϤBorlandı׼׼ĵĵҲҪиĶˣԵwww.xapware.com/ddgҵµĸ°汾ĵûӿڱ׼ĵǶĵҲͬҪġѾ㹻ĵ鼮MicrosoftĵһЩָ룬ǾЩϢǻָ㵽Microsoft Developers Network һЩԴǶҵϢ

ͨԴʽ

2.1 

ָÿһո񡣲ҪԴбtabַΪtabַŲͬûĲͬúͲͬԴߣӡĵ汾ƵȣͬĿȡ

ͨرEnvironmentѡԻEditorҳϵġUse tab character͡Optimal fillͨTools|Environmentֹtabַ

2.2 ҳ߿ո

ҳ߿ոᱻó80ַͨԴ벻ᳬ߽磬һЩԡǷпܣЩһеһŻ֮ǰһ䱻ʱӦԭһַ

2.3 Begin...End 

Begin ӾӦдڶһС磬һǴдڶȷġ
for I := 0 to 10 do begin  //beginͬforͬһ
for I := 0 to 10 do        //ȷbeginڶһ
begin

ǵbeginӾĳΪһelseӾһ֣οӣ
if some statement then
begin
  ...
end
else begin
  someOtherStatement;
end;

end ԶڶһС
begin䲻һelseӾһʱӦendԶbeginӦλá

Object Pascal

3.1 

ԶҪַ֮м¿ոʾ˴ȷʹеĿո
         CallProc( Aparameter );    //
         CallProc(Aparameter);      //ȷ

ԶҪһʹòҪšֻӦԴҪĵطʹáµʾ˴ȷʹã
if (I = 42) then                    //  
if (I = 42) or (J = 42) then        //ȷ  Ҫ

3.2 ֺ͹ؼ

Object Pascal ֺ͹ؼԶȫСд

3.3 ̺ͺ̣

3.3.1 /ʽ

̵ԶӦԴдĸͷмԱڿɶԡһȷʽĹƣ
         procedure thisisapoorlyformattedroutinename;

һʵĴСдƵӣ
         procedure ThisIsMuchMoreReadableRoutineName;

̵ӦͬһᵼĳΪӦԶʿͷ磺
         procedure FormatHardDrive;

һӦԵsetΪǰ׺磺
         procedure SetUserName;

һĳֵӦԵgetΪǰ׺磺
         procedure GetUserName : string;

3.3.2 ʽ

3.3.2.1 ʽ

еĻͬ͵βӦϲһУ
  procedure Foo(Param1, Param2, Param3 : Integer; Param4 : string);

3.3.2.2 

βεӦʮַ壬رӦԴ͵еı־ΪһõĲӦַAΪǰ׺  磺
  procedure SomeProc(AuserName : string; AuserAge : integer);

Aǰ׺ԼʾòеһԻӦġ

3.3.2.3 

βε˳ص˵עߵԼõĺô

 õĲӦڵһλĲӦҵ˳С
 бӦбߡ
 ͨõĲߣ磺
      procedure SomeProc(Aplanet, AContinent, Acountry, Astate, Acity)
 пЩ⣬¼ĴΪTObjectSenderڵһλ

3.3.2.4 

һΪ¼͡͡ShortStringӿͲвıʱЩӦϳǡñЧʵĲйЩıĲĴ롣

һЩǱҲɳ͡ûвκЧЧʣ⽫̵ʹṩϢ

3.3.2.5 Ƶĳͻ

ʹӵ̵ͬԪʱøʱusesӾںĵԪе̽ᱻáΪ˽֡usesӾϵģͻҪڵøʱдصĵԪǰ׺磺
        sysUtile.FindClose(SR);

        windows.FindClose(Handle);

3.4 

3.4.1 ͸ʽ

ӦʹǵĿ

ѭƱӦһַΪ֣ IJKҲԲø֣ UserIndex

߼Ӧֱܳ׼ȷٵ˼

3.4.2 ֲ

һеľֲӦѭʹúԼʱȡӦ

Ļһ̾ӦʼֲֲAnsiStringԶʼΪһյַ
ֲӿںɷֽӿͱԶʼΪnilҾֲoleͱԶʼΪUnassigned

3.4.3 ȫֱʹ

ʹȫֱǲƼġǣĳЩʱǱʹãҲֻӦڱʹõʱʹáʱӦŬֻһķΧʹȫֱ磬һȫֱֻӦһԪimplemntationȫֵġڶԪʹȫݣӦƵһĵԪȻеԪʹá

ȫֱvarӾֱӳʼΪһֵסеȫݻԶʼΪ0,˲ҪȫֱʼΪһաֵ 0nil''UnassignedȵȡһΪ㣭ʼȫexeļвռκοռ䡣㣭ʼݱ洢һݶΣӦó󱻷һڴС㣭ʼȫӲ̵exeļռÿռ䡣

3.5 

3.5.1 дԼ

͵Ǳ֣ôӦȫСдWin32 APIͨȫдѭWindows.pasAPIԪеϸƵԼ֣һĸӦΪдĸӦ¡һЩӣ
      var
        MyString : string;          //
        WindowHandle : HWND;        //Win32 API 
        I : Integer;                //SystemԪͱʶ

3.5.1.1 ָ

ƼʹRealͣΪĴֻΪǰڵPascal롣ͨDoubleʵָָҪңDoubleԴ߶ŻģҲIEEEжı׼ݸʽֻеҪķΧDoubleķΧʱʹExtendedExtendedintelJavaвֻ֧֡еָʵֽڴСʱʹSingle統ʹһԵDLLsʱ

3.5.1.2 ö

ö͵ʹø͵Ŀġ͵ַTΪǰ׺Աһ͡öеıʶбַǰ׺Ӧڸö͵  磺
        TsongType = (stRock, stClassical, stCountry, stAlternative, stHeavyMetal, stRB);
һö͵ʵӦ벻Ҫǰ׺öͣSongTypeͬиõԭñ֣磺FavoriteSongType1,FavoriteSongType2 ȵȡ

3.5.1.3 ole

ͨʹñOleֻ͡ʱ̲֪͵ĳбʹøͣζCOMݿ⿪СOleʹCOMΪıԶActiveXƣʹڷCOMıУΪʮЧش洢DelphiַͬһַһOleὫеַתΪOleַWideChar ַҲʵ  Զ

3.5.2 ṹ

3.5.2.1 

͵ʹõĿġ͵ֱǰ׺T͵ָ룬ôָǰ׺PӦڸǰ档磺
        type
          PCycleArray = ^TCycleArray;
          TCycleArray = array[1...100] of integer;
ʵӦУıʵӦ͵ȥǰ׺T

3.5.2.2 ¼

¼͵ӦʹǵĿġ͵Ӧǰ׺TҪü¼͵ָ룬Ӧǰ׺PӦǰ磺
        type
          PEmployee = ^TEmployee;
          TEmployee = record
            EmployeeName : string;
            EmployeeRate : Double;
          end;

3.6 

3.6.1 if 

if/then/elseΪӦthenӾУԽСΪӦelseӾС

ʹǶ׵if䣬Ӧöifжϸֿܡ

ҪʹifǶ׳弶ȡӦʹдøˡ

ҪifʹòҪԲš

ifжԣЩӦǿٵ˳Сʹڱʱò߼ĽݾӶʹĴѵŻ˵1223ôifеӦǣ
         if 1 and 2 and 3 then

3.6.2 case 

3.6.2.1 һԻ

һcaseеĸĵԪӦֻĸ˳С

ÿһcaseԪĶΪӦּ򵥶Ӧóĵд롣ҪִеĶڸӦöĹ̻

CaseеelseӾֻеҪȱʡΪʱʹá

3.6.2.2 ʽ

caseӦѭṹԼ

3.6.3 while 

һwhileвʹexitѭʹѭѭ

һwhileѭõĳʼӦڽwhileѭǰֶҪص

κνĴӦѭ֮С

3.6.4 for 

forֻеѭ֪²ȡwhileʹá

3.6.5 repeat 

repeatʹͬwhileһѭͬͨ÷롣

3.6.6 with  

3.6.6.1 һ㻰

withӦʡʹãҴдľ档ʹwith䲢withСʹö󡢼¼ȵȡ磺
         with Record1, Record2 do
ЩʹԱеԷڡ

3.6.6.2 ʽ

with ѭĵ˵Լĸʽ

3.7 ṹ쳣

3.7.1 һ㻰

쳣ĴʹڴԴ档˵һԴ䣬һtry...finallyʹ֤Դȷͷš쳣ıҲָһԪinitializition/finalizationһconstructor/destructorнԴķͷš

3.7.2 try...finallyʹ

κ£ÿһεķ䶼Ӧһtry...finally˵ĴɿܵĴ
     SomeClass1 := TsomeClass.Create;
     SomeClass2 ;= TsomeClass.Create;
     try
       { do some code }
     finally
       SomeClass1.Free;
       SomeClass2.Free;
     end;

һȫʵķӦǣ
     SomeClass1 := TSomeClass.Create;
     try
       SomeClass2 := TsomeClass.Create;
       try
         { do some code }
       finally
         SomeClass2.Free;
       end;
     finally
       SomeClass1.Free;
     end;

3.7.3 try...exceptʹ

ֻе쳣ִһЩʱʹtry...exceptͨûбҪΪֻǼ򵥵ĻʾһϢʹtry...except䣬ΪᱻApplicationԶִСexceptӾִһЩ֮ȱʡ쳣ʹraise´쳣һ

3.7.4 try...except...elseʹ

try...exceptеelseӾ䲻ʹãΪе쳣Щû׼쳣

3.8 

3.8.1 ͸ʽ

͵ӦʹǵĿġӦǰ׺TԱһ͵Ķ  磺
type
  Tcustomer = class(TObject)
͵ʵͨûǰ׺T͵  磺
var
  Customer :Tcustomer;
ע⣺ġ͵׼øйعϢ

3.8.2 

3.8.2.1 /ʽ

ѭʶͬԼӦFΪǰ׺һơ

3.8.2.2 ӻ

е򶼱˽еġķΧ֮ȡͨʹá

3.8.3 

3.8.3.1 /ʽ

Ӧѭĵйع̺ͺԼ

3.8.3.2 ʹþ̬ķ

ʹһ̬ķô÷Ͳܱĺ̳С

3.8.3.3 ʹ/̬ķ

ķܱ̳о͵ʹķֻڸ÷ж̳ʱֱӵĻӵģʹö̬ķ磬һͰһɼ̳еķ100Ҫַ̳ôͻᶯ̬زΪ100ʹõڴ档

3.8.3.4 ʹóķ

һʹóķͲֻܱЩԶᱻʹóķ

3.8.3.5 Դȡ

дȡķֻܳprivateprotected֡ԴȡӦѭ̺ͺԼ򡣶ȡȡȡԵGetΪǰ׺дȡдԵSetΪǰ׺дĲӦΪValueӦԵ͡磺
 TSomeClass = class(TObject)
 private
   FsomeField : Integer;
 protected
   function GetSomeField : Integer;
   procedure SetSomeField(Value : Integer);
 public
   property SomeField : Integer read GetSomeField write SetSomeField;
 end;

3.8.4 

3.8.4.1 /ʽ

ǱʾΪһ˽ĴȡĻôӦֳȥͷF

ԵӦʣǶʡԱʾݣʾΪ

͵ӦΪһԵӦΪ

3.8.4.2 ʹôȡķ

ûҪ󣬵ǽ龡ٵΪһʾ˽Զʹдȡ

ġļ

4.1 ļ

4.1.1 

ļӦȡԵ֡磬Delphi 4ָϴ ĹǣDDGBugs.dprһйϵͳϢĳ־Ӧ SysInfo.dpr

4.2 ļ

4.2.1 

һļȡӦʹøôĿģԺ׺Frm磬һڡĴļӦAboutFrm.dprļӦMainFrm.dpr

4.3 ģļ

4.3.1 

ģȡӦܱʾʹøģĿģӦַĺ׺DM磬ԶģļӦΪCustomersDM.dfm

4.4 Զģļ

4.4.1 

ԶģȡӦܱʾʹøԶģĿģӦַĺ׺RDM磬ԶԶģļӦΪCustomersRDM.dfm

4.5 Unitļ

4.5.1 ͨUnitṹ

4.5.1.1 unit

UnitļӦȡһԵ֡磬ӦóĵԪӦMainFrm.pas

4.5.1.2 usesӾ

interfaceֵusesӾӦinterfaceеĴҪĵԪȥЩDelphiԶ뵽еĵԪ

implementationֵusesӾӦֻimplementationеĴҪĵԪ֡ȥҪĵԪ

4.5.1.3 interface

interfaceӦֻЩԪҪȡ͵Ķ塢/Ԥȵȡ򣬾Ӧimplementationֶ塣

4.5.1.4 implementation

implementationӦЩֻڱԪ˽õͶ塢/ȵȡ

4.5.1.5 initialization

Ҫinitialization ַʱĴ룬⽫ʹĵһ
ñȽϻ

4.5.1.6 finalization

Ҫ֤ͷInitializationκԴ

4.5.2 嵥Ԫ

4.5.2.1 

һĵԪļӦӵӦĴļͬơ磬ڡĵԪӦΪ AboutFrm.pasĵԪӦΪMainFrm.pas

4.5.3 ģ嵥Ԫ

4.5.3.1 

һģĵԪļӦӵӦģļͬơ磬һԶģ嵥ԪӦΪCustomersDM.pas

4.5.4 һĿĵԪ

4.5.4.1 

һĿĵԪȡӦʹøõԪĿġ磬һʵóԪȡΪBugUtilities.pasһȫֱĵԪȡΪCustomerGlobals.pas

ע⣬õԪֲĹʹõаеĵԪͬ޳ʹһĻͨõĵԪ֡

4.5.5 Ԫ

4.5.5.1 

ԪӦڶĿ¼Խͬ幹򹹼ϵĵԪֿҪԶͬڲͬĿ¼ԪӦͬǵ

ע⣺ġûĹøйع׼Ϣ

4.6 ļͷ

ԴļļԪȵʹϢļͷһõļͷӦϢ

 Ȩ... ꡢ¡...
}

塢ģ

5.1 

5.1.1 ׼

͵ȡӦܱʹøôĿġͶӦǰ׺Tǰ׺Ե֡ӦForm׺֡磬һڡĴ͵ӦΪ
        TAboutFrom = class(TForm);
ĶΪ
        TMainForm = class(TForm);
һû봰Ӧ
        TCustomerEntryForm = class(TForm);

5.1.2 ʵ׼

ʵӦûдǰ׺TӦ֡磬Ӧǰ洰ͶԣʵӦΪ

                        ʵ
   TAboutForm                AboutForm
   TMainForm                 MainForm
   TCustomerEntryForm      CustomerEntryForm

5.1.3 Զ

ֻԶĳõɲĴӹѡԻеԶбߡ²øϢ

5.1.4 ģʽʵ

еĴ嵥ԪӦһʵúáģʽʾ壬ͷŴ塣úӦشģʽúҪݵĲӦѭĵָġݡ׼ַͨʽװĺڴúά

ôıҪӵԪߣٴʵĺнбʽض塣ע⣬ζŸôӹ/ѡԻеԶб޳οĵġԶ塱

磬ĵԪչʾGetUserDataеһ
  unit UserDataFrm;
  interface
  uses
windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
  type
    TUserDataForm = class(TForm)
      edtUserName : TEdit;
      edtUserID : TEdit;
    private
      { Private declarations }
    public
      { Public declarations }
    end;
  function GetUserData(var aUserName  String; var aUserID : Integer) : 
    Word;
  implementation
  {$R *.DFM }

  function GetUserData(var aUserName : String; var aUserID : Integer) : 
    word;
  var
    UserDataForm : TuserDataForm;
  begin
    UserDataForm := TuserDataForm.Create(Application);
    try
      UserDataForm.Caption := 'Getting User Data';
      Result := UserDataForm.ShowModal;
      if (Result = mrOK) then
      begin
        aUserName := UserDataForm.edtUserName.Text;
        aUserID := StrToInt(UserDataForm.edtUserID.Text);
      end;
    finally
      UserDataForm.Free;
    end;
  end;
  end.

5.2 ģ

5.2.1 ģ׼

ģȡҪʹøģĿġ͵ĶӦǰ׺TԵ֣ҪԺ׺ʡDataModule磬һԶģʱӦ
            TCustomerDataModule = class(TDataModule)
һʽģӦ
            TOrdersDataModule = class(TDataModule)

5.2.2 ģʵ׼

ģʵӦǶӦǰ׺T͵ơ磬ǰĴͶԣʵӦΪ
                                 ʵ
          TCustomerDataModule      CustomerDataModule
          TOrdersDataModule        OrdersDataModule



6.1 ʹаưıȽ

ʱ̵İӦֻҪĵԪ򹹼⣬/༭ֻΪƵĴӦ뵽ʱ̰СעᵥԪӦưС

6.2 ļ׼

Ӧӣ
iiilibvv.pkg  ʱ̰
iiistdvv.pkg  ʱ̰
ַiiiʾһ3ַʶǰ׺ǰ׺˾˻бʶʵ塣

ַvvʾΪðҪӦDelphiĳ汾İİ汾š

ע⣬аlibstd˼Ǳһʱ̰һʱ̰

ʱ̰ʱ̰ļͬһģ磬ΪDelphi 4ָİӦΪ

DdgLib40.pkg - ʱ̰
DdgStd40.pkg - ʱ̰

ߡ

7.1 ûԶ幹

ڱ׼Ĺͬڡֶ͡еһһͣͬһ3ַָʾǰ׺ǰ׺Աʾ˾˻ʵ塣磬һΪDelphi 4ָϱдʱӹƶΪ
      TddgClock = class(TComponent)
ע⣬ǰ׺ַСдġ

7.2 Ԫ

ԪӦֻһҪĹһҪĹָڹеĹҪĸ/Ӧ뵽ͬһԪС

7.3 ʹעᵥԪ

עӦӹĵԪ޳뵽һĵԪСעᵥԪעκιԱ༭༭רȡ

עֻӦʱ̰нУעᵥԪӦʱ̰жӦʱ̰С

ƼʹõעᵥԪǣ
XxxReg.pas
3ǰ׺ַXxxʾһ˾˻κʵ塣磬Delphi 4 ָеעᵥԪӦΪ DdgReg.pas

7.4 ʵԼ

еĹӦȡԵơDelphiȱʡĹᱻƹʱӦһСдǰ׺ʹǰ׺ʹú׺ԭѰʱڶʹ̽ѰֱѰ͸ʵ֡

7.5 ǰ׺

¹ǰ׺Delphi 4еı׼ڴбмǰ׺

7.6 Standardҳ
ǰ׺      
mm        TMainMenu
pm        TPopupMenu
mmi       TMainMenuItem
pmi       TPopupMenuItem
ǰ׺      
lbl       TLabel
edt       TEdit
mem       TMemo
btn       TButton
cb        TCheckBox
rb        TRadioBox
lb        TListBox
cb        TComboBox
scb       TScrollBar
gb        TGroupBox
rg        TRadioGroup
pnl       TPanel
cl        TCommandList
7.7 Additionalҳ
bbtn      TBitBtn
sb        TSpeedButton
me        TMaskEdit
sg        TStringGrid
dg        TDrawGrid
img       TImage
shp       TShape
bvl       TBevel
sbx       TScrollBox
clb       TCheckListbox
spl       TSplitter
stx       TStaticText
cht       TChart
7.8 Win32ҳ
tbc       TTabControl
pgc       TPageControl
il        TImageList
re        TRichEdit
thr       TTrackBar
prb       TProgressBar
ud        TUpDown
hk        THotKey
ani       TAnimate
dtp       TDateTimePicker
tv        TTreeView
lv        TListView
hdr       THeaderControl
ǰ׺      
stb       TStatusBar
tlb       TToolBar
clb       TCoolBar
7.9 Systemҳ
tm        TTimer
pb        TPaintBox
mp        TMediaPlayer
olec      TOleContainer
ddcc      TDDEClientItem
ddci      TDDEClientItem
ddsc      TDDEServerConv
ddsi      TDDEServerItem
7.10 Internetҳ
csk       TClientSocket
ssk       TServerSocket
wbd       TWebDispatcher
pp        TPageProducer
tp        TQueryTableProducer
dstp      TDataSetTableProducer
nmdt      TNMDayTime
nec       TNMEcho
nf        TNMFinger
nftp      TNMFtp
nhttp     TNMHttp
nMsg      TNMMsg
nmsg      TNMMSGServ
nntp      TNMNNTP
npop      TNMPop3
nuup      TNMUUProcessor
smtp      TNMSMTP
nst       TNMStrm
nsts      TNMStrmServ
ntm       TNMTime
nudp      TNMUdp
psk       TPowerSock
ngs       TNMGeneralServer
html      THtml
url       TNMUrl
sml       TSimpleMail


7.11 Data Accessҳ
ǰ׺      
ds        TDataSource
tbl       TTable
qry       TQuery
sp        TStoredProc
db        TDataBase
ssn       TSession
bm        TBatchMove
usql      TUpdateSQL
7.12 Data Controlsҳ
dbg       TDBGrid
dbn       TDBNavigator
dbt       TDBText
dbe       TDBEdit
dbm       TDBMemo
dbi       TDBImage
dblb      TDBListBox
dbcb      TDBComboBox
dbch      TDBCheckBox
dbrg      TDBRadioGroup
dbll      TDBLookupListBox
dblc      TDBLookupComboBox
dbre      TDBRichEdit
dbcg      TDBCtrlGrid
dbch      TDBChart
7.13 Decision Cubeҳ
dcb       TDecisionCube
dcq       TDecisionQuery
dcs       TDecisionSource
dcp       TDecisionPivot
dcg       TDecisionGrid
dcgr      TDecisionGraph
7.14 QReportҳ
qr        TQuickReport
qrsd      TQRSubDetail
qrb       TQRBand
qrcb      TQRChildBand
qrg       TQRGroup
qrl       TQRLabel
ǰ׺      
qrt       TQRText
qre       TQRExpr
qrs       TQRSysData
qrm       TQRMemo
qrrt      TQRRichText
qrdr      TQRDBRichText
qrsh      TQRShape
qri       TQRImage
qrdi      TQRDBMImage
qrcr      TQRCompositeReport
qrp       TQRPreview
qrch      TQRChart
7.15 Dialogsҳ
Ի򹹼ɹװĴ壬ˣӦѭԼɹƶ塣ʵDelphiԶɵʵȥֺ׺£
                          ʵ
    TOpenDialog             OpenDialog
    TSaveDialog             SaveDialog
    TOpenPictureDialog     OpenPictureDialog
    TSavePictureDialog     SavePictureDialog
    TFontDialog             FontDialog
    TColorDialog            ColorDialog
    TPrintSetupDialog      PrintSetupDialog
    TFindDialog             FindDialog
    TReplaceDialog         ReplaceDialog
7.16 Win3.1ҳ
dbll      TDBLookupList
dblc      TDBLookupCombo
ts        TTabSet
ol        TOutline
tnb       TTabbedNoteBook
nb        TNoteBook
hdr       THeader
flb       TFileListBox
dlb       TDirectoryListBox
dcb       TDriveComboBox
fcb       TFliterComboBox
7.17 Samplesҳ
gg        TGauge
ǰ׺      
cg        TColorGrid
spb       TSpinEdit
spe       TSpinEdit
dol       TDirectoryOutline
cal       TCalendar
ibea      TIBEventAlerter
7.18 ActiveXҳ
cfx       TChartFX
vsp       TVSSpell
f1b       TF1Book
vtc       TVTChart
grp       TGraph
7.19 Midasҳ
prv       TProvider
cds       TClientDataSet
qcds      TQueryClientDataSet
dcom      TDCOMConnection
olee      TOleEnterpriseConnection
sck       TSocketConnection
rms       TRemoteServer
mid       TMidasConnection
                                                                             21 ҳ  21ҳ


