Items de Combobox con Tabla Paradox

[lKinGl]

no da error, ni nada, es como si pusieras un combobox en un formulario sin codificar asi de simple :S

este es mi codigo

Código Delphi [-]
form1.Table2.First;
  while form1.Table2.Eof do
    begin
      combobox1.Items.Add(form1.Table2.FieldValues['medida']);
      form1.Table2.Next;
    end;

[[egostar]]

Ah vaya, ya veo el problema

Código Delphi [-]
  form1.Table2.First;
  while not form1.Table2.Eof do begin
    combobox1.Items.Add(form1.Table2.FieldByName('medida').AsString);
    form1.Table2.Next;
  end;

Pequeño detalle, el barrido de la base solo la estas haciendo cuando es fin de archivo y debe ser al contrario, cuando NO sea fin de archivo.......

Edito, otro detalle que veo es el FieldValues, yo usaría FieldByName('medida').AsString

Salud OS

[lKinGl]

jajajaja dios mio que pena gracias por tu ayuda amigo

[Marwuinh]

Podrias indicar como quedo al final lo que hiciste

[lKinGl]

Empezado por Marwuinh

Podrias indicar como quedo al final lo que hiciste

Salu2 Marwuinh, mira yo lo hago de esta forma coloco 1ero que nada 1 componente Timer1 ok doy doble click y ahi coloco este código:

Código Delphi [-]
 if ComboBox#.Text='Seleccione' then
    begin
      ComboBox#.Clear;
      ComboBox#.Text:='Seleccione ';
      Table#.First;
        while not Table#.Eof do
          begin
            combobox#.Items.Add(Table#.FieldValues['campo_clave']);
            Table#.Next;
          end;
    end;
  exit;

eso es todo, hazlo y nos cuentas como te fué salu2

[Marwuinh]

Si hice lo que me dijste y realmente funciona, gracias

[lKinGl]

me alegro haberte ayudado amigo...