Global resolveu em parte, pra exibir 3 ou 2 opções, se fosse o caso eu tive
usar if sem else if, assim:
procedure Tfrmassessoria.btnokClick(Sender: TObject);
begin
if (cckatirador.Checked)then
begin
tiro:='Atirador';
frmpfisica.edtcategoria.Text:=tiro;
end;
if (cckcacador.Checked) then
begin
caca:= 'Caçador';
frmpfisica.edtcategoria2.Text:=caca;
end;
if (cckcolecionador.Checked) then
begin
colecao:='Colecionador';
frmpfisica.edtcategoria3.Text:= colecao;
end;
if rdbfisica.Checked then
begin
frmpfisica.ShowModal;
end;
end;
Aí deu legal.
Mas Rubens, será que vc não consegue me ajudar na 'paradinha' de abrir um
documento no word, ainda estou me debatendo, mas de qlq jeito obrigada, ah e
valeu pela dica dada e aproveitada
Abraço
Janise
--------------------------------------------------
From: "Rubens Antunes" <[EMAIL PROTECTED]>
Sent: Sunday, November 16, 2008 12:48 PM
To: <delphi-br@yahoogrupos.com.br>
Subject: Re: [delphi-br] Exibir dados de um form em outro
> Janise
>
> Crie uma variável global e adicione a informação nela, ai vc poderá pegar
> essa informação em qualquer lugar do seu projeto
>
> Abraço
>
> Rubens Antunes
>
> --- Em dom, 16/11/08, Janise Dantas <[EMAIL PROTECTED]> escreveu:
>
> De: Janise Dantas <[EMAIL PROTECTED]>
> Assunto: [delphi-br] Exibir dados de um form em outro
> Para: "lista-delphi" <[EMAIL PROTECTED]>
> Data: Domingo, 16 de Novembro de 2008, 13:55
>
> Como eu faço pra exibir a opção feita em outra form??
>
>
> Vixiiii!!! Peraí... assim ó... bem foi o que eu fiz, né!!
>
> procedure Tfrmassessoria.btnokClick(Sender: TObject);
> begin
> if rdbfisica.Checked then
> begin
> frmpfisica.ShowModal;
> end
> else if (cckatirador.Checked)then
> frmpfisica.edtcategoria.Text:='Atirador'
> else if (cckcacador.Checked) then
> frmpfisica.edtcategoria2.Text:='Caçador'
> else if (cckcolecionador.Checked) then
> frmpfisica.edtcategoria3.Text:='Colecionador';
> end;
>
> Só não exibi nada, nem dá o costumeiro erro, até senti falta.
>
> Ahhhh num pode fazer assim???
>
> Como é heim?!!!
>
> Estou me sentindo sozinha, ninguém mexe nos emails final de semana... ai
> que
> solidão... que abandono...
>
> J a n i s e
>
>
>
>
> ------------------------------------
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
>>>>>>
>
>
>
>
>
>
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados.yahoo.com
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
