Ver Mensaje Individual
  #16  
Antiguo 23-07-2007
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 25
Caral Va por buen camino
Paso 8:
Bueno como estoy entretenido con esto, va el siguiente avance:
Ya tenemos la factura, ya enlazamos a los clientes y a los articulos, ahora necesitamos que al enlazarlos nos traiga la informacion que solicitamos al form de facturar.
Para empezar agrega un par de clientes y un par de articulos a las tablas, con esto veras los resultados.
Bien:
En el form de Clientes (FMantClientes).
Vamos a agregar unas lineas de codigo en Public:
Código Delphi [-]
 public
    { Public declarations }
     Cod_Cliente: string;
     NombreCliente: string;
  end;
Aqui estoy diciendo que me mantenga estas variables publicas, ya que las usare en el form de Factura, como ves las declare en un form y las usare en otro.
En el mismo from Clientes (FMantClientes).
En el boton de cerrar:
Código Delphi [-]
Cod_Cliente := ADOTable1CodCliente.AsString;
NombreCliente := ADOTable1NombreCliente.AsString;
Close;
Aqui estoy diciendo que cuando cierre, quiero estas variables declaradas en relacion a la tabla.

Lo mismo vamos a hacer en el form Articulos (FArticulos).
En Public:
Código Delphi [-]
 public
    { Public declarations }
     Cod_Parte: string;
     Descripcion: string;
  end;
Y en el boton cerrar:
Código Delphi [-]
Cod_Parte := ADOTable1CodProducto.AsString;
Descripcion := ADOTable1Descripcion.AsString;
Close;
Creo que esta muy claro, si no pregunta.
Hecho esto, aqui esta el form de factura con los cambios necesarios, no hace mucho mas de momento, ya lo hara.
Saludos

Última edición por Caral fecha: 21-02-2008 a las 18:37:00.
Responder Con Cita