thetho Postado Junho 28, 2005 Denunciar Share Postado Junho 28, 2005 opa..gostaria de saber como faço para saber quando um determinado radiobutton do meu componente RadioGroup está selecionado..usei o seguinte código (abaixo), mas apresentou erro.. agradeço muito se puderem me ajudar.. Obrigadoo..att. Rodrigo..procedure TForm1.RadioGroup1Click(Sender: TObject);begin if radiogroup1.ItemIndex = 0 then begin label1.Caption := 'CPF'; label2.Caption := 'Nome'; label1.Left := 48; label1.Left := 40; maskedit1.Clear; edit1.Clear; edit1.SetFocus; maskedit1.EditMask := '000.000.000-00'; maskedit1.Enabled := true; edit1.Enabled := true; end else begin label1.Caption := 'CNPJ'; label2.Caption := 'Razão Social'; label1.Left := 46; label2.Left := 10; maskedit1.Clear; edit1.Clear; edit1.SetFocus; maskEdit1.EditMask := '00.000.000/0000-00'; maskedit1.Enabled := true; edit1.Visible := true; end;end;erro: CANNOT FOCUS A DISABLED OR INVISIBLE WINDOW.. Link para o comentário Compartilhar em outros sites More sharing options...
0 Guest LeandroSarno Postado Junho 28, 2005 Denunciar Share Postado Junho 28, 2005 Meu caro colega de programação,Verifique se seu componente (Radio) está com visible = False.Se estiver coloque True.Se puder fale mais sobre seu programaPara que é e o que você pretende com ele, talvez posso ajudar.Valeu. Link para o comentário Compartilhar em outros sites More sharing options...
0 thetho Postado Junho 28, 2005 Autor Denunciar Share Postado Junho 28, 2005 cara, valeu mesmo..fiz o que você falou e deu certo..agradeço muito..até a próxima..brigado ae..teh+ Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
thetho
opa..
gostaria de saber como faço para saber quando um determinado radiobutton do meu componente RadioGroup está selecionado..
usei o seguinte código (abaixo), mas apresentou erro.. agradeço muito se puderem me ajudar.. Obrigadoo..
att. Rodrigo..
procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
if radiogroup1.ItemIndex = 0 then
begin
label1.Caption := 'CPF';
label2.Caption := 'Nome';
label1.Left := 48;
label1.Left := 40;
maskedit1.Clear;
edit1.Clear;
edit1.SetFocus;
maskedit1.EditMask := '000.000.000-00';
maskedit1.Enabled := true;
edit1.Enabled := true;
end
else
begin
label1.Caption := 'CNPJ';
label2.Caption := 'Razão Social';
label1.Left := 46;
label2.Left := 10;
maskedit1.Clear;
edit1.Clear;
edit1.SetFocus;
maskEdit1.EditMask := '00.000.000/0000-00';
maskedit1.Enabled := true;
edit1.Visible := true;
end;
end;
erro: CANNOT FOCUS A DISABLED OR INVISIBLE WINDOW..
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados