Как получить ячейку объекта типа TStringGrid в виде TRect?

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Как получить ячейку объекта типа TStringGrid в виде TRect?

Сообщение maxvell » 20.05.2012 19:09:01

событие onDrowCell объекта типа TstringGrid связывается с процедурой вида:
Код: Выделить всё
procedure Tform1.onDrawCell(Sender: TObject; aCol,
  aRow: Integer; aRect: TRect; aState: TGridDrawState);

Значит, этот объект как-то может определить ячейку ( cell[aCol, aRow]) как объект типа TRect или хотя бы получить представление.
Мне нужно вызвать эту функцию из другой процедуры, значит мне нужно получить этот параметр. Есть ли у TStringGrid что-нибудь для таких целей, или нужно вычислять всё самостоятельно?
maxvell
незнакомец
 
Сообщения: 9
Зарегистрирован: 20.05.2012 15:37:42

Re: Как получить ячейку объекта типа TStringGrid в виде TRec

Сообщение Ism » 20.05.2012 19:52:04

StringGrid1.Columns[1].Grid.CellRect(1,1) ?
Ism
энтузиаст
 
Сообщения: 908
Зарегистрирован: 06.04.2007 17:36:08

Re: Как получить ячейку объекта типа TStringGrid в виде TRec

Сообщение maxvell » 20.05.2012 20:24:59

Ism, это работает, если в объекте типа TStringGrid используются объекты типа columns, а если используются просто ячейки, то такая конструкция выдаёт выход за границу списка, ибо колонны не используются..
maxvell
незнакомец
 
Сообщения: 9
Зарегистрирован: 20.05.2012 15:37:42

Re: Как получить ячейку объекта типа TStringGrid в виде TRec

Сообщение sign » 21.05.2012 04:43:27

maxvell писал(а):ибо колонны не используются..

Это как?
Как можно задать ячейку без колонки в гриде?!!!
sign
энтузиаст
 
Сообщения: 1131
Зарегистрирован: 30.08.2009 09:20:53

Re: Как получить ячейку объекта типа TStringGrid в виде TRec

Сообщение svk12 » 21.05.2012 11:28:02

Функция не связана с колонками.
Код: Выделить всё
function TCustomGrid.CellRect(ACol, ARow: Integer): TRect;
svk12
постоялец
 
Сообщения: 409
Зарегистрирован: 09.06.2008 18:42:47

Re: Как получить ячейку объекта типа TStringGrid в виде TRec

Сообщение maxvell » 21.05.2012 19:09:57

svk12, Спасибо, так работает)
maxvell
незнакомец
 
Сообщения: 9
Зарегистрирован: 20.05.2012 15:37:42


Вернуться в Lazarus

Кто сейчас на конференции

Сейчас этот форум просматривают: Majestic-12 [Bot] и гости: 238

Рейтинг@Mail.ru