скрыть ячейки в таблице StringGrid

[РИЯ]

есть таблица с 3-мя столбцами, колличество строк создаются динамически, необходимо чтоб строки скрывались?

[mihali4]

Если нужно скрыть нижние N строк, зададим
StringGrid1.Row.Count:=StringGrid1. Row.Count-N;

При этом скрытые строки никуда не денутся и их можно вновь показать, восстановив количество строк:
StringGrid1.Row.Count:=StringGrid1. Row.Count+N.

[РИЯ]

Если количество строк фиксированно, то работает, а если переменное то нет! почему?

[Stilet]

Рия, есть два неплохих варианта:
1 - Воспользоваться соответственно навороченными компонентами
2 - Однажды мне стукнула в голову идея просто напросто делать строки невидимыми поставив им высоту равную нулю. Вот примерно так:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Grids;

type
TForm1 = class(TForm)
StringGrid1: TStringGrid;
procedure StringGrid1SelectCell(Sender: TObject; ACol, ARow: Integer;
var CanSelect: Boolean);
procedure StringGrid1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.StringGrid1SelectCell(Sender : TObject; ACol,
ARow: Integer; var CanSelect: Boolean);
begin
if StringGrid1.RowHeights[arow]=0 then
if arow<>StringGrid1.RowCount-1 then
StringGrid1.Row:=arow+1;
//CanSelect:=false;
end;

procedure TForm1.StringGrid1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var a,b:integer;
begin
// Если кликну по первой колонке
// та строка по которой кликну сузится до нуля
a:=StringGrid1.MouseCoord(x,y).x;
b:=StringGrid1.MouseCoord(x,y).y;
if a=0 then
StringGrid1.RowHeights[b]:=0;
end;

end.


Единственная заморочка это пропускать при переходе строчки с нулевой высотой. А так более или менее.

Но это только как вариант.

[РИЯ]

Спасибо огромное! До меня дошло, что надо было сделать! просто тэг <tbody> надо было определить в другом месте!