RES: [delphi-br] integrando bases de dados
Inicialmente meus agradecimentos pela colaboração ok ... segue comentários
sobre a alternativa ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
//teste esse ou o outro
winexec (PAnsiChar('\cicero\diauni\project1.exe' +chave) ,sw_normal); o
programa roda mas ao dar acesso a rotina nada acontece
winexec (PAnsiString('\cicero\diauni\project1.exe' +chave) ,sw_normal); dá o
sgte erro de execução e o programa não roda [Error] Unit1.pas(564):
Incompatible types: 'String' and 'Char'
end;
Em Mon, 05 Oct 2009 17:43:53 -0300, Fios e Cabos
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br escreveu:
Alguem pode me dar uma ajuda ...
To me batendo com isso um monte e não consigo ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' +chave ,sw_normal);
end;
Não consigo fazer o Delphi 7 entender que a chave é uma variável
Se eu substituir manualmente o termo +chave pelo numero de algum registro
... tudo funciona perfeitamente mas preciso que o sistema capture
automaticamente o numero da cada registro.
Help
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o
MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: domingo, 4 de outubro de 2009 23:52
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olha o código que estou tentando ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' +chave ,sw_normal);
end;
desde já obrigado pela ajuda
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o
MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes,
conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta
entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou
no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo
como:
cdsTabela.CommandText := ‘Select * from tabela where chave = ‘ +
paramStr(1);
ou
qryTabela.Sql := ‘Select * from tabela where chave = ‘ + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser
que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi-br@yahoogrupos.com.br mailto:delphi
RES: [delphi-br] integrando bases de dados
Olá Cícero.
Tá correto. É isso mesmo.
Agora no outro Project você tem que tratar isso. Se precisar de repente
saber de onde é essa chave pra você poder fazer coisas diferentes lá, pois
as chaves podem ser diferentes, cria mais um parâmetro (ou quantos precisar)
pra informar o outro Project daquilo que você precisa.
Tipo, passar o nome da tabela e o nome do campo chave junto com o valor:
f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' + f_clientes.RzDBEdit3.text + +
NomeTabela NomeCampo ,sw_normal);
Lá no outro projeto o param(1) vai ser o valor.. o param(2) será o nome da
tabela e o param(3) será o nome do campo.
Com essas informações você pode lá tomar decisões sobre como tratar.
Um detalhe.. se o valor do campo (f_clientes.RzDBEdit3.text) for texto e
tiver mais de uma palavra, deve ser enviado entre aspas. Na verdade essa
regra vale para qualquer parâmetro criado. Se preferir manter um padrão,
envie todos sempre com aspas. Mas se todos forem campos de uma palavra só,
sem problemas deixar sem.
Abraço.
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Fios e Cabos
Enviada em: domingo, 4 de outubro de 2009 23:52
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olha o código que estou tentando ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' +chave ,sw_normal);
end;
desde já obrigado pela ajuda
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Minha duvida é a sgte tenho um Project.exe que chama outro modulo
projec1.exe ...
Como posso fazer para um form do project1 acessar uma base de dados com o
ponteiro definido no Project.
Ou seja ... kero abrir o form do project1 no registro definido pelo Project
Tudo está funcionando ... porém qdo abro o sistema 2 ele está no primeiro
registro do banco ...
Obrigado
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47
RES: [delphi-br] integrando bases de dados
Tentei ... mas não roda ... não funciona ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe 234',sw_normal);
end;
Se eu colocar o nro da chave manualmente o soft roda perfeitamente ... o q
kero fazer é transformar esse numero em uma variável
No outro .exe já está funcionando ... o problema está no parâmetro
identificar: chave := f_clientes.RzDBEdit3.text; como sendo uma variável
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Claudiney - Listas
Enviada em: segunda-feira, 5 de outubro de 2009 08:33
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Tá correto. É isso mesmo.
Agora no outro Project você tem que tratar isso. Se precisar de repente
saber de onde é essa chave pra você poder fazer coisas diferentes lá, pois
as chaves podem ser diferentes, cria mais um parâmetro (ou quantos precisar)
pra informar o outro Project daquilo que você precisa.
Tipo, passar o nome da tabela e o nome do campo chave junto com o valor:
f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' + f_clientes.RzDBEdit3.text + +
NomeTabela NomeCampo ,sw_normal);
Lá no outro projeto o param(1) vai ser o valor.. o param(2) será o nome da
tabela e o param(3) será o nome do campo.
Com essas informações você pode lá tomar decisões sobre como tratar.
Um detalhe.. se o valor do campo (f_clientes.RzDBEdit3.text) for texto e
tiver mais de uma palavra, deve ser enviado entre aspas. Na verdade essa
regra vale para qualquer parâmetro criado. Se preferir manter um padrão,
envie todos sempre com aspas. Mas se todos forem campos de uma palavra só,
sem problemas deixar sem.
Abraço.
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: domingo, 4 de outubro de 2009 23:52
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olha o código que estou tentando ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' +chave ,sw_normal);
end;
desde já obrigado pela ajuda
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém
RES: [delphi-br] integrando bases de dados
Claiudiney .. antecipadamente meus agradecimentos ...
O que acontece com winexec ('\cicero\diauni\project1.exe' +
f_clientes.RzDBEdit3.text + +
NomeTabela NomeCampo ,sw_normal);
é que o programa roda .. mas quando executo a rotina nada acontece ... o
programa simplesmente não faz nada ...
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Claudiney - Listas
Enviada em: segunda-feira, 5 de outubro de 2009 08:33
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Tá correto. É isso mesmo.
Agora no outro Project você tem que tratar isso. Se precisar de repente
saber de onde é essa chave pra você poder fazer coisas diferentes lá, pois
as chaves podem ser diferentes, cria mais um parâmetro (ou quantos precisar)
pra informar o outro Project daquilo que você precisa.
Tipo, passar o nome da tabela e o nome do campo chave junto com o valor:
f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' + f_clientes.RzDBEdit3.text + +
NomeTabela NomeCampo ,sw_normal);
Lá no outro projeto o param(1) vai ser o valor.. o param(2) será o nome da
tabela e o param(3) será o nome do campo.
Com essas informações você pode lá tomar decisões sobre como tratar.
Um detalhe.. se o valor do campo (f_clientes.RzDBEdit3.text) for texto e
tiver mais de uma palavra, deve ser enviado entre aspas. Na verdade essa
regra vale para qualquer parâmetro criado. Se preferir manter um padrão,
envie todos sempre com aspas. Mas se todos forem campos de uma palavra só,
sem problemas deixar sem.
Abraço.
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: domingo, 4 de outubro de 2009 23:52
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olha o código que estou tentando ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' +chave ,sw_normal);
end;
desde já obrigado pela ajuda
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br
RES: [delphi-br] integrando bases de dados
Consegui
Agradeço a ajuda de todos ...
Ficou assim ...
Em vez de usar o WinExec usei:
ShellExecute(Handle, 'open','\cicero\diauni\project1.exe', PChar(chave),
nil, SW_SHOWNORMAL);
Deu certo
o Project.exe manda abrir o project1.exe e localiza a chave do
registro que eu estou trabalhando no Project
Valeu amigos ...
Infelismente com o WinExec não consegui fazer com que ele entenda o
parâmetro como uma variável
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Fios e Cabos
Enviada em: segunda-feira, 5 de outubro de 2009 17:44
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Alguem pode me dar uma ajuda ...
To me batendo com isso um monte e não consigo ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' +chave ,sw_normal);
end;
Não consigo fazer o Delphi 7 entender que a chave é uma variável
Se eu substituir manualmente o termo +chave pelo numero de algum registro
... tudo funciona perfeitamente mas preciso que o sistema capture
automaticamente o numero da cada registro.
Help
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: domingo, 4 de outubro de 2009 23:52
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olha o código que estou tentando ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' +chave ,sw_normal);
end;
desde já obrigado pela ajuda
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br
RES: [delphi-br] integrando bases de dados
Ok vou tentar ...
Obrigado ...
Na verdade o que quero fazer é organizar meu sistema em módulos ...
E estou tendo dificuldades em fazer um módulo conversar com o outro ...
Mas obrigado vou fazer depois conversamos ...
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Minha duvida é a sgte tenho um Project.exe que chama outro modulo
projec1.exe ...
Como posso fazer para um form do project1 acessar uma base de dados com o
ponteiro definido no Project.
Ou seja ... kero abrir o form do project1 no registro definido pelo Project
Tudo está funcionando ... porém qdo abro o sistema 2 ele está no primeiro
registro do banco ...
Obrigado
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] integrando bases de dados
Bom dia Cícero.
Se a idéia é criar módulos para cada parte do sistema talvez seja mais
interessante você trabalhar com BPLs ou DLLs. Dessa maneira acredito que
você possa fazer essa integração como deseja.
Eu não trabalho dessa forma, não vou saber te dar informações mais
detalhadas. Mas com certeza tem muita gente aqui na lista que faz isso e vai
poder te ajudar.
Dê uma pesquisada no Google também que deve ter bastante material a
respeito.
Um abraço.
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Fios e Cabos
Enviada em: domingo, 4 de outubro de 2009 08:08
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Ok vou tentar ...
Obrigado ...
Na verdade o que quero fazer é organizar meu sistema em módulos ...
E estou tendo dificuldades em fazer um módulo conversar com o outro ...
Mas obrigado vou fazer depois conversamos ...
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Minha duvida é a sgte tenho um Project.exe que chama outro modulo
projec1.exe ...
Como posso fazer para um form do project1 acessar uma base de dados com o
ponteiro definido no Project.
Ou seja ... kero abrir o form do project1 no registro definido pelo Project
Tudo está funcionando ... porém qdo abro o sistema 2 ele está no primeiro
registro do banco ...
Obrigado
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] integrando bases de dados
Eu ja trabalhei com ponteiros ^
não sei se da para você colocar esse seu dataset como
ponteiro e acessar ele de outra aplicação...
É uma idéia...
Abs,
Rodrigo Mota.
Sun, 4 Oct 2009 11:11:58 -0300, Claudiney - Listas escreveu:
Bom dia Cícero.
Se a idéia é criar módulos para cada parte do sistema talvez seja mais
interessante você trabalhar com BPLs ou DLLs. Dessa maneira acredito que
você possa fazer essa integração como deseja.
Eu não trabalho dessa forma, não vou saber te dar informações mais
detalhadas. Mas com certeza tem muita gente aqui na lista que faz isso e vai
poder te ajudar.
Dê uma pesquisada no Google também que deve ter bastante material a
respeito.
Um abraço.
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Fios e Cabos
Enviada em: domingo, 4 de outubro de 2009 08:08
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Ok vou tentar ...
Obrigado ...
Na verdade o que quero fazer é organizar meu sistema em módulos ...
E estou tendo dificuldades em fazer um módulo conversar com o outro ...
Mas obrigado vou fazer depois conversamos ...
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br delphi-br@yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br delphi-br@yahoogrupos.com.br
] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br delphi-br@yahoogrupos.com.br
delphi-br@yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br delphi-br@yahoogrupos.com.br
delphi-br@yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi-br@yahoogrupos.com.br delphi-br@yahoogrupos.com.br
delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Minha duvida é a sgte tenho um Project.exe que chama outro modulo
projec1.exe ...
Como posso fazer para um form do project1 acessar uma base de dados com o
ponteiro definido no Project.
Ou seja ... kero abrir o form do project1 no registro definido pelo Project
Tudo está funcionando ... porém qdo abro o sistema 2 ele está no primeiro
registro do banco ...
Obrigado
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br cicero%40fiosecabos.ind.br
cicero%40fiosecabos.ind.br
cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram
RES: [delphi-br] integrando bases de dados
Hu entendi
Esqueça a pergunta q fiz antes ..
Compreendi o q vc quis dizer
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Minha duvida é a sgte tenho um Project.exe que chama outro modulo
projec1.exe ...
Como posso fazer para um form do project1 acessar uma base de dados com o
ponteiro definido no Project.
Ou seja ... kero abrir o form do project1 no registro definido pelo Project
Tudo está funcionando ... porém qdo abro o sistema 2 ele está no primeiro
registro do banco ...
Obrigado
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] integrando bases de dados
Desculpe se minha pergunta parece ridícula ... mas sou iniciante
Como descubro a chave do registro no modulo que estou executando ... para
daí mandar localizar no outro modulo ...
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Minha duvida é a sgte tenho um Project.exe que chama outro modulo
projec1.exe ...
Como posso fazer para um form do project1 acessar uma base de dados com o
ponteiro definido no Project.
Ou seja ... kero abrir o form do project1 no registro definido pelo Project
Tudo está funcionando ... porém qdo abro o sistema 2 ele está no primeiro
registro do banco ...
Obrigado
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] integrando bases de dados
Funcionou ... só tenho um problema ...
Como posso fazer a chave do registro ser uma variável
Já tentei de tudo ...
Tipo ... cada registro tem um código diferente para escrever winexec (
\project1.exe xx )
Esse x tem q ser uma variável que é o código onde vou abrir o outro
Project ..
D resto funciona ...
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Minha duvida é a sgte tenho um Project.exe que chama outro modulo
projec1.exe ...
Como posso fazer para um form do project1 acessar uma base de dados com o
ponteiro definido no Project.
Ou seja ... kero abrir o form do project1 no registro definido pelo Project
Tudo está funcionando ... porém qdo abro o sistema 2 ele está no primeiro
registro do banco ...
Obrigado
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] integrando bases de dados
Olha o código que estou tentando ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' +chave ,sw_normal);
end;
desde já obrigado pela ajuda
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Minha duvida é a sgte tenho um Project.exe que chama outro modulo
projec1.exe ...
Como posso fazer para um form do project1 acessar uma base de dados com o
ponteiro definido no Project.
Ou seja ... kero abrir o form do project1 no registro definido pelo Project
Tudo está funcionando ... porém qdo abro o sistema 2 ele está no primeiro
registro do banco ...
Obrigado
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] integrando bases de dados
winexec ('\cicero\diauni\project1.exe ''' + chave +,sw_normal);
_
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Fios e Cabos
Enviada em: domingo, 4 de outubro de 2009 23:52
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olha o código que estou tentando ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' +chave ,sw_normal);
end;
desde já obrigado pela ajuda
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos. http://fiosecabos.ind.br/
ind.br/ -
cic...@fiosecabos. mailto:cicero%40fiosecabos.ind.br ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
[mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
os.com.br] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2soluti http://www.n2solutions.com.br/ ons.com.br/
www.n2solutions.com.br
http://www.nfe. http://www.nfe.n2solutions.com.br/ n2solutions.com.br/
www.nfe.n2solutions.com.br
http://www.studion2 http://www.studion2.com.br/ .com.br/
www.studion2.com.br
De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
os.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
mailto:delphi-br%40yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Minha duvida é a sgte tenho um Project.exe que chama outro modulo
projec1.exe ...
Como posso fazer para um form do project1 acessar uma base de dados com o
ponteiro definido no Project.
Ou seja ... kero abrir o form do project1 no registro definido pelo Project
Tudo está funcionando ... porém qdo abro o sistema 2 ele está no primeiro
registro do banco ...
Obrigado
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos. http://fiosecabos.ind.br/
ind.br/ -
cic...@fiosecabos. mailto:cicero%40fiosecabos.ind.br ind.br
mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] integrando bases de dados
Não funcionou ...
Não entendi porque tem 3 apostrofes e depois 4
Tentei de diversas formas e não deu certo ...
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Dirceu Vasson Jr
Enviada em: segunda-feira, 5 de outubro de 2009 00:36
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
winexec ('\cicero\diauni\project1.exe ''' + chave +,sw_normal);
_
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: domingo, 4 de outubro de 2009 23:52
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olha o código que estou tentando ...
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
winexec ('\cicero\diauni\project1.exe' +chave ,sw_normal);
end;
desde já obrigado pela ajuda
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos. http://fiosecabos.ind.br/
ind.br/ -
cic...@fiosecabos. mailto:cicero%40fiosecabos.ind.br ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
[mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
os.com.br] Em
nome de Claudiney - Listas
Enviada em: domingo, 4 de outubro de 2009 00:08
Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
Assunto: RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2soluti http://www.n2solutions.com.br/ ons.com.br/
www.n2solutions.com.br
http://www.nfe. http://www.nfe.n2solutions.com.br/ n2solutions.com.br/
www.nfe.n2solutions.com.br
http://www.studion2 http://www.studion2.com.br/ .com.br/
www.studion2.com.br
De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
os.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
mailto:delphi-br%40yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Minha duvida é a sgte tenho um Project.exe que chama outro modulo
projec1.exe ...
Como posso fazer para um form do project1 acessar uma base de dados com o
ponteiro definido no Project.
Ou seja ... kero abrir o form do project1 no registro definido pelo Project
Tudo está funcionando ... porém qdo abro o sistema 2 ele está no primeiro
registro do banco ...
Obrigado
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos. http://fiosecabos.ind.br/
ind.br/ -
cic...@fiosecabos. mailto:cicero%40fiosecabos.ind.br ind.br
mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
[As partes desta mensagem que não continham texto foram removidas]
[As partes
Re: RES: [delphi-br] integrando bases de dados
Fios e Cabos escreveu: Não funcionou ... Não entendi porque tem 3 apostrofes e depois 4 Tentei de diversas formas e não deu certo ... Cícero, tente com o shellexecute; coloque o cursor do mouse entre os (), tipo assim ShellExecute(|), use shift+ctrl+space que abre um hint mostrando o que shellexecute pede, vai notar o Parameters, é aí onde você poderá informar tua chave pro modulo, não é menosprezando o winexec, é que realmente shellexecute tem um suporte melhor para esse caso aí. Não sei como você esta controlando os módulos para não abrir várias instâncias, notei que você usa componentes de 3os, veja o componente JvAppInstances, ele pode facilitar essa empreitada aí, além de controlar as instância ele monitora o que esta sendo enviado pro .exe (teu modulo). Boa sorte. ps. a idéia de passar a chave via parâmetro foi excelente ;) -- Silvio Clecio -- O sábio não satiriza o ignorante, esclarece-o fraternalmente.
RES: [delphi-br] integrando bases de dados
Olá Cícero.
Neste caso os dois são projetos diferentes, executáveis diferentes, conexões
diferentes ao banco de dados. Não vejo uma forma de comunicação direta entre
os dois. A única maneira que vejo é você passar na linha de comando, como
parâmetro na hora da chamada do Project1, o registro que você selecionou no
Project e lá no Project1 você buscar esse registro. Não vejo outra saída.
Tipo:
No momento da chamada no project você usar: project1.exe chavedoregistro
(ex: project1.exe 1534)
No Project um quando abrir fazer o select pra buscar o registro, algo como:
cdsTabela.CommandText := Select * from tabela where chave = +
paramStr(1);
ou
qryTabela.Sql := Select * from tabela where chave = + paramStr(1);
ou posicionar a tabela:
Locate('chave', paramStr(1), [loPartialKey]);
ParamStr(1) retorna para você o primeiro parâmetro passado na linha de
comando.
ParamStr(2) retorna o segundo e assim por diante.
ParamStr(0) retorna o nome do executável chamado.
Pode ser que assim você resolva. Não conheço outra maneira, mas pode ser que
alguém da lista conheça.
Um abraço
_
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
http://www.n2solutions.com.br/ www.n2solutions.com.br
http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br
http://www.studion2.com.br/ www.studion2.com.br
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Fios e Cabos
Enviada em: sábado, 3 de outubro de 2009 22:43
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] integrando bases de dados
Minha duvida é a sgte tenho um Project.exe que chama outro modulo
projec1.exe ...
Como posso fazer para um form do project1 acessar uma base de dados com o
ponteiro definido no Project.
Ou seja ... kero abrir o form do project1 no registro definido pelo Project
Tudo está funcionando ... porém qdo abro o sistema 2 ele está no primeiro
registro do banco ...
Obrigado
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
