Caros Colegas,

 

Voces com certeza ja devem ter utilizado o controle common dialog.

Alguem saberia me dizer qual a tecnica que este controle utiliza?

 

Por exemplo tenho um form1, e abro um form2 que vai me retornar uma

informacao para o form1, tipo uma pesquisa, como eu poderia fazer que este

resultado retorne para o form1, sem ter que ficar criando condicoes no form2

para ver de que form originou a pesquisa....

 

Hoje faço assim:

1. para abrir a pesquisa:

form2.show

form2.tag="form1"

2.No confirmar do form2 faco o seguinte:

if me.tag="form1" then

  form1.nome=me.nome

end if

unload me

Vc utiliza variáveis públicas ou globais. Exemplo:

 

Num módulo coloque

 

Global Texto as String

 

no seu form1:

 

Texto = "Teste"

 

No clique do botão do seu form2:

 

msgbox Texto

 

qq dúvida é só postar colega

 

at+

Entendi seu exemplo mas vc nao compreendeu direito minha duvida.

Ja havia pensado numa ideia como voce falou, posso utilizar variaveis globais. O problema é que qdo estou com o form1 aberto e chamo o form2 o procedimento deveria aguardar o form2 ser encerrado. Vi ate um procedimento de timer, ou seja, aguardar um form que foi aberto ser fechado para continuar executando o procedimento, mas nao deu muito certo.

 

Por isso que falei no controle commondialog, se for ver, e bem isso que preciso, qdo vc chama o commondialg nao e mais ou menos assim:

 

form.dialog.ShowOpen

arquivo = dialog.FileName

 

pois entao, enquanto vc nao fechar a janela do dialog, o sistema nao executa a 2ª linha. capiti?

 

se eu entendi direito:

 

no evento click de um botão no Form1 por exemplo:

 

Form2.show 1,me

 

Vc estará chamando o form2 modalmente e enqüanto o form2 não for encerrado o form1 fica "inacessível".

 

at+