私は、 Marjan Venemadelphi 7
によるIDE
このSOの回答に従って、簡単なインストーラーを作成してい ます。
procedure TForm1.Button1Click(Sender: TObject);
var
sDelphi7PackageName : string;
sDelphi7Path,fileSource,fileDest : string;
sDelphi7packBPL,sDelphi7PathMenuBPL : string;
begin
sDelphi7Path:=ReadRegistryValues('\Software\Borland\Delphi\7.0',FALSE,'RootDir',1,TRUE);{<-- returns the 'C:\Program Files\Borland\Delphi7' }
{#1. Install .bpl}
sDelphi7BPL:=sDelphi7Path+'\Projects\Bpl\Pack.bpl';
WriteValueToRegisTry('\Software\Borland\Delphi\7.0\Known Packages',FALSE,sDelphi7BPL,'Delphi 7 compo Bpl File'); {<-- writes to the registry}
fileSource:=ExtractFilePath(Application.ExeName)+'\Packages\comPack.bpl';
fileDest:=sDelphi7BPL;
CopyFile(PChar(fileSource), PChar(fileDest), False);
end;
これは正常に機能します![ここに画像の説明を入力してください][2]
C:\Program Files\Borland\Delphi7\Projects\Bpl\Pack.bpl
。ただし、コンポーネントのインストールIDhidden
誰かがインストールunhide
の方法を教えてもらえますか?component
編集
役に立つかもしれません:
1)コンポーネントのファイルがすでにあるので、ディレクトリbpl
に直接コピーしてレジストリを変更しています。delphi 7
C:\Program Files\Borland\Delphi7\Projects\Bpl
HKEY_CURRENT_USER\Software\Borland\Delphi\7.0\Known Packages
2)register
コンポーネントの手順
implementation
procedure Register;
begin
RegisterComponents('comp', [Tcomp]);
end;