引言: 1:SetFieldEvent 事件是在那?如何判斷程式事件是自己寫的? 還是物件本來就捉供

procedure TForm1.FormCreate(Sender: TObject);
begin
  ShowMessage('FormCreate');
end;    procedure TForm1.FormShow(Sender: TObject);
begin
  ShowMessage('FormShow');
end;    procedure TForm1.FormActivate(Sender: TObject);
begin
  ShowMessage('FormActivate');
end;

program Project1;    uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1};    {$R *.RES}    begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

引言:

引言: 1:SetFieldEvent 事件是在那?如何判斷程式事件是自己寫的? 還是物件本來就捉供

這應該是自己寫的。 如何判斷： 一般Delphi的事件都會在事件加上物件的名稱例： 您有一個TQuery，名稱是Query1，其事件onBeforeOpen的宣告為： procedure Query1BeforeOpen(DataSet: TDataSet);

引言: 2:FormCreate是要做什麼?

當Form一開啟時，首先執行的就是FormCreate這個事件，接著是FormShow，再來是FormActivate，您可以作如下的測式。如果您不知程式跑的流程可以用ShowMessage的方式來測試。

procedure TForm1.FormCreate(Sender: TObject);
begin
  ShowMessage('FormCreate');
end;    procedure TForm1.FormShow(Sender: TObject);
begin
  ShowMessage('FormShow');
end;    procedure TForm1.FormActivate(Sender: TObject);
begin
  ShowMessage('FormActivate');
end;

引言: 3:一個程式的跑的流程是如何run...大概--->delphi程式

程式一開始會從Program Project開始執行，再進入您開始的第一個From 如何看Program Project，您可以從Delphi Menu中的Project\View\Source開始 如下範例如下：

program Project1;    uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1};    {$R *.RES}    begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

您可以將中斷點設在Application.Initialize;當程式一Run時，就是進來這裡。

引言: 1: procedure MqyCalcFields(DataSet: TDataSet); procedure SetFieldEvent; procedure FormCreate(Sender: TObject); 順序顛倒對程式run有差別嗎?

這些procedure順序顛倒對程式run沒有影響，在此只是作宣告。

引言: 2:什麼procedure 要在type宣告? 什麼procedure要在private宣告? 什麼procedure要在public宣告?

在Type中宣告，其實是在interface底下宣告，是屬於Globle，全域變數。 在private宣告，就是Form的私有變數 要在public宣告，就是Form的公有變數 您可以參考一本書 好書推薦：Delphi 6 Object Pascal完美經典 出版公司：金禾 價格：680元 頁數：976 優點：詳細介紹object pascal語言的運作，元件與常用指令原由，細節交代的很清楚。 信相您看了這本書之後，對Delphi的觀念會更清楚。 ~小弟淺見，參考看看~

引言:什麼是,全域變數?是指整隻程式form要用到的嗎? 私有變數是只有在些form會用到的嗎? 公有變數是什麼?

引言:

引言:什麼是,全域變數?是指整隻程式form要用到的嗎? 私有變數是只有在些form會用到的嗎? 公有變數是什麼?

其實在interface底下，都是全域變數，也就是其他的Form只要uses該Form就可以使用該變數。 但是在interface type底下有區分為private及public。 private裡所宣告的變數、procedure、function均是該Form私有的，也就是其他的Form無法使用，就算uses該Form也一樣。 public裡所宣告的變數、procedure、function均是公開的，其他的Form只要uses該Form就可以使用該變數、或者是繼承該Form的子孫。 也許你會問在interface type底下及public底下宣告有何不同：我想是沒有什麼不同，只是我們習慣自己寫的變數、procedure、function若要公開時，會寫在public。 ~小弟淺見，參考看看~

引言:

引言:什麼是,全域變數?是指整隻程式form要用到的嗎? 私有變數是只有在些form會用到的嗎? 公有變數是什麼?

其實在interface底下，都是全域變數，也就是其他的Form只要uses該Form就可以使用該變數。 但是在interface type底下有區分為private及public。 private裡所宣告的變數、procedure、function均是該Form私有的，也就是其他的Form無法使用，就算uses該Form也一樣。 public裡所宣告的變數、procedure、function均是公開的，其他的Form只要uses該Form就可以使用該變數、或者是繼承該Form的子孫。 也許你會問在interface type底下及public底下宣告有何不同：我想是沒有什麼不同，只是我們習慣自己寫的變數、procedure、function若要公開時，會寫在public。 ~小弟淺見，參考看看~

