Как настроить событие щелчка на заголовке столбца TStringGrid (исправлено), так что визуально это выглядит так, как будто вы нажимаете кнопку

Question

Я работаю с Lazarus v0.9.30. У меня есть TForm с TStringGrid на нем. У меня есть фиксированная строка в сетке, где есть все мои заголовки столбцов. Каждый столбец является объектом TGridColumn, и каждое название столбца представляет собой объект TGridColumnTitleObject. При поиске в инспекторе объектов нет событий, которые вы можете использовать для TGridColumnTitle. Что я хочу сделать, так это иметь возможность нажимать на заголовок столбца и визуально я хочу, чтобы он выглядел так, будто вы нажимаете кнопку. Я хочу перехватить событие click, а затем выполнить действие над ним (например, сортировать по тексту столбца или, возможно, отобразить экран справки). Есть ли способ сделать это?

Answer 1

На вашей сетке задано Options.goHeaderPushedLook недвижимость True.