Crear TabSheet...

[[Lepe]]

Ahh, vale, vale, si el cliente lo pide se hace y punto (ya me ha pasado jejej).

Crear el DBgrid es exactamente lo mismo. Crear, asignar el padre (parent) que será el tabsheet, asignar el el datasource y por último hacer un grid.RebuildColumns (esto hace que tome de la base de datos la definición de cada columna, con el displayWith (ancho de cada columna, formato para mostrar cada columna, etc).

En principio, tampoco hace falta llamar a Rebuildcolumns, creo que se hace internamente, aunque a mí me gusta hacerlo de forma explícita.

Si dentro de cada TabSheet va lo mismo, es decir, un grid, un par de botones, etc. Yo te aconsejaría hacer un Frame, en él pones el grid, los botones que te haga falta y alguna que otra rutina que necesites.

Después de crear el TabSheet, creas dentro una instancia de ese frame. Así quizás puedas tener más facilidad de trabajo.

Saludos

[[Lepe]]

Para hacerlo parametrizable, yo guardaría algo así en la Base de datos, (supongo que es más o menos lo que has hecho) quizás te aporte algo:

Tabla de configuración:

Name                          Valor
TabsheetNames            articulos, proveedores, ventas

sqlarticulos             select codigoArticulo, descripcion  from articulos
sqlproveedores           select codigoprov, nombre  from proveedores where %s
sqlventas                select codigoVenta, codigo Articulo from ventas where %s

Para guardar los nombres de los tabsheet, te puedes ayudar del CommaText de un StringList

Se supone que cada tabsheet tendrá un Query asociado al grid, y guardamos el sql de cada uno de esas querys.

Saludos

[vladimirbp]

tendrás por ahi algun ejemplito??, suponiendo que ya tengo el PageControl con sus TabSheets, el ADOQuery y el DataSource.

gracias

Empezado por Lepe

Ahh, vale, vale, si el cliente lo pide se hace y punto (ya me ha pasado jejej).

Crear el DBgrid es exactamente lo mismo. Crear, asignar el padre (parent) que será el tabsheet, asignar el el datasource y por último hacer un grid.RebuildColumns (esto hace que tome de la base de datos la definición de cada columna, con el displayWith (ancho de cada columna, formato para mostrar cada columna, etc).

En principio, tampoco hace falta llamar a Rebuildcolumns, creo que se hace internamente, aunque a mí me gusta hacerlo de forma explícita.

Si dentro de cada TabSheet va lo mismo, es decir, un grid, un par de botones, etc. Yo te aconsejaría hacer un Frame, en él pones el grid, los botones que te haga falta y alguna que otra rutina que necesites.

Después de crear el TabSheet, creas dentro una instancia de ese frame. Así quizás puedas tener más facilidad de trabajo.

Saludos

[[Lepe]]

Como te dije es más fácil crear un componente en ejecución (el frame) que 3 componentes.

En delphi, file -> new -> frame

ahora dentro colocas el grid, el datasource, el query y los enlazas todos. Obviamente no funciona porque falta asignar el sql, pero eso creo que es lo de menos ¿no?

Guarda como FrameBase (el Frame en sí, como si fuera un Form) y como UFrameBase el .pas

Si lo vas a usar en el Form1, haces esto:

Código Delphi [-]

uses UFrameBase;

procedure TForm1.Form1Create(....);
var frame :TFrameBase;
begin
   frame := TFrameBase.Create(Self);
   with frame do
   begin 
      top := 10;
      left:= 10;
      parent := TabSheet1;
      Query1.sql.text := 'select * FROM ARTICULOS';
      Query1.Open;
      DBGrid.RebuildColumns;
   end;
end;

Saludos

[[AzidRain]]

Según veo como lo quiere tu cliente es que empieza siempre en la primera pestaña, luego de algún registro que esté consultado puede obtener detalles del mismo en las otras pestañas.

No entiendo tu concepto de "parametrizables", como lo planteas el número de tablas (y pestañas) que vas a utilizar es fijo (artículos,proveedores, ventas) por lo que no veo caso ir creando en tiempo de ejecución los querys y pestañas.

De acuerdo a como lo quiere tu cliente, necesitas efectivamente las tres tablas pero como ya vimos que dos de ellas son detalle de la primera,podrías usar un enfoque "Maestro-Detalle" y hacer los enlaces correspondientes. De forma que cada vez que cambias de artículo los otros querys se actualizan en automático con la información pertinente.

Ahora bien, no siempre se puede esto porque implica cargar las tablas completas...miles de registros a veces.

Entonces si se va a ejecutar el query cada vez que se quiere accesar a los detalles es exactamente el mismo caso de poner las pestañas previamente con sus grids dentro y unicamente ejecutar el query de cada grid de detalle cuando el cliente haga click en la pestaña por primera vez. La secuencia sugerida podria ser:

1.- El cliente abre la ventana y se le muestran los artículos (la ventana tiene las tres pestañas)
2.- El cliente hace click en proveedores para ver los que venden ese artículo
3.- La aplicación verifica si se seleccionó un artículo distinto y si no está ya abierto el query de proveedores...en su caso lo abre (con el parametro que corresponda)
4.-Se muestra el grid con los proveedores.
5.- Se repite 3 y 4 para las otras pestañas de detalle si el cliente las usa.
6.-Si el cliente cambia de artículo, cerrar los otros querys (ya no corresponden al artículo)

[vladimirbp]

AzidRain

manejo el concepto de parametrizable ya que esa misma pantalla de articulos la podré reutilizar para crear otros catalogos que tambien podrían llevar 1 o mas pestañas.

Los parametros los guardaré en tablas y los cargaré al iniciar mi aplicación. Por ejemplo: SQL del catalogo, orden, botones que estaran visibles o invisibles segun el usuario, etc.

Empezado por AzidRain

Según veo como lo quiere tu cliente es que empieza siempre en la primera pestaña, luego de algún registro que esté consultado puede obtener detalles del mismo en las otras pestañas.

No entiendo tu concepto de "parametrizables", como lo planteas el número de tablas (y pestañas) que vas a utilizar es fijo (artículos,proveedores, ventas) por lo que no veo caso ir creando en tiempo de ejecución los querys y pestañas.

De acuerdo a como lo quiere tu cliente, necesitas efectivamente las tres tablas pero como ya vimos que dos de ellas son detalle de la primera,podrías usar un enfoque "Maestro-Detalle" y hacer los enlaces correspondientes. De forma que cada vez que cambias de artículo los otros querys se actualizan en automático con la información pertinente.

Ahora bien, no siempre se puede esto porque implica cargar las tablas completas...miles de registros a veces.

Entonces si se va a ejecutar el query cada vez que se quiere accesar a los detalles es exactamente el mismo caso de poner las pestañas previamente con sus grids dentro y unicamente ejecutar el query de cada grid de detalle cuando el cliente haga click en la pestaña por primera vez. La secuencia sugerida podria ser:

1.- El cliente abre la ventana y se le muestran los artículos (la ventana tiene las tres pestañas)
2.- El cliente hace click en proveedores para ver los que venden ese artículo
3.- La aplicación verifica si se seleccionó un artículo distinto y si no está ya abierto el query de proveedores...en su caso lo abre (con el parametro que corresponda)
4.-Se muestra el grid con los proveedores.
5.- Se repite 3 y 4 para las otras pestañas de detalle si el cliente las usa.
6.-Si el cliente cambia de artículo, cerrar los otros querys (ya no corresponden al artículo)

[vladimirbp]

gracias, lepe. Lo voy a intentar...

saludos

Empezado por Lepe

Como te dije es más fácil crear un componente en ejecución (el frame) que 3 componentes.

En delphi, file -> new -> frame

ahora dentro colocas el grid, el datasource, el query y los enlazas todos. Obviamente no funciona porque falta asignar el sql, pero eso creo que es lo de menos ¿no?

Guarda como FrameBase (el Frame en sí, como si fuera un Form) y como UFrameBase el .pas

Si lo vas a usar en el Form1, haces esto:

Código Delphi [-]

uses UFrameBase;

procedure TForm1.Form1Create(....);
var frame :TFrameBase;
begin
frame := TFrameBase.Create(Self);
with frame do
begin
top := 10;
left:= 10;
parent := TabSheet1;
Query1.sql.text := 'select * FROM ARTICULOS';
Query1.Open;
DBGrid.RebuildColumns;
end;
end;





Saludos