Spaltenbreite im Stringgrid ändern

[mkpre]

Ich habe in Bezug auf dieses Thema Delphi-PRAXIS noch eine Frage.

Zitat:

Es heißt TStringGrid.ColWidths[Index: integer], lässt sich also für jede Spalte einzeln einstellen.

Ich habe den folgenden Code geschrieben:

Delphi-Quellcode:

begin
            y := IntToStr (i);
            tab.cells [0,i]:=y;
            readln (Umsatz,x);
            tab.cells[0,i]:=copy (x,2,10);
            tab.cells[1,i]:=copy (x,13,5);
            tab.cells[2,i]:=copy (x,19,50-1);
            i:=i+1;
         end;
         closefile (Umsatz);
         zeilenzahl :=i-1;
end;

und weiß nun nicht wo ich

Delphi-Quellcode:

  tab.ColWidths  [500];

einfügen soll.
Es wäre schön, wenn mir jmd. helfen könnte.
Danke

[Die Muhkuh]

Hi,

welche Spalte willst Du denn anders darstellen?

Delphi-Quellcode:

tab.ColWidths[0] = 150;

Damit ist die erste Spalte 150px breit.

[mkpre]

Die ersten beiden Spalten sollen 100px und die letzte 300px groß sein.
Kannst du vielleicht deinen Code

Delphi-Quellcode:

tab.ColWidths[0] := 150;

in den hier einfügen

Delphi-Quellcode:

begin 
            y := IntToStr (i); 
            tab.cells [0,i]:=y; 
            readln (Umsatz,x); 
            tab.cells[0,i]:=copy (x,2,10); 
            tab.cells[1,i]:=copy (x,13,5); 
            tab.cells[2,i]:=copy (x,19,50-1); 
            i:=i+1; 
         end; 
         closefile (Umsatz); 
         zeilenzahl :=i-1; 
end;

[DeddyH]

Du wirst doch wohl in der Lage sein, 3 Zeilen in Deinen Code einzufügen. Die erste Spalte hat den Index 0, die zweite folgerichtig Index 1, usw.