Schleifen imStringGrid

[Peti]

Nunja nicht ganz, naja eigentlich ist mein Geschick mit Delphi eher begrenzt

Code:

var
  Form1: TForm1;
   min, max, schritt,i:Integer ;

procedure TForm1.Button1Click(Sender: TObject);
begin
min:=0;
max:=0;
schr:=0;
min:=strtoint(E_min.text);
max:=strtoint(E_max.text);
schritt:=strtoint(E_Schrittweite.text);
repeat i:=min+scritt;
until i=max;
end;

Wie würde man das jetzt immer fortlaufend ausgerechnete in die obere Zeile übertragen können?
Und könnte man mit nur Grundwissen von Delphi die Anzahl der Spalten der Zeile so veränderlich gestalten, das immer nur so viele Spalten erscheinen, wie nur gebraucht wird um die Zahlen darzustellen?