Colocar a linha quot;gds_db 3050/tcpquot;

15/05/2003

0

Pessoal como eu faço para colocar a linha
´gds_db 3050/tcp´

no arquivo ´services´ do Windows e a linha naum existir,,,, sem usar a instalação do FIREBIRD,

Grato,


Marcos Fernando

Marcos Fernando

Responder

Posts

15/05/2003

Rosivaldo

procedure TForm1.Button1Click(Sender: TObject);
var F: TFile;
begin
  AssignFile(F, ´C:\Windows\services´);
  Reset(F);
  Writeln(F, ´gds_db 3050/tcp´);
  CloseFile(F);
end;


Espero que ajude!


Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar