DBGrid que adapte sus columnas en función del ancho del contenedor

[Kenobi]

Hola gracias a sus respuestas logre hacer el siguiente procedimiento valido para los tipos dbgrid

Código Delphi [-]
Procedure adaptar_Grid(Grid:TDbGrid);
var
  ancho,i : integer;
begin
  ancho := Grid.Width;
  for i := 0 to Grid.Columns.Count -1 do
  begin
  Grid.Columns[i].Width := (ancho * Grid.Columns[i].tag) div 100 ;
  end;
end;

Sin embargo y dada la naturaleza de mis forms esta ocurriendo algo no muy deseable:
algunos de mis forms tienen dentro de si control pageControl dentro de los cuales en distintos tabs hay dbgrids, con el uso del procedure anterior en el evento onrezise del form los configuro a todos:

Código Delphi [-]
adaptar_grid(dbgrid1);
adaptar_grid(dbgrid2);
.
.
.
adaptar_grid(dbgrid..N);

Mas sin embargo el unico que realmente se adapta es aquel que se encuentre visible al momento de re dimensionar el form

esa es mi nueva duda
Gracias por todo

[[AgustinOrtu]]

Y cual es el problema si los que no se redimensionan no se ven??

[Kenobi]

Hola, gracias por tu respuesta, el problema es que la navegación entre los tabs del form es cosa frecuente de forma que si solo se redimenciona uno se ven muy mal el resto ...
No se si me explico, vuelvo a describir mi form

un form muestra la información de una entidad en particular, esta información esta distribuida en componentes db en un panel con alineación top, el resto del form esta ocupado por un control pageControl dentro del cual hay varios tabs(uno por cada tabla relacionada) donde muestro la información pertinente de cada tabla relacionada(relaciones uno a muchos) pues claro la idea es que los grids de estos tabs mantengan cierta coherencia entre si en cuanto al diseño y como luego de consultar un registro todas la entidades se actualizan, el usuario revisara(o no ) cada una de esas pestañas en busca de la información que para el momento considere pertinente, por tal razon si que es un problema,
gracias una vez mas por tu comentario ....

[pacopenin]

Supongo que será porque no usas columnas persistentes en el grid. Probablemente tenga que llamar a adaptar_grid después de abrir las tablas/qwerys correspondientes....o al cambiar de tab.

[[AgustinOrtu]]

En donde llamas al proceso que adapta los grid? Proba hacerlo en algun evento del PageControl, por ejemplo en el OnPaint

[Kenobi]

si que uso columnas persistentes en mis grids de hecho el grid tiene una propiedad autofill que adapta perfectamente las columnas, solo que las distribuye uniformemente lo cual no es deseable porque el ancho de los contenidos es variable ....

[Kenobi]

busco y busco y no encuentro un repositorio de los rx confiable, algunos que descargo no instalar por errores (no de dependencias) que otros componentes grid me sugieren, por alli encontre unos llamados virtualtree que según se puede lograr algo mas no tienen componentes db....
Gracias