Olha eu faço da seguinte forma:
Por exemplo tenho um formulário de OS e preciso pegar o código do cliente para
aquela os. o meu código fica assim:
Application.CreateForm(TFrmPesqCliCont,FrmPesqCliCont);
FrmPesqCliCont.Showmodal;
if FrmPesqCliCont.ModalResult = mrOK then
begin
DBEdit4.SetFocus;
DBEdit4.Text := FrmPesqCliCont.VAROS;
DBEdit5.SetFocus;
end;
FreeAndNil(FrmPesqCliCont);
Onde no formulário FrmPesqCliCont tenho um botão que está setado o modalresult
como mrOK e ao clicar nesse botão gravo em uma variável "VAROS", o código do
clientes.
No outro quando fecho o form de pesquisa, em meu form de OS antes de dar um
freeandnil eu pego o conteúdo da variável, sendo assim posso usar o mesmo form
de pesquisa para diversas situações.
Se eu entendi bem em seu caso você poderá chamar quantas vezes quiser esse form
de pesquisa e criando o form e destruindo logo após a utilização.
Cícero <[EMAIL PROTECTED]> wrote:
Eu costumo colocar um edit chave no formulario principal. O usuario digita
o codigo, eu vejo se o registro existe. Se existe eu seto alteração
(consulta por tabela) e caso contrario eu seto inclusão.
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de giuvany
Enviada em: sexta-feira, 15 de abril de 2005 15:34
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Aproveitar mesmo formulário de consulta
Boa tarde cristiano
Nos passe um pedaço do código_fonte
Ou do botão pra que possamos saber como vc está fazendo,
Pois a sua questão está um pouco confusa!
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Cristiano Rodrigo Gomes
Enviada em: sexta-feira, 15 de abril de 2005 15:24
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Aproveitar mesmo formulário de consulta
Olá pessoal, é o seguinte, tenho em um cadastro de produtos a necessidade de
cadastrar mais de um fornecedor, na verdade 3.
O que eu gostaria de fazer é o seguinte, criei um formulário de consulta
onde o usuário localiza o primeiro fornecedor.
Gostaria de aproveitar este mesmo formulário para localizar os outros 2
fornecedores, para não precisar cirar 3 forms de consultas, ou seja, qdo
clicar no botão localizar do 2o. fornecedor, ele crie uma variável ou algo
parecido e que no UNIT do botão OK do formulário de consulta ele saiba em
qual botão eu cliquei e assim transporte o código para o fornecedor onde
cliquei com o botão
Espero ajuda
Cristiano.
_________________________________________________________________
MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE
---------------------------------
Links do Yahoo! Grupos
Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do
Yahoo!.
__________________________________________________
Converse com seus amigos em tempo real com o Yahoo! Messenger
http://br.download.yahoo.com/messenger/
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
