Как отследить нажатие клавиши мыши на ComboBox в Delphi XE5? Стандартный onClick срабатывает только в случае выбора значения из выпадающего меню.
Это мне понадобилось для отслеживания изменения положения курсора(для текста) в поле для ввода текста.
UPD: курсора для текста

Предыдущий
вопрос Следующий
вопрос

Для отслеживания изменения положения курсора в поле для ввода текста при использовании ComboBox в Delphi XE5, можно воспользоваться событием OnMouseUp или OnMouseMove для ComboBox.

Вот пример кода:

procedure TForm1.ComboBox1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
// Ваш код для отслеживания изменения положения курсора
end;
procedure TForm1.ComboBox1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
// Ваш код для отслеживания изменения положения курсора
end;

Вы также можете использовать событие OnClick и проверять положение курсора в момент нажатия на ComboBox:

procedure TForm1.ComboBox1Click(Sender: TObject);
var
MousePos: TPoint;
begin
MousePos := Mouse.CursorPos;
// Проверка положения курсора относительно ComboBox
if (MousePos.X >= ComboBox1.Left) and (MousePos.X <= ComboBox1.Left + ComboBox1.Width)
and (MousePos.Y >= ComboBox1.Top) and (MousePos.Y <= ComboBox1.Top + ComboBox1.Height) then
begin
// Ваш код для отслеживания изменения положения курсора
end;
end;

Надеюсь, это поможет вам отслеживать изменение положения курсора в поле для ввода текста при использовании ComboBox.