Citat:
mVeliki: Staviš tScrollBox na formu.
Unutar nje tMemo kome postaviš Height na koliko treba, može statično a možeš i da izračunaš (broj redova puta visina fonta).
Staviš tTimer na formu i u OnTimer staviš da se povećava osobina Position od tScrollBox-a. Valjda se zove Position ako nisam omašio.
Ranije sam malo proucavao koji je najbrzi (i za sporije masine) i 'najglatkiji' skrol koji pruza VCL "out of box", bez raznih trikova, tehnika i 3rd party komponenti. Dosao sam do zakljucka da je pomeranje TScrollBox-a (bez obzira na sadrzaj koji je unutra) najbrze.
Sto se tice Position osobine, ako se ne varam, ona ima jednu manu (barem kod C++ Buildera). Kada se disable-uju horizontalni i vertikalni barovi (da bi skrol licio na nesto) onda Position nije radio!
Srecom metoda TScrollBox::ScrollBy() je radila.
Ovo bi bio neki test primer sa TLabel objektom unutar TScrollBox-a. Kod je u C++, ali kako je cist VCL u pitanju, dovoljno je jasan:
Code:
for ( int i=0; i<=Label1->Width; i++ )
{
Caption = i;
Sleep( 10 );
ScrollBox1->ScrollBy( -1,0 );
ScrollBox1->Update();
}