Código
Abra o delphi, crie uma nova aplicação.
Na seção INTERFACE, coloque a seguinte linha de comando:}
function DllRegisterServer: Integer; stdcall; external 'BdeInst.dll';
//Na seção IMPLEMENTATION
procedure TForm1.Button1Click(Sender: TObject);
begin
DllRegisterServer;
end;
{OBS: Caso você não encontre o arquivo zipado na sua máquina, esse arquivo encontra-se no CD de instalação do Delphi.}
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009