Tworzenie bannera na stronie
Aby utworzyć na formularzu banner podobny do bannerów internetowych należy:
1. umieścić na formularzu komponent ImageList (zakładka Win32)
2. ustawić odpowiednio do wielkości bannera właściwości Height i Width komponentu ImageList
3. wczytać do ImageList poszczególne klatki animacji bannera przez dwukrotne kliknięcie komponentu ImageList, a następnie kliknięcie przycisku Add... (należy ustawić Transparent Color na clNone po wybraniu obrazków)
4. umieścić na formularzu komponent Timer (zakładka System)
5. ustawić właściwość Interval komponentu Timer, która oznacza szybkość zmiany obrazka w ms
6. wstawić na formularz komponent Image, na którym wyświetlany będzie banner
7. w pliku nagłówkowym (CTRL+F6) formularza w sekcji private tworzymy zmienną:
Unit1.h |
private: |
8. wstawiamy do komponentu Image1 obrazek z pierwszą klatką bannera
9. utworzyć zdarzenie OnTimer dla Timera
Unit1.cpp |
void __fastcall TForm1::TimerTimer(TObject *Sender) |
10. ustawić właściwość Cursor komponentu Image1 na crHandPoint
11. utworzyć funkcję obsługującą zdarzenie OnClick dla komponentu Image:
Unit1.cpp |
void __fastcall TForm1::Image1Click(TObject *Sender) |