Hallo #,

ersetze ich TStringGrid durch TAdvStringGrid, passen meine
"handoptimierten" Spaltenbreiten nicht mehr.

Grund: TAdvStringGrid hat beim Malen einen Einzug,
beginnt mit dem Zeichnen also etwas weiter rechts.

Bei folgendem Code wird das Datum beim AdvSG nicht komplett angezeigt.

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm20.FormCreate(Sender: TObject);
const F=8;
begin
  AdvSG.ColWidths[0]:=7*F+4;
  AdvSG.ColWidths[1]:=7*F+4;
  AdvSG.Cells[0,1]:= FormatDateTime('dd.mm.yyyy', Date);

  SG2.ColWidths[0]:=7*F+4; // normales StringGrid
  SG2.ColWidths[1]:=7*F+4;
  SG2.Cells[0,1]:= FormatDateTime('dd.mm.yyyy', Date);
end;

PS: AutoSize darf ich nicht verwenden.


Danke

Zitat von hoika:

Grund: TAdvStringGrid hat beim Malen einen Einzug,
beginnt mit dem Zeichnen also etwas weiter rechts.

Kannst du dann nicht einfach diesen Offset zusätzlich berücksichtigen?

Gruß
angos

Hallo,

schön, wenn man den Quellcode hat.

AdvSG.UpdateXYOffset(0, 0); löst das Problem.

Trotzdem Danke