Einzelnen Beitrag anzeigen

Benutzerbild von Lannes
Lannes

Registriert seit: 30. Jan 2005
Ort: Münster
745 Beiträge
 
Delphi 3 Professional
 
#2

Re: [StringGrid] berechnen d. Zellenbreite nach resize

  Alt 6. Feb 2007, 22:50
Hallo,

Rahmen-, Srollbar- und die Gitterlinienbreite in die Berechnung einbeziehen, das Grid hat 5 Spalten.
ClientWidth ist gleich Width - Rand - Scrollbar
Delphi-Quellcode:
var iFixCol : Integer;
begin
  iFixCol := 50;
  StringGrid1.DefaultColWidth := ((StringGrid1.ClientWidth-iFixCol) div 4) - StringGrid1.GridLineWidth;
  StringGrid1.ColWidths[0] := iFixCol+(StringGrid1.ClientWidth-iFixCol) mod 4;
//..
showmessage('Achtung! Differenz: '+IntToStr(StringGrid1.Width-StringGrid1.ClientWidth));
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
  Mit Zitat antworten Zitat