![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
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