Скачать: CL | DM;

таблица 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]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.026 c