Delphi 6.0

Delphi 6.0用戶可以自己聲明屬性編輯器在程式設計期間對第三方控制項進行設計。

基本介紹

  • 外文名:Delphi 6.0
  • 性質:屬性編輯器
  • 特點:註冊前要定義自己的屬性編輯器
  • 定義方式:通過RegisterComponentEditor
編輯器,作法,

編輯器

Delphi中用戶可以自己聲明屬性編輯器在程式設計期間對第三方控制項進行設計,對屬性編輯器的聲明可以在註冊控制項的時候通過RegisterComponentEditor過程進行定義,具體為:
Delphi 6.0
procedure RegisterComponentEditor(ComponentClass: TComponentClass; ComponentEditor: TComponentEditorClass);
當然,用戶在註冊前要定義自己的屬性編輯器,下面是一個例子:
TOutlookBarEditor = class(TComponentEditor)
function GetVerb(Index: Integer): string; override;
function GetVerbCount: Integer; override ;
procedure Edit; override;
procedure ExecuteVerb(Index: Integer); override;
end;
引用RegisterComponentEditor
其中最關鍵的部分在於對RegisterComponentEditor的引用。
在Delphi5.0中,可以直接將$(DELPHI)\Source\ToolsAPI目錄下的DsgnIntf.pas檔案拷貝到控制項的設計目錄下或者拷貝到$(DELPHI)\Lib目錄即可。
在Delphi6.0中,Delphi將檔案分解成DesignIntf.pas和DesignEditors.pas兩個檔案,所以引用時要將$(DELPHI)\Source\ToolsAPI目錄下的DesignIntf.pas和DesignEditors.pas兩個檔案拷貝到控制項的設計目錄下或者拷貝到$(DELPHI)\Lib目錄。
當然,如果你的Delphi Package的搜尋路徑或者Delphi IDE的搜尋路徑可以搜尋到$(DELPHI)\Source\ToolsAPI目錄就省去此麻煩。

作法

但是,在Delphi 6.0中,如果就此編譯,會出現找不到Proxies.dcu檔案的問題。因為Proxies被編譯了,在Delphi的目錄中根本就找不到此相關檔案,它已經被編譯到designide.dcp檔案中,解決方案很簡單,就是在你的Package中引用designide.dcp檔案即可,具體作法是:
Project->View Source->在requires部分加入對designide的引用即可。
由於此部分檔案只是在設計期間才有效,所以你的Package在設計時就要注意:
不要在運行期間將在進行期間使用的檔案加入對DesignIntf.pas和DesignEditors.pas兩個檔案的引用,否則依然會出現找不到Proxies.dcu檔案的問題,要將檔案脫離!
當然,如果你的Package要在Delphi 5.0及Delphi6.0下同時能運行,那就要下點功夫通過編輯器的版本進行控制,Delphi 6.0的編輯器版本是VER140,Delphi 5.0的編輯器版本是VER130,下面是本人的一個真實的引用檔案:
uses
Classes, {$IFDEF VER140}DesignIntf, DesignEditors{$ELSE}DsgnIntf{$ENDIF};
Package部分由於版本不同而對不同的版本要進行不同的設計,再此就不敘述了!
其它補記:由於Delphi 5.0和Delphi 6.0對過程及參數的定義區域不同而出現錯誤,所以在編寫兩個版本的Package時一定要注意引用虛函式時出現的問題。例如對TControl控制項的SetAutoSize(Value: Boolean)過程的引用:
在Delphi 5.0中定義為:
private
procedure SetAutoSize(Value: Boolean);
而在Delphi 6.0中定義為:
protected
procedure SetAutoSize(Value: Boolean); virtual;
此時的定義要根據自己的實際情況定義了,可不能隨便定義了!

相關詞條

熱門詞條

聯絡我們