Текущий архив: 2003.05.05;
Скачать: CL | DM;
Вниз
ListBox Найти похожие ветки
← →
Alex Slater (2003-03-06 11:49) [0]Господа Мастера , подскажите как сделать в ListBox"e горизонтальный скроллинг .
← →
Игорь Шевченко © (2003-03-06 11:53) [1]SendMessage (ListBox.Handle, LB_SETHORIZONTALEXTENT, Размер_для_самой длинной строки, 0);
← →
Jel © (2003-03-06 12:39) [2]А чем ScrollWidth не угодил?
When ScrollWidth is greater than the client width of the list box, the list box gets a horizontal scrollbar. When ScrollWidth is less than or equal to ClientWidth, the horizontal scrollbar disappears.
← →
Игорь Шевченко © (2003-03-06 12:41) [3]Jel © (06.03.03 12:39)
Тем, что в D5 его нету.
Впрочем,function TCustomListBox.GetScrollWidth: Integer;
begin
Result := SendMessage(Handle, LB_GETHORIZONTALEXTENT, 0, 0);
end;
procedure TCustomListBox.SetScrollWidth(const Value: Integer);
begin
if Value <> ScrollWidth then
SendMessage(Handle, LB_SETHORIZONTALEXTENT, Value, 0);
end;
← →
Jel © (2003-03-06 12:53) [4]2
> Игорь Шевченко © (06.03.03 12:41)
Понял, буду читать вопросы внимательнее. :)
← →
ALEX SLATER (2003-03-06 16:49) [5]>> Игорь Шевченко
Как продолжало резать строки в ListBox"e так и режет дальше , горизонтального скроллинга нет .
Может быть проблема в этом : сообщение относится только к блокам списка, созданным со стилем ws_HScroll . Если да , то как установить этот стиль .
Страницы: 1 вся ветка
Текущий архив: 2003.05.05;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.01 c
