таблица StringGrid

← →
Lex85 (2005-11-13 19:24) [0]

Как сделать так, чтобы в таблице StringGrid все ячейки были в пассивном состоянии (не выделены особым цветом или рамкой из точек).

← →
StringGrid (2005-11-13 20:20) [1]

procedure TForm1.FormCreate(Sender: TObject);
begin
StringGrid1.ColCount:=10;
StringGrid1.rowCount:=10;
StringGrid1.FixedCols:=0;
StringGrid1.FixedRows:=0;

StringGrid1.DefaultDrawing:=false;
end;

procedure TForm1.StringGrid1MouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
StringGrid1.DefaultDrawing:=true;
end;

← →
StringGrid (2005-11-13 20:40) [2]

И еще что бы убрать выделение:

procedure TForm1.Button1Click(Sender: TObject);
var s:TGridRect; T:TGridCoord;
begin
T.X:=10;
T.Y:=0;
s.Bottom:=0;
s.TopLeft:=T;
StringGrid1.Selection:=s;
end;

← →
on-lite © (2005-11-13 21:18) [3]

Попробуй толщину линий свести к нулю GridLineWidth:=0
ну а на счет выделений(!) особым цветом тебе уже подсказали!%-)
DefaultDrawing=false

← →
lex85 (2005-11-13 21:21) [4]

Большое спасибо. Все заработало!!!

← →
lex85 (2005-11-13 21:22) [5]

Удалено модератором

таблица StringGrid Найти похожие ветки