Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

таблица StringGrid [D7, XP]


Lex85 ©   (2005-11-13 19:24:00) 

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


lex85   (2005-11-13 21:22:00) [1]

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


lex85   (2005-11-13 21:21:00) [2]

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


on-lite   (2005-11-13 21:18:00) [3]

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


StringGrid   (2005-11-13 20:40:00) [4]

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

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;


StringGrid   (2005-11-13 20:20:00) [5]

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;


Наверх

Титульная страница Поиск, карта сайта Написать письмо