Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.07.30;
Скачать: CL | DM;

Вниз

Координаты ячейки DBGrida a   Найти похожие ветки 

 
D@Nger ©   (2006-07-03 12:18) [0]

Как узнать координаты выделенной ячейки DBGrida.


 
Desdechado ©   (2006-07-03 12:30) [1]

C какой целью? Может, есть более простые способы для ее достижения.


 
D@Nger ©   (2006-07-03 12:47) [2]

В общем так... У столбца ДБГрида поставил св-во ButtonStyle = cbsEllipsis. В ячейке этого столбца появилась кнопка выбора. Я хочу при нажатии на эту кнопку выводить PopUp окошко возле этой ячейки.


 
MsGuns ©   (2006-07-03 13:32) [3]

type
 TDBGridCrack = class (TCustomGrid);

function DBServ_GetActiveGridCellRect(Grid: TDBGrid): TRect;
//*** Возвращает TRect активной ячейки грида
begin
 result.Top := 0; result.Left := 0; result.Bottom := 0; result.Right := 0;
 if dgRowSelect in Grid.Options then exit;
 if Grid.DataSource.DataSet.RecordCount=0 then exit;
 result := TDBGridCrack(Grid).CellRect(TDBGridCrack(Grid).Col,TDBGridCrack(Grid).Row);
end;


 
D@Nger ©   (2006-07-03 13:45) [4]

Спасибо!


 
Apollon_604   (2006-07-06 18:00) [5]

а не легче ли так?

PopupMenu.Popup(Mouse.CursorPos.X, Mouse.CursorPos.Y);

а координаты ячейки берутся из TRect:

var
 a: TRect;
begin
  a := sg.CellRect(sg.Selection.Top, sg.Selection.Left);
end;



Страницы: 1 вся ветка

Текущий архив: 2006.07.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
3-1148561537
fedpavel
2006-05-25 16:52
2006.07.30
Проблема с запросом


3-1148397351
rar
2006-05-23 19:15
2006.07.30
Трехзвенка


5-1136560770
cp.Silver
2006-01-06 18:19
2006.07.30
Расширенный TTreeView


4-1144974998
Denis_Ac
2006-04-14 04:36
2006.07.30
BITS ( Background Intelligent Transfer Service)


5-1136303968
FunkyByte
2006-01-03 18:59
2006.07.30
Создание потомка TComponent с нестандартным владельцем