Ver Mensaje Individual
  #3  
Antiguo 08-09-2006
jorllazo jorllazo is offline
Miembro
 
Registrado: sep 2006
Ubicación: Valencia, España
Posts: 83
Reputación: 18
jorllazo Va por buen camino
Me refiero pues por ejempplo que uses los componentes de ADO, TAdoTable, TAdoConnection y luego usar el componente TDBEdit por ejemplo para recuperar el nombre de un articulo de la BD? y usar estos componentes TDBEdit, TDBCombo, etc,....

Pôr otro lado a lo que me refiero es crear una clase que sea por ejemplo

Código Delphi [-]
 
           type 
                  TArticulo = class
                  private
                      sReferencia : string;
                      sDescripcion : string
                      iCantidad : Short;
                  public
                      property Referencia: string read Referencia write Referencia
                      property Descripcion: string read Descripcion write Dascripcion
                      property Cantidad: short read Cantidad write Cantidad
                      procedure loadFromDB;
           end
 
luego:
 
             procedure TArticulo.LoadFromDB
             begin
                   //codigo de acceso a datos para extraer este Articulo
                   //Rellenar las propiedades del artículo
                   //tarticulos es un TADoTable

                   sDescripcion := trim(tArticulos.fields['Descr'].Value);
                   iCantidad := tArticulos.fields['Cantidad'].Value;
                   .....
                   
             end

Ahora habiora que crear un Objeto de la clase, largarllo de la BD con su metodo y usarlo en el codigo. Pero entonces ya no podrias usar el TDBEdit por ejemplo. Tendrias que usar el TEDit y hacer la asociacion de controles y propiedades del objeto a mano. ¿Me he explicado mejor?, si no lo intento de nuevo
__________________
Gracias de Antemano
Responder Con Cita