Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #5  
Antiguo 16-11-2003
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Poder: 30
jachguate Va por buen camino
Cool

bien.

No discutiré si es la mejor forma de hacerlo o no, pero creo que podes definir una propiedad en el formulario, bien un DataSet o un DataSource (depende de tu conveniencia). Y el el método que asigne la propiedad hacer el "trabajo sucio" de identificar los campos y crear controles para ellos.

Algo como:

Código:
Type
  TFormaABM = class(TForm)
  private
  ...
    FDataSet : TDataSet;
  ...
    Procedure SetDataSet(Value : TDataSet);
  public
    Property DataSet : TDataSet read FDataSet write SetDataSet;
  end;

Implementation
...
  Procedure TFormaABM.SetDataSEt(Value : TDataSet);
  
  Begin
    if assigned(FDataSet) Then
      BorrarControlesViejos;
    FDataSet := Value;
    CrearControlesNuevos;
    FDataSet.FreeNotification(Self);
  End;
Donde BorrarControlesViejos tendrá la lógica para eliminar los controles asociados al dataSet y CrearControlesNuevos tendrá la lógica para escanear la propiedad Fields del DataSet y crear los controles apropiados para cada uno.

En fin... es solo una idea.

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 18:46:59.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi