Здравствуйте, URA_12, Вы писали:
URA>Как узнать имя столбца грида по нажатию мышки
URA>в событии OnMouseUp?
URA>Юрий.
Перефразирую вопрос как его понял:
Дано:
Обработчик события OnMouseUp грида.
Найти:
Узнать имя столбца, на каторый приходится соотвествующее отпускание кнопки мыши.
Ответ:
procedure TForm.DBGridEhMouseUp(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
GridCoord: TGridCoord;
ColumnName: string;
begin
GridCoord := DBGridEh.MouseCoord(X, Y);
if (GridCoord.X >= 0) and (GridCoord.Y > 0) then
ColumnName := DBGridEh.Columns[GridCoord.X].Title.Caption;
end;
... << RSDN@Home 1.1.3 stable >>