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

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

StringGrid [D6, XP]


Id ©   (2006-08-10 13:55:00) 

Здраствуйте, уважаемые мастера.
Как сделать так, чтобы при наведении на определенную запись в StringGrid-e она изменяла свой шрифт


Id   (2006-08-10 17:05:00) [1]


> clickmaker ©   (10.08.06 16:47) [11]

Очень благодарю


clickmaker   (2006-08-10 16:47:00) [2]


> как этого избежать?

проверять, вошла ли мышь в ячейку, обновить 1 раз. Следущий раз обновлять, только если мышь вышла и вошла в другую


Id   (2006-08-10 16:41:00) [3]

Вот, что в результате получилось (см.тему)

procedure TForm2.StringGrid1MouseMove(Sender: TObject; Shift: TShiftState;
 X, Y: Integer);
begin
StringGrid1.MouseToCell(x,y,co,ro);
StringGrid1.Refresh;
end;

procedure TForm2.StringGrid1DrawCell(Sender: TObject; aCol, aRow: Integer;
 Rect: TRect; State: TGridDrawState);
begin
 if (acol=co) and (arow=ro) then begin
  with StringGrid1.Canvas do begin
    font.Color:=clBlue;
    font.Style:=[fsUnderline]  ;
    FillRect(Rect);
    TextOut(Rect.Left+1,Rect.Top+1,StringGrid1.Cells[co,ro]);
  end;
 end;

end;


где co,ro: Longint - глобальные переменные
Но видимо из-за частого Refresh, получается очень неприятное мигание таблицы, как этого избежать?


clickmaker   (2006-08-10 16:25:00) [4]


> Id   (10.08.06 16:18) [8]

не надо так делать
Grid.Refresh() или Grid.Repaint
либо Invalidate


Id   (2006-08-10 16:18:00) [5]


> clickmaker ©   (10.08.06 16:00) [7]

Разобрался, спасибо.
Еще вопрос, Как правильнее вызвать прорисовку определенной ячейки из другой процедуры?
Пробую вызвать
StringGrid1DrawCell(sender,c,r,rect,state),
возникают проблемы с параметрами rect  и state, что указывать в них?


clickmaker   (2006-08-10 16:00:00) [6]


> можно пример

в справке есть


Id   (2006-08-10 15:52:00) [7]


> clickmaker ©   (10.08.06 14:56) [5]


>
> MouseToCell()

Несовсем понятно, можно пример.


clickmaker   (2006-08-10 14:56:00) [8]


> Как поймать нужную запись?

MouseToCell()


Сергей М.   (2006-08-10 14:49:00) [9]


> данные переменные неизменяются


А почему они должны изменяться ?


> равно нулю


Для ячейки в верхнем левом углу процедура действительно будет вызвана с нулевыми упомянутыми параметрами

Для любой другой ячейки утверждение не соотв-ет действительности


Id   (2006-08-10 14:39:00) [10]


> clickmaker ©   (10.08.06 14:20) [1]


> OnDrawCell

В данной процедуре используются переменные Arow и ACol. я так понимаю, что это координаты прорисовываемой ячейки, но при по шаговом выполнении процедуры данные переменные неизменяются и равно нулю. Почему?


Id   (2006-08-10 14:23:00) [11]


> clickmaker ©   (10.08.06 14:20) [1]
> OnMouseMove

Как поймать нужную запись?


clickmaker   (2006-08-10 14:20:00) [12]

OnMouseMove
OnDrawCell


Наверх

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