Warsztat 2: Wasny wykres słupkowy, bez korzystania z MSGraph.Chart.

WykresSlupkowy2000.zip
Autor: Jacek Drobnik
Baza w formacie MsAccess 2000
33kB, 26-12-2003

Opis problemu:

PROBLEM: Alternatywny wykres słupkowy - czyli jak obejść wykres MS Graph.

Wykresy słupkowe typu MS Graph zmieniają się w zależności od ilości wyświetlanych danych. Im więcej danych, tym wykres słupkowy mniej czytelny.

Ideą jest zapewnić takie wyświetlanie danych w sposób graficzny, aby:
• przypominało to typowy wykres słupkowy,
• wykres dostosowywał rozmiar wraz ze wzrostem ilości danych
• słupki wykresu zachowywały szerokość
• wykres dawał się przewijać

Rozwiązanie:

Oto moje rozwiązanie: – funkcja fctSlupek. Co robi?
• Dla maksymalnej wartości w domenie (tabeli/kwerendzie) tworzy słupki o zadanej maksymalnej długości (''budulcem'' jest litera małe L, bo daje najłdniejszy efekt w kroju pisma typu ARIAL)
• Dla innych wartości tworzy proporcjonalnie krótsze ciągi liter l
• Użyta w formularzu ciągłym o ukrytych liniach podziału, udaje wykres słupkowy.

UWAGI:
1. mój przykład działa dla zmiennych typu Long
2. plik stworzyłem pod Access 2003, ale jest w formacie 2000. Ufam, że będzie działał (niestety nie testowałem na Accessie 2000).
3. Mam nadzieję, że metoda jest dostatecznie szybka. Nie wiem jak by wpłynęło na szybkość umieszczenie funkcji w osobnym module... itd.

Serdecznie pozdrawiam, 
Jacek Drobnik, Katowice. jacekdr@pro.onet.pl

P.S.
Podobna realizacja wykresów słupkowych była już prezentowana na tej witrynie pod adresem: http://www.access.vis.pl/war034.htm, jednak jest tam tylko tłem dla innych zagadnień. Program Jacka spowodował, że to zagadnienie znalazło właściwe wyeksponowane na tej stronie.
Krzysztof Pozorek