Выравнивание в ComboBox при помощи API

← →
Александр Григоренко (2004-03-16 21:44) [0]

Был бы весьма признателен за оказанное содействие в решении моего вопроса, заключающегося в том, как организовать выравнивание текста по правой стороне компонента ComboBox?

Спасибо за помощь!

← →
Cobalt © (2004-03-16 23:24) [1]

а чё, в справке нету?
Ты же на API пишешь!!!

← →
Александр Григоренко (2004-03-16 23:36) [2]

Я, к сожалению, не могу найти параметр для функции SetWindowLong. ES_RIGHT и подобные точно не подходят для ComboBox.

← →
Cobalt © (2004-03-17 00:14) [3]

Ещё вопросик - а вы уверены, что такое возможно?
Видели где-то? Где?
А это точно был стандартный Combobox?

← →
Игорь Шевченко © (2004-03-17 00:24) [4]

Для ComboBox со стилем CS_DROPDOWN: (На API некогда писать, пишу на VCL, но суть та же самая)

procedure TForm1.FormCreate(Sender: TObject); var ComboEditWindow: HWND; begin ComboEditWindow := GetDlgItem(ComboBox.Handle, 1001); if IsWindow(ComboEditWindow) then SetWindowLong(ComboEditWindow, GWL_STYLE, GetWindowLong(ComboEditWindow, GWL_STYLE) or ES_RIGHT); end;

При этом текст в окне редактирования становится выровненным по правому краю. Как сделать, чтобы и в списке значения были выровнены по правому краю, увы, не знаю.

Если сделать ComboBox со стилем csOwnerDrawFixed, то можно задавать выравнивание справа для всех частей ComboBox, но ввести текст туда будет нельзя - только выбирать из списка.

← →
Александр Григоренко (2004-03-17 13:42) [5]

Здравствуйте, Игорь!

Спасибо за ответ! Но у меня как раз ComboBox в стиле csOwnerDrawFixed. Если вас не затруднит, не могли бы вы модифицировать код в соответствии с уточнением? Например, нижеследующий код смещает кнопку раскрытия списка влево.

SetWindowLong(ComboBox1.Handle, GWL_EXSTYLE, GetWindowLong(ComboBox1.Handle, GWL_EXSTYLE) or WS_EX_RIGHT);

А как можно реализовать выравнивание именно элементов списка по правой стороне?

Александр Григоренко (17.03.04 13:42)

> А как можно реализовать выравнивание именно элементов списка
> по правой стороне?

Как вы рисуете элементы списка ?

Выравнивание в ComboBox при помощи API Найти похожие ветки