Tlistview Gridlines

[TheReaper]

Tach!

Bei mir ist das Problem auch nicht!
Ich weiß nur das es ein vsreport sein muss. Versuch mal ein paar Columns einzufügen. Vielleicht liegts ja daran.

Du kannst es auch mal so probieren:

Delphi-Quellcode:

uses grids;
...
type
  **TListView = class(TCustomGrid)
  ****protected
    ****procedure WMSize(var Message: TWMSize); message WM_SIZE;
  ...
  *end;
...
procedure TListView.WMSize(var Message: TWMSize);
var
  **GridLines: Integer;*****************************************{ Temporäre lokale Variable }
begin
  **GridLines := 6 * GridLineWidth;*****************{ Gesamtgröße aller Zeilen berechnen }

  **DefaultColWidth := (Message.Width - GridLines) div 7;*****{ Neue Standardbreite }
  **DefaultRowHeight := (Message.Height - GridLines) div 7;**************{ und die Zellenhöhe}
*end;

Weiß aber nicht genau ob das Funktioniert! Hab das selbst bloß aus der Delphi-Hilfe.