![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#2
|
||||
|
||||
|
Sería mucho más fácil si trabajaras con un TRadioGroup:
Código:
procedure TForm1.RadioGroup1Click(Sender: TObject); begin Edit1.Text := RadioGroup1.Items[RadioGroup1.ItemIndex]; end; procedure TForm1.Edit1Exit(Sender: TObject); begin RadioGroup1.ItemIndex := TStringList(RadioGroup1.Items).IndexOf(Edit1.Text); end; Saludos!
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
|
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|