görgetősávok (tscrollbar) Delphi, Delphi, Delphi komponens, Delphi forrás
görgetősávok (TScrollBar) Delphi
Görgetősávok gyakran használják lapozhat semmilyen intézkedést. Például, ha zenét hallgat, akkor lépjünk át rajta olyan hely egy egyszerű görgetősáv. Ha az információ nem fér el az ablakban, akkor is lépjünk szalagok felhasználásával az ilyen, de a legtöbb esetben ez automatikusan megtörténik.
Nézzük meg a görgetősáv akcióban. Hozzon létre egy új alkalmazás. Forma TLabel hogy egy alkatrészt képezzenek, és egy csíkot TScrollBar görgetés.
A Label1 komponens a képaláírás tulajdonságot „Be”. Most hozzon létre egy eseménykezelő # 111; nA a görgetősáv és írd meg az alábbiak szerint:
Ebben a kódot, mi hozzá az ingatlan feliratot Label1 komponens értéke a jelenlegi helyzetben a görgetősáv csúszkát. Az aktuális érték a csúszka nyerhető tulajdonságokat álláspont ScrollBar1 objektumot. Csak van egy „de”. Ez a tulajdonság a típus „integer”, és az ingatlan feliratot Label1 összetevő - egy szöveg. Ezért kell átalakítani egy egész számot egy string. Erre a célra intTostr funkciót. Azt kell, hogy adja át a számát, és ő visszatér hozzánk egy string. Tehát ha ezt a funkciót a paraméter az aktuális pozíció a csúszka intTostr (ScrollBarl. Pozíció), az eredmény az ő munkája is hozzárendelhető az ingatlan Képaláírás Label1 komponenst.
Próbáld meg futtatni a programot, és a csúszkát. A pozíció érték jelenik meg Label1 komponenst.
Ebben a programban, írtunk egy példa a vízszintes görgetősáv. Annak érdekében, hogy a függőleges, meg kell változtatni a Kind ingatlan sbverticai. És mégis, a csúszka értéke 0-ról 100 Az érték módosításához, vannak tulajdonságai Min (alapértelmezett nulla) és max (alapértelmezett 100). Semmi más különleges görgetősávokkal ott.