Ver Mensaje Individual
  #11  
Antiguo 27-06-2017
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.
Cita:
Empezado por rafaelon Ver Mensaje
... si mas adelante quisiera alimentar los datos de checkboxlist desde una tabla como podría hacer ?
Código Delphi [-]
// al inicio del formulario del CheckListBox:
procedure TForm1.FormCreate(Sender: TObject);
var
  clb: TCheckListBox;
begin
  clb := CheckListBox1;

  clb.Items.Clear;
  unQuery.Close;
  unQuery.SQL.Text := 'SELECT DESCRIPCION FROM SINTOMAS'; // (*) 
  unQuery.Open;
  while not unQuery.Eof do
  begin
    clb.Items.Add( unQuery.FieldByName('DESCRIPCION').AsString );
    unQuery.Next;
  end;
end;
(*) Donde: DESCRIPCION sería el nombre del campo que detalla el problema y SINTOMAS el nombre de la tabla que los contiene.

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita