ActiveDelphi

[ODIRLEIMAIER]

Amigos, criei um pequeno sistema em delphi 6 com BD firebird 2.0, e uso para a conexão os componentes da aba INTERBASE, como estou a pouco tempo utilizando o firebird, não sei o que devo fazer para colocar esse aplicativo rodar em rede. Se alguem tiver a boa vontade de me ajudar ficarei muito grato.
Obrigado

[ODIRLEIMAIER]

Ajuda ai pessoal, é muito importante pra mim, se alguem tiver alguma apostila ou algo parecido da uma mão ai

[Ghost_Rider]

Tá...se vc usa os componentes da aba interbase, vc esta usando o componente IBDatabase.

Para rodar em rede é simples, onde voce coloca o nome do banco de dados, para rodar em rede, deve-se colocar o ip do servidor, seguido do caminho fisico, assim:

- imagine que a base de dados esteja na pasta c:\comercio, para rodar local, vc coloca c:\comercio\banco.fdb.

- para acessar em rede, voce deve colocar assim :
192.168.0.1:c:\comercio\banco.fdb, onde 192.168.0.1 é o IP do servidor.

Para agilizar esse processo, guarde o IP do servidor e o caminho do banco num arquivo INI, leia o arquivo quando inicializar a aplicação e tudo certo.
Outra coisa, no servidor e nas estações, caso tenha firewall ativo, é preciso liberar a porta 3050 para o firebird.

Espero ter ajudado...

[DonOctavioDelFlores]

o cara faz 3 topicos iguais, e nao responde, só abre novos.....

aí fica dificil.

http://www.activedelphi.com.br/forum/search.php?search_author=ODIRLEIMAIER
_________________
“The problem with the world is that everyone is a few drinks behind.” Humphrey Bogart

[ODIRLEIMAIER]

Foi mal ai DonOctavioDelFlores por postar topicos iguais, mas é que o que eu postei anterior a este eu entrei em ferias no dia seguinte, e em casa não tenho Internet por isso não respondi. Desculpa ai!

E Ghost_Rider, se não for pedi muito será que vc poderia me dizer o codigo e onde devo colocalo para ler o arquivo .ini, tenho um codigo aqui que eu uso mas não funciona, uso esse aqui:

procedure TDM.DataModuleCreate(Sender: TObject);
var
iniConf : TIniFile;
sCaminho, sIPServidor : String;
begin
iniConf := TiniFile.Create( ExtractFilePath ( Application.ExeName) + 'Config.ini');
sIPServidor := iniConf.ReadString('INF_BD','IP_Servidor','');
sCaminho := iniConf.ReadString('INF_BD','Caminho','');
// Depois de Ler as Chaves, vou configurar o IBDataBase
IBConexao.DatabaseName := sIPServidor +':'+sCaminho;
IBConexao.LoginPrompt := false; // Para não pedir a senha do banco!
IBConexao.Connected := true; // Abrindo Conexão
end;
-------------------------------------------------------------------------------------
Mas quando executo o programa, parece que ele não abre o BD, pois não consigo edita-lo, o que devo fazer??

[Ghost_Rider]

Vc ta colocando no oncreate do datamodule, esse deve ser o erro...coloque esse evento no onshow do form principal.
Outro ponto, deixe seu datamodulo já pre-carregado, não carregue ele apenas quando criar a aplicação.
Testa ai...

[ODIRLEIMAIER]

Fiz como me disse e quando dou o F9 da a seguinte mensagem de ero:

Project Agenda Telefonica.exe raisedexecption class EAccessViolationwiht message 'Access Violation at address 004fB81c in module 'Agenda Telefonica.exe'. Read Of address 00000058. Process stopped.Use Step or rum to continue.
ai eu dou ok e pressiono F9 novamente e ai ele executa.
O que será essa mensagem de ero??

[aeciovc]

alguma coisa pode ter sido chamado sem existir (instanciada)!!

[ODIRLEIMAIER]

Pode ser isso mesmo, pois quando presino o F9, ele seleciona em azul a seguinte linha
DataModuleAgenda.IBDatabaseAgenda.DatabaseName := sIPServidor +':'+sCaminho;

E passando o mause sobre esta linha aparece a seguite mensagem:
DataModuleAgenda.IBDatabaseAgenda.DatabaseName=Inacessible value;

O que isso quer dizer??

[aeciovc]

[ODIRLEIMAIER]

Tudo Bem consegui fazer funcionar, mas só tem um problema, tenho o programa instalado em duas maquinas mas ele não funciona nas duas ao mesmo tempo, por exemplo se o servidor estiver acessando o cliente não acessa. O que pode ser, será que é por que estou usando componentes IB

[Ghost_Rider]

Nada haver usando os componentes do IB...eu uso em redes com 10, 20 maquinas e roda na boa...vc precisa dizer que erro que esta dando...

Um detalhe, lembre-se de liberar uma porta no firewall(se tiver) para o firebird...a porta é a 3050, tanto no servidor como na estação...observe esse detalhe...

[ODIRLEIMAIER]

O aplicativo abre normalmente nas duas maquinas, mas quando vou inserir algum registro em um uma delas simplesmente não salva(isso quando os dois pc estiverem com o aplicativo aberto ao mesmo tempo).
A porta 3050 ta liberada nos dois

[ODIRLEIMAIER]

O aplicativo abre normalmente nas duas maquinas, mas quando vou inserir algum registro em um uma delas simplesmente não salva(isso quando os dois pc estiverem com o aplicativo aberto ao mesmo tempo).
A porta 3050 ta liberada nos dois

[ODIRLEIMAIER]

O aplicativo abre normalmente nas duas maquinas, mas quando vou inserir algum registro em um uma delas simplesmente não salva(isso quando os dois pc estiverem com o aplicativo aberto ao mesmo tempo).
A porta 3050 ta liberada nos dois