Rozdział 21
[ Powrót do poprzedniej strony ]
Zgodnie z obietnicą dzisiaj zajmiemy się komponentem ActionList. Napiszmy szybko prosty edytor tekstu.
Umieść na formularzu komponent ToolBar oraz Memo. Wartość Align tego drugiego zmień na alClient - spowoduje to wypełnienie całego obszaru formularza.
Naciśnij prawym klawiszem myszy komponent ToolBar. Z menu, które się rozwinie wybierz New Button.
Zrób tak jeszcze dwa razy - w rezultacie otrzymasz 3 przyciski.
Umieść na formularzu komponent ImageList. Kliknij na niego dwukrotnie - otworzy się edytor.
Przyciskiem Add wybierz 3 bitmapy reprezentujące przyciski 'Wytnij', 'Kopiuj', 'Wklej'.
Treść procedury przycisku Wytnij uzupełnij następująco:
Memo1.CutToClipboard;
Treść przycisku Kopiuj:
Memo1.CopyToClipboard;
Treść procedury przycisku Wklej:
Memo1.PasteFromClipboard;
Teraz kliknij dwukrotnie na umieszczonym uprzednio komponencie ImageList.
Naciśnij klawisze Ctrl + Ins - powinno pojawić się okno z którego możesz wybrać Standardy Akcji.
Wybierz kolejno Cut, Copy, Paste.
Po zaznaczeniu np. Cut w Inspektorze Obiektów. W pole Caption wpisz 'Wytnij'. W polu ImageIndex wpisz cyfrę 0.
Zrób tak także z 'Kopiuj', 'Wklej' z tym, że w polu ImageIndex wpisz kolejno 1 i 2. Pola te oznaczają numer bitmapy jaka będzie wyświetlana. Numer taki możesz poznać zaznaczając przycisk np. Wytnij. W Inspektorze Obiektów będzie widniał taki numer także w polu ImageIndex.
Teraz pozostała już dopasowanie akcji do poszczególnych przycisków. Robi się to w polu Action przycisku wybierając odpowiednią wartość.
Po uruchomieniu programu przyciski powinny być aktywne w zależności od tego, czy w schowku się coś znajduje, czy nie oraz czy tekst jest zaznaczony,
Już niedługo zaczniemy pracę nad pisaniem edytora tekstu i wtedy te zagłębimy się w szczegóły tego komponentu.