Einzelnen Beitrag anzeigen

TurboMagic

Registriert seit: 28. Feb 2016
Ort: Nordost Baden-Württemberg
2.960 Beiträge
 
Delphi 12 Athens
 
#6

AW: Max Stringlen von Stringgrid.Cell

  Alt 7. Feb 2019, 20:32
Hallo,
hm, also bei mir geht's.

Delphi-Quellcode:
type
  TForm1 = class(TForm)
    StringGrid1: TStringGrid;
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;


procedure TForm1.FormCreate(Sender: TObject);
var
  sString: String;
  iChar: Integer;
begin
  sString:= '';
  for iChar:= 1 to 600 do
  begin
    sString:= sString+'123456789';
  end;
  StringGrid1.Cells[0,0]:= sString;
  StringGrid1.Colwidths[0]:= 1000;
end;
Gut, dass es bei dir geht. Nur in welchem Delphi?
Vielleicht einem neueren als Seattle, das der OP benutzt?
  Mit Zitat antworten Zitat