Gostaria de saber se alguém já fez algo semelhante (ou se tem idéia
de como fazer):
A) Se for possível, no Inno Setup:
================================
- Gostaria de solicitar ao usuário em qual porta TCP ele deseja
instalar o FireBird
- Depois que o usuário informar a porta, eu testaria se ela está livre; se não
estiver, avisaria
o usuário e ele teria de selecionar uma outra porta
Observação: Na seção [RUN] do meu script do Inno Setup, estou chamando a
instalação de uma instância
do FireBird assim (com a porta 3054 pré-determinada):
[Run]
Filename: {app}\Firebird\bin\install_classic.bat; Parameters: MEU_SERVER;
Components : serverFiles
Filename: {sys}\netsh.exe; Parameters: "firewall add portopening protocol=TCP
port=3054 name=""Firebird MEU_SERVER"" mode=ENABLE scope=SUBNET"; Flags: nowait
runhidden; MinVersion: 0,5.01.2600; Components : serverFiles
- Também gostaria de pegar automaticamente o nome de rede do computador onde
está sendo feita a instalação, e então
alterar (durante a instalação) um arquivo BD.INI, onde eu guardaria o nome do
servidor e a porta TCP escolhida
B) Se não for possível no Inno Setup
================================
- Neste caso, pretendo escrever um programinha Delphi de configuração, que
seria chamado no final da instalação;
esse meu programinha pediria e testaria a porta; se eu tiver que optar por
esta alternativa, então
meu programinha alteraria o um arquivo BD.INI (isto eu sei fazer).
- Para eu poder implementar a idéia da alternativa "B", como é que eu testo se
uma determinada porta TCP está livre ?
Grato pela atenção de todos
Paulo
[As partes desta mensagem que não continham texto foram removidas]
