Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Обработка OnClick() / 13 сообщений из 13, страница 1 из 1
28.11.2003, 12:22
    #32337628
surkalex
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
Привет всем!
Кто-нибудь знает как у не стандартного гриданаписать обработчик, который бы возвращал номер текущей выделенной ячейки, либо целого ряда в целом? Просто у данного грида не события типа как у стандартного в делфях.
...
Рейтинг: 0 / 0
28.11.2003, 12:53
    #32337677
pkarklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
Телепаты в отпуске. Что за грид то такой нестандартный? От чего он унаследован? Покопайся в предках. Можешь и найдешь нужное тебе свойство.
...
Рейтинг: 0 / 0
28.11.2003, 13:00
    #32337692
surkalex
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
Грид из серии db, имеющий свойство DataSet, то есть я могу двигаться по рекордам, и на OnClick отображать текущий рекорд. А мне надо бы чтобы я мог в нужный момент получатьпо клику ряд, на который я кликнул!
...
Рейтинг: 0 / 0
28.11.2003, 13:09
    #32337706
Adony
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
То ли сегодня пятница, то ли я что-то не догоняю?! :)
...
Рейтинг: 0 / 0
28.11.2003, 13:22
    #32337724
oleg_e
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
Примитивно, но сработает:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
с = запоминаешь на какой ты позиции в DataSet
ДизаблеКонтролс
фирст
н =  1 
пока не дошел до с
бегин
  некст
  Инк(н)
енд
ЕнаблеКонтролс
локате на с
ответ н
...
Рейтинг: 0 / 0
28.11.2003, 14:01
    #32337812
surkalex
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
Проще будет вот так!

procedure TForm1.DBGridClick(Sender : TObject);
begin

DBGrid(Sender).DataSource.DataSet.RecNo
end;
а мне надо по другому, не трогая датасет вообще!
...
Рейтинг: 0 / 0
28.11.2003, 14:17
    #32337839
SiDen
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
MouseCoord(X, Y: Integer): TGridCoord; прокатит? определит над какой ячейкой мышь... по координатам мыши
...
Рейтинг: 0 / 0
28.11.2003, 14:50
    #32337872
Андрей Бабенко
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
2 SiDen: прокатит

напр. в onMouseUp
Var Coord: TGridCoord;
col, row: integer;
Begin
Coord := dbgrid1.MouseCoord(X, Y);
Col := Coord.X;
Row := Coord.Y; //вот что ты хотел
end;
...
Рейтинг: 0 / 0
28.11.2003, 15:20
    #32337925
SiDen
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
Андрей, это был не вопрос, а ответ :)
...
Рейтинг: 0 / 0
28.11.2003, 15:35
    #32337950
surkalex
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
Вы то мужики конечно умны, а что делать если нет у меня ни ARow ни ACol
...
Рейтинг: 0 / 0
28.11.2003, 17:06
    #32338082
oleg_e
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
А почему: не трогая датасет вообще?
...
Рейтинг: 0 / 0
28.11.2003, 17:47
    #32338142
Sclif
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
Какой ACol? Какой ARow?
Если Grid наследовалсмя от CestomGrid то:

Хэлп писал:Returns the row and column indexes of the cell that contains a point specified in screen coordinates.

type TGridCoord = record

X: Longint;
Y: Longint;
end;

function MouseCoord(X, Y: Integer): TGridCoord;

Description

Call MouseCoord to locate the column and row of the cell which contains a given screen coordinate. Usually, MouseCoord is used to locate the cell that is under the mouse.

Маускорды берешь из маусмапа.
...
Рейтинг: 0 / 0
28.11.2003, 17:59
    #32338154
JibSkeart
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка OnClick()
А что RecNo отменили чтоль ???


_____________
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Обработка OnClick() / 13 сообщений из 13, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]