![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Панель и прокрутка [D7, WinXP]
Gorlum2000 © (2005-08-22 13:15:00)Динамически формирую на панели чек-боксы (друг под другом).
Хотелось бы сделать так, чтобы если их количество заходит за пределы высоты панели, на панели появлялась бы полоса прокрутки.
Но никакого свойства, связанного со скроллингом, я у панели не вижу. Как реализовать скроллинг на панели? Если нельзя сделать это с панелью, то чем ее можно заменить, чтобы все-таки был скроллинг?
While not tblExamsAnswers.Eof do begin
i:=i+1;
v_gChecks[i]:=TcxCheckBox.Create(nil);
v_gChecks[i].Parent:=Panel;
v_gChecks[i].Style.Font.Size:=15;
v_gChecks[i].Name:='cb'+tblExamsAnswers.FieldByName('ExamsAnswerID').AsString;
v_gChecks[i].Properties.Caption:=tblExamsAnswers.FieldByName('AnswerBody').AsString;
v_gChecks[i].Properties.MultiLine:=true;
v_gChecks[i].Visible:=true;
v_gChecks[i].Width:=1000;
v_gChecks[i].Top:=(i-1)*100+10;
v_gChecks[i].Checked:=tblExamsAnswers.FieldByName('UserAnswer').AsBoolean;
v_gChecks[i].OnClick:=Clicker;
tblExamsAnswers.Next;
End;
Юрий Зотов (2005-08-22 13:32:00) [1]ScrollBox без панели.
Gorlum2000 (2005-08-22 13:21:00) [2]Ага, спасибо. Я уже увидел подобный вопрос на этой странице, прошу прощения ...
Floppy (2005-08-22 13:19:00) [3]ScrollBox на панели