Buenos días chicos, les comento mi problema. estoy trabajando con Metodos estructurales.
Tengo 2 librerias , una de doble enlace y otra de arbol.
El problema es el siguiente, tengo que capturar desde un formulario, todos los codigos y descripciones de Rubros almacenados (que se encuentran en otro formulario ) dentro de un combobox al entrar en él.
Este es el codigo
Código Delphi
[-]procedure TArticulo.ComboBox1Enter(Sender: TObject);
var
pos, ult:tipo_pos;
reg: tipo_reg_datos;
rubro_aux:tipo_me;
begin
combobox1.Clear;
pos:=0;
doble_enlace_rubros.Abrir_Me(rubro)
ult:= doble_enlace_rubros.Ultimo(rubro);
while pos<=ult do
begin
doble_enlace_rubros.Capturar_Info(rubro,pos,reg);
articulo.ComboBox1.AddItem(inttostr(reg.Cod_rubro)+ ' '+ reg.Nom_rubro,articulo.ComboBox1);
pos:=pos+1;
end;
end;
Comento que el metodo "Rubro" lo creo en el FormCreate, y en las units utilizadas ya tengo declaradas la libreria de doble enlace y la del formulario de donde utilizo y creo "Rubro"
El error que salta es el I/O 103
Espero sepan disculpar las molestias y que puedan ayudarme.
Saludos