我用的是delphi 7, 從Project -> Import Type Library -> 選取lblvw32.tlb->Install 就產生LabelView_TLB.pas檔案 建個Button, 只要接下button, 程式就會call LabelView裡的function, 但有Runtime 位址錯誤. 在此 小弟請教大家. 以下是我的式碼 _____________________________________________________________ unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, LabelView_TLB, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; labdocument: TLabelDocument; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin labdocument.BrowseLabel; end; end. __________________________________________________________________

不知道 TLabelDocument 是什麼樣的 class 不過應該跟 delphi 其它的 class 一樣 labdocument 這個變數還沒 create 一個實體 就要呼叫它的 method, 所以會出錯了 改成如下試試:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if not Assigned(labdocument) then
    labDocument := TLabelDocument.Create(Self);
  labDocument.BrowseLabel;
end;

-- 分擔可以輕省, 分享帶來喜樂!

可以運作了, 感謝萬分. 本人還是Delphi的初學者.