請問一下，在開發 ocx 元件時，如何加入元件圖示 有試過用一般的元件的方式，加入 dcr 檔。 但ocx似乎不行，安裝元件後還是顯示預設的圖示。 不知ocx元件的作法，是否不一樣 謝謝

我試了一下，不小心讓我試出來了！ 假設物件為TAbc，那應該會有一個AbcControl1_TLB.pas，反正就是有_TLB的那個pas檔，請新增一個同樣檔名之dcr檔，AbcControl1_TLB.dcr，然後在AbcControl1_TLB.pas的implementation下加入{$R AbcControl1.dcr}即可！ 你參考看看！ Ian

真是太好了 謝謝您.... 晚上我再試試!!

試了一下，現將詳細方法列出 假設OCX物件名稱 TImgTestX 如下 TImgTestX = class(TActiveForm, IImgTestX) 1、在ImgTestImpl1.pas的implementation下，新增一行 {$R ImgTestProj1_TLB.dcr} 2、開啟Delphi的 Image Editor 工具 3、新增一個 .dcr 檔案 4、在 dcr 裡新增一個 Bitmap (建議 16x16 256色) 5、將 Bitmap1 名稱，改為同物件名 TImgTestX 6、編輯好圖形後，另存新檔為 ImgTestProj1_TLB.dcr 這樣就行了，供各位參考、參考

剛又特地試了一下，發現上面說的方式並不正確 以 ActiveX Form 來說，不過我想其他 ActiveX 物件應該也是一樣 因為無論如何的改 .dcr 裡的圖，從新註冊後其結果仍一樣 在一直的測試下才發現，其實ActiveX 的icon 與 .dcr 無關(在開發過程) 至於改的地方，應該是在 專案.res 檔。 1、先關閉 Delphi 2、以 Image Editor開啟 專案.res 3、在預設的ICON下方，再新增一個Bitmap 4、記得在新增 Bitmap 後，所產生的名稱用 1 至於為何用 1 ，我也不清楚，不過至少用物件名稱是不行的 5、編輯完圖形後，記得存檔 6、重新開啟專案(此時新的 .res 檔，會被載入) 7、從新編輯 ocx ，並註冊即完成 至於先前提的在 implementation下，新增一行 .dcr，這個部份是不需要的 也就是說，在開發發過程中 icon存在於.res不在.dcr。一旦在delphi新增 此ocx元件後，則會自動產生一個 .dcr(裡面就是ICON)。 各位若有興趣可以試試 謝謝

慚愧！昨天因為只試了一下，沒有再詳細的測試，以為只要圖示出來就對了，今天照了robert1014的方法試了一下，他只用的方法才是正確的，至於為何 4、記得在新增 Bitmap 後，所產生的名稱用 1 至於為何用 1 ，我也不清楚，不過至少用物件名稱是不行的 那是因為在ImgTestImpl1.pas內

initialization
  TActiveXControlFactory.Create(
    ComServer,
    TButtonX,
    TButton,
    Class_ButtonX,
    3,
    '',
    0,
    tmApartment);

內的紅色3，和.res內的圖示數字相符 TActiveXControlFactory的語法 Creates and initializes a new TActiveXControlFactory object. constructor Create(ComServer: TComServerObject; ActiveXControlClass: TActiveXControlClass; WinControlClass: TWinControlClass; const ClassID: TGUID; ToolboxBitmapID: Integer; const LicStr: string; MiscStatus: Integer); ThreadingModel: TThreadingModel; Description The ComServer parameter is a pointer to the COM server object for the module containing the property page factory. This is normally a global variable, ComServer, declared in the ComServ unit. The ActiveXControlClass parameter is the class object for the controller object that implements the ActiveX control. This object should be derived from TActiveXControl. The WinControlClass parameter is the class object for the VCL control class that implements the Windows behavior of the control. This object should be derived from TWinControl. The ClassID parameter is the GUID of the ActiveX control. Each COM object should have a unique GUID. LicStr is the license string for controls created with this factory. LicStr is empty if controls created with this factory are unlicensed. MiscStatus are the status bits that are stored in the registry. ThreadingModel specifies how calls to the created ActiveX control are serialized. This determines the value of the ThreadingModel property. 最後再一次抱歉，沒有測試完全就Post上答案！ Ian

l630521，您太客氣了。若非您先提供方法，要不然我也可能不會繼續往下測試。不過昨天又遇到一個問題，就是雖然在 Delphi 或 FrontPage 新增此元件，皆可看到圖示。但是若包成.cab檔，在IE下載後，出現的圖示，竟然還是Delphi預設的圖示，嗯，這個部份，我再測試看看。 再次感謝幫忙