Скачать: CL | DM;

Панель и прокрутка   Найти похожие ветки 

← →
Gorlum2000   (2005-08-22 13:15) [0]

Динамически формирую на панели чек-боксы (друг под другом).
Хотелось бы сделать так, чтобы если их количество заходит за пределы высоты панели, на панели появлялась бы полоса прокрутки.
Но никакого свойства, связанного со скроллингом, я у панели не вижу. Как реализовать скроллинг на панели? Если нельзя сделать это с панелью, то чем ее можно заменить, чтобы все-таки был скроллинг?

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;

---

← →
Floppy ©   (2005-08-22 13:19) [1]

ScrollBox на панели

---

← →
Gorlum2000   (2005-08-22 13:21) [2]

Ага, спасибо. Я уже увидел подобный вопрос на этой странице, прошу прощения ...

---

← →
Юрий Зотов ©   (2005-08-22 13:32) [3]

ScrollBox без панели.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.03 c