| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как убрать у комбобокса убрать эту штуку справа [XP]
programmer90 © (2008-09-08 16:27:00)Задача проста:
Надо убрать у комбобокса эту фигню справа(место в результате нажатия выпадает список), при этом оставить комбобоксовые своства.
Свойство Style.csSimple не подходит...
Германн (2008-09-10 00:40:00) [1]
> Все равно, эта панель не поможет, потому что нужно еще рамку
> скрыть , БордерСтайл-а у комбобокса нет...(
BevelKind не пробовал изменять?
palva (2008-09-09 22:29:00) [2]
> потому что нужно еще рамку скрыть
Ага, а рамка сквозь панель просвечивает, наверно.
Вместо панели можно использовать рисунок, на котором нарисовать все что надо.
programmer90 (2008-09-09 17:50:00) [3]
> Ибо автор программы пишет "кусками", свиснутыми с интернета.
> Еслиб было не так, то не былоб вопроса про тэг...
Да я частенько пользуюсь (ну ессено даже в этих случаях я редактирую код ), вы правы, но вы же не знаете сколько я сам пишу)
> Гы)... Иногда я таким злым кажусь... но это не так) Автор
> сорри если до слез обидел :)
отнюдь))))
> Панель без рамки - вообще универсальный инструмент. Сколько
> всего полезного можно им сделать без особых трудозатрат.
>
Это очень хорошая весчь, например когда надо блыо чтобы у тульбара тулбаттоны были разного размера очень помогала панель и в целом "метод визуального обмана"...
Все равно, эта панель не поможет, потому что нужно еще рамку скрыть , БордерСтайл-а у комбобокса нет...(
Германн (2008-09-09 00:40:00) [4]
> palva © (09.09.08 00:24) [24]
>
> Нужно разместить поверх комбобокса какую-нибудь фигню -
> панель, что ли, без рамки
Панель без рамки - вообще универсальный инструмент. Сколько всего полезного можно им сделать без особых трудозатрат.
:)
korneley (2008-09-09 00:26:00) [5]
> {RASkov} © (08.09.08 23:32) [23]
> Гы)... Иногда я таким злым кажусь...
Да нет, наоборот, тем более, когда сначала "Надеюсь всё доступно изложено", и затем: "да, и ещё, что такое tag?" Верх гуманизма :) Как говорил один лирический герой: "Я вам мысленно аплодирую!" :)))
palva (2008-09-09 00:24:00) [6]Нужно разместить поверх комбобокса какую-нибудь фигню - панель, что ли, без рамки - чтобы она заслоняла правый край комбобокса.
{RASkov} (2008-09-08 23:32:00) [7]Гы)... Иногда я таким злым кажусь... но это не так) Автор сорри если до слез обидел :)
{RASkov} (2008-09-08 23:26:00) [8]Согласен с [20], также уверен, что мой код выше будет просто напросто скопипиз.. ..пастен неподумав :(
Ибо автор программы пишет "кусками", свиснутыми с интернета. Еслиб было не так, то не былоб вопроса про тэг...
{RASkov} (2008-09-08 23:17:00) [9]> [19] programmer90 (08.09.08 22:29)
> он еле закрывается....
Это как?)
> что можно сделать....
Дать ему пинка?
> да и ещё что такое tag?
Да фик знает... попробуй нажать F1 на нем.
Я тебе могу так сказать: Tag - это свойство целочисленного типа, добавленное борландовцами в TComponent. Зачем? У них спроси, но лично я его частенько использую, вместо объявления дополнительных переменных. Причем в него(Tag) можно "засунуть" практически что угодно.... Хоть гигабайт символов)...
Сорри что этот мой пост не помог тебе со списком, но мой в начале вопрос...
Amoeba (2008-09-08 23:05:00) [10]
> да и ещё что такое tag
Приехали! Так тебе, детка, рано еще заниматься кореженьем комбика или написанием собственного компонента.
programmer90 (2008-09-08 22:29:00) [11]спасибо {RASkov} © ...но когда когда список открывается он еле закрывается.... что можно сделать....да и ещё что такое tag?
{RASkov} (2008-09-08 17:02:00) [12]> [17] programmer90 (08.09.08 16:58)
А [16] не подходит?
Туда вот еще можно(нужно):
procedure TForm1.ComboBox1Exit(Sender: TObject);
begin
ComboBox1.Height:=ComboBox1.Tag; {ComboBox1.OnSelect(ComboBox1)}
end;
Или что-то такое.... :)
programmer90 (2008-09-08 16:58:00) [13]
> С комбиком врядли сделаешь, это виндовый класс. Свой компонент
> делай...
Не страшно, оставим это до лучших времен)
Спс всем....
{RASkov} (2008-09-08 16:57:00) [14]> С комбиком врядли сделаешь, это виндовый класс. Свой компонент
> делай...
Хм...
Вот попробуй:
procedure TForm1.FormCreate(Sender: TObject);
begin
ComboBox1.Style:=csSimple;
ComboBox1.Tag:=ComboBox1.Height;
end;
procedure TForm1.ComboBox1DblClick(Sender: TObject);
begin
ComboBox1.Height:=ComboBox1.Tag*ComboBox1.DropDownCount;
end;
procedure TForm1.ComboBox1Select(Sender: TObject);
begin
ComboBox1.Height:=ComboBox1.Tag;
end;
{RASkov} (2008-09-08 16:52:00) [15]А чем стрелка не угодила?
Тебе вполне подойдет комбик со свойством Style = csDropDownList
{RASkov} (2008-09-08 16:51:00) [16]> [13] programmer90 (08.09.08 16:47)
> Надеюсь всё доступно изложено
С комбиком врядли сделаешь, это виндовый класс. Свой компонент делай...
programmer90 (2008-09-08 16:47:00) [17]
> Может, озвучите четко, что нужно по функциональности?
Вот четко и конкретно: мне нужно чтобы визуально вид у комбобокса был такой будто мы применили к нему свойство Combobox.Style:=csSimple,
но при этом была возможность выбрать из дродаун списка который выпадает на событие OnDbClick, и на событие OnClick утверждается выбор выбранного (извините за каламбур) итэма .
Надеюсь всё доступно изложено
clickmaker (2008-09-08 16:42:00) [18]> При нажатии(или дв. клик) на поле выбросить список...
OnDblClick - ComboBox.Perform(CB_SHOWDROPDOWN, 1, 0)
Anatoly Podgoretsky (2008-09-08 16:42:00) [19]> programmer90 (08.09.2008 16:27:00) [0]
Как собака, все понимает только сказать не может.
programmer90 (2008-09-08 16:42:00) [20]
> Выпадать.
Тогда надо выкинуть, выбросить или..... заставить выпадать:)
| |
Страницы: 