Campo asociado a combobox

[ecfisa]

Hola.

En tu código estas cargando el mismo campo (SelecEPOCA_NUM) en el combo.

Te pongo un ejemplo que hace lo que entendí que deseabas hacer:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  Selec.Open;
  while not Selec.Eof do
  begin
    ComboBox1.AddItem(SelecEPOCA.AsString, TObject(SelecEPOCA_NUM.AsInteger));
    Selec.Next;
  end;
  Selec.Close;
end;

procedure TForm1.ComboBox1Click(Sender: TObject);
var
  cb: TComboBox;
  num: Integer;
  epo: string;
begin
  cb  := TComboBox(Sender);      // SelecEPOCA
  epo := cb.Items[cb.ItemIndex]; // SelecEPOCA_NUM
  num := Integer(cb.Items.Objects[cb.ItemIndex]);
  ShowMessageFmt('EPOCA         : %s%sEPOCA_NUM: %d',[epo, #10,num]);
end;

Saludos