Resize cols når resize form

Hvis du i din Form create gemmer forholdet mellem de enkelte cols og form bredden kan du så ikke bruge disse tal i FormRezise?

Jo, det må jeg da egentligt kunne, det prøver jeg lige i morgen. Sengetid.

du føler ikk for at lave et forslag, for det jeg får lavet, ender altid med at de ryger ud af forholdet til hinanden.
Grunden til at jeg ikk har smidt min kode, er for ikke at smadre din hjerne så den tænker på samme måde som mig ;)

Jeg har en form med en StringGrid1 på som er sat til alTop.

Definer denne variabel:
SCols : array of real;

I FormCreate har jeg:
var
    i : integer;
begin
    SetLength(SCols,StringGrid1.ColCount+1);

    for i:=0 to StringGrid1.ColCount-1 do
        SCols[0]:=SCols[0]+StringGrid1.ColWidths[i];

    for i:=0 to StringGrid1.ColCount-1 do
        SCols[i+1]:=StringGrid1.ColWidths[i]/SCols[0];

  SCols[0]:=StringGrid1.Width-SCols[0];
end;

I FormResize har jeg:
var
    i : integer;
begin
    for i:=0 to StringGrid1.ColCount-1 do
        StringGrid1.ColWidths[i]:=Round((StringGrid1.Width-SCols[0]) *SCols[i+1]);
end;


Jeg prøvede først blot at kikke på forholdet mellem de enkelte cols og bredden af StringGrid men det virkede ikke helt, så det koden nu gør er at kikke på hvor meget fri plads der er i StringGrid og så sørge for at det hele tiden er det samme.

Det ser ud til at virke fint,sådan da, så det bliver det, indtil videre. smider du et svar ?

"sådan da"? hvad virker ikke som det skal?

Den forskyder dem stadig lidt, men det er uden betydning.