Caral
Cita:
Hola
Sigo sin entender.
Veo que se busca el proveedor y el nombre, me imagino que de una tabla, pero no veo que se recorra.
No creo que se pueda llenar mas de un dato si solo se pide uno.
No entiendo.
|
Esto fue lo que hice al hacer al evento dobleclick del DBGrid
Código Delphi
[-]
var
cod_idProveedor,cod_idProveedor2,cod_idProveedor3: Integer;
Nombre, Nombre2, Nombre3: String;
procedure TfrmBuscaProveedor.dbgBuscaProveedorDblClick(Sender: TObject);
begin
cod_idProveedor := dmacceso.cdsProveedoresID.AsInteger;
Nombre := dmacceso.cdsProveedoresNOMBRE.AsString;
frmModificaArticulo.eProveedor1.Text := frmBuscaProveedor.Nombre;
frmModificaArticulo.edbProveedor1.Text := IntToStr(frmBuscaProveedor.cod_idProveedor);
cod_idProveedor2 := dmAcceso.cdsProveedoresID.AsInteger;
Nombre2 := dmAcceso.cdsProveedoresNOMBRE.AsString;
frmModificaArticulo.eProveedor2.Text := frmBuscaProveedor.Nombre2;
frmModificaArticulo.edbProveedor2.Text := IntToStr(FrmBuscaProveedor.cod_idProveedor2);
Close;
end;
Esta es la forma que yo estoy haciendo... y esta forma no me sirve
porque me pone el mismo proveedor en los restantes edit y dbedit...
Saludos