Max Stringlen von Stringgrid.Cell

[wschrabi]

Hallo
meine Celle in einem Stringgrid ist 6700 Char lang. Es wird in der Stringgrid Table nicht angezeigt.
Was kann ich tun?
DANKE - habe Seattle.

[DP-Maintenance]

Dieses Thema wurde am "07. Feb 2019, 13:54 Uhr" von "Luckie" aus dem Forum "Programmieren allgemein" in das Forum "GUI-Design mit VCL / FireMonkey / Common Controls" verschoben.

[philipp.hofmann]

Ich kenne die Anwendung ja nicht, würde mich aber zu allererst fragen, ob ich in der Tabelle tatsächlich so viele Zeichen darstellen will oder in der Tabellendarstellung abkürze (…) und nur wenn man eine Zelle auswählt, alle Zeichen anzeige.
Ich selbst nutze die TMSFMXGrid-Implementierung, da kann man z.B. sehr einfach einer Zelle ein Kommentar zuordnen und dort kann ich dann auch längere Einträge darstellen.

[wschrabi]

Danke, ja ich weiss.. aber es ist ein TEXT der sehr variable sein kann von 1 - 7000 Zeichen.
Ich hab es jetzt in ein MEMO copiert, da zeigt er alles an. Dh in der Celle ist es drin,nur wird
am Screen in dem STringgrid nur eine leere Zeile sichtbar.
KOmisch nicht? Wenn die Note ca 200 Zeichen lang ist, klappt es wunderbar.

Danke für Deinen RAT:
mfg
ws

[hoika]

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;

[TurboMagic]

Zitat:

Zitat von hoika (Beitrag 1424988)

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?

[hoika]

Hallo,
das war gerade D2007 ...

[Delphi.Narium]

Bei Delphi 7 geht das auch, solange nicht am Anfang eines Textes ein Zeilenumbruch steht, dann sieht man da auch nix.

Es wäre also mal interessant zu erfahren, ob es sich bei den bis zu 7000 Zeichen langen Texten um Einzelier handelt oder um "richtige" Texte, also irgendwas mit ..,- und Zeilenumbrüchen und ggfls. irgendwelchen Formatierungen ...

[hoika]

Hallo,
#TurboMagic,
das war ein Minimal-Beispiel, was der Tread-Ersteller einfach mal testen soll.
Der nächste Eintrag von #Delphi.Narium zeigt ja mögliche "Fehler" auf.

Ich wollte erst mal nur verhindern, dass jemand dem armen TStringGrid die Schuld gibt,
dass bestimmten Daten nicht angezeigt werden.

[peterbelow]

Das VCL TStringgrid hat keinen Limit für die Länge des Textes in einer Zelle. Enthält dein Text vielleicht #0 oder einen Zeilenumbruch? Ist das Grid read-only oder editierbar? Wenn letzteres, goAlwaysShowEditor in Options oder nicht? Erscheint der Text wenn Du die Zeilenhöhe vergrößerst?