引言: interface底下 protected 是做什麼?跟public底下宣告有何不同procedure、function

引言:

引言: interface底下 protected 是做什麼?跟public底下宣告有何不同procedure、function

protected只有繼承該Form的子孫才能使用在這區所宣告的procedure、function 幫您整理一下： private：所宣告的東東，只能自已使用。 protected：所宣告的東東，只有繼承該Form的子孫才能使用。 public：所宣告的東東，只要是uses該Form就可以使用。 ~小弟淺見，參考看看~

引言: 繼承是否要先USES..繼承跟USES到底是什麼關係? implementation的USES跟interface的USES是什麼關係?

引言:

引言: 繼承是否要先USES..繼承跟USES到底是什麼關係? implementation的USES跟interface的USES是什麼關係?

繼承是否要先USES：No底下有繼承的操作方法。 繼承：簡單的說就是繼承屬性、事件、方法。 Uses：故名思義就是使用。例如：Form2 uses Form1，指Form2可以使用Form1所公開的變數、procedure、function。 繼承跟USES到底是什麼關係：這是兩回事，不可混為一談。 繼承的操作方法：(您之前有問過這樣的問題)

• 您在Delphi先開一新的Application，此時Delphi便會產生一個空白的From，您可以試著在這個Form上貼上一個Button。

  procedure TForm1.Button1Click(Sender: TObject);
  begin
    ShowMessage('inherited');
  end;
  

• 按Delphi中的Menu File/New 其中有一個Project1頁夾，在Project1頁夾會看到Form1，選擇Form1按ok即可，這個步驟就是叫您New的Form2去繼承Form1。 程式碼如下(注意紅色部份，與Form1比較)：

  unit Unit2;    interface    uses
    Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
    Unit1, StdCtrls;    type
    TForm2 = class(TForm1)
    private
      { Private declarations }
    public
      { Public declarations }
    end;    var
    Form2: TForm2;    implementation    {$R *.DFM}    end.
  

  其實你看Form1的程式碼如下：

  unit Unit1;    interface    uses
    Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
    StdCtrls;    type
    TForm1 = class(TForm)
      Button1: TButton;
      procedure Button1Click(Sender: TObject);
    private
      { Private declarations }
      procedure proprivate;
    protected
      procedure proprotected;
    public
      { Public declarations }
      procedure propublic;
    end;    var
    Form1: TForm1;    implementation    {$R *.DFM}    procedure TForm1.Button1Click(Sender: TObject);
  begin
    ShowMessage('inherited');
  end;    end.
  

  比較這兩行 TForm1 = class(TForm) TForm2 = class(TForm1) 其實TForm1就是繼承TForm而TForm2就是繼承TForm1。Delphi寫一個空白的表單TForm等著您新增一個Form時來繼承。所以您看到的Form2就會跟Form1一樣會有一個Button。

implementation的USES跟interface的USES是什麼關係? 如果你的Form1要uses Form2而Form2也要uses Form1 你都打在interface的USES則會有錯誤：Circular unit Reference循環使用unit 如果你改打在implementation的USES則就沒有什麼問題。 ~小弟淺見，參考看看~ 發表人 - channel 於 2003/03/12 16:21:06

引言: 為什麼有些會有繼承會有以下..有些沒有. var Form1: TForm1;

引言:

引言: 為什麼有些會有繼承會有以下..有些沒有. var Form1: TForm1;

這一行是宣告Form1的型態是TForm1。一般都會有。 如果你沒有這一行Form1: TForm1;也就沒有辦法使用Form1的東西，也就是當別的Form Uses Form1，沒有辦法使用Form1的變數、function、procedure…。您可以自行試試看，其差異性。

引言: TYPE為什麼要做多個繼承;

不懂您的思意! 您是指那一行?

引言: 不好意思我寫的不夠detail,thank妳回答我那麼多問題..因我是個新手 我是指我看有些TYPE有class(繼承)以下,為什麼要繼承2個? TYPE TvalidateRec=class(TObject) . . END; TDBGridF = class(TDBGrid) property FixedCols; property DefaultRowHeight; property TopRow; end;