[SOLVED] Uruchomienie makra w Base

[kiela]

Witam.
Mam bazę danych, w której mam m. in kwoty (liczby). Chciałbym aby w formularzu który wypełniam dostawić pole, w którym będzie mi się uzupełniała kwota słownie zależna od jednego pola z liczbą. Znalazłem http://juljas.net/linux/tips/openoffice.html makro, które działa (spr. w calcu) ale nie wiem jak je wykorzystać w base. Proszę o pomoc jak wykorzystać makro w base.

[quest-88]

Tzn. czego dokładnie nie wiesz? Nie wiesz czy makro z Calca uruchomi się w Base, czy w ogóle nie możesz znaleźć takiej funkcji w bazie danych?

Jeśli to drugie, to chyba masz za starą wersję pakietu. Nie wiem jak w OpenOffice, ale ja taką możliwość mam w LibreOffice 3.6, a pamiętam że kiedyś to była głośno omawiana nowość.

[kiela]

Nie wiem jak uruchomić makro (funkcje z parametrem )w bazie.

[belstar]

Witam

Nie wiem jak uruchomić makro (funkcje z parametrem )w bazie.

Ano tak, jak w załączniku
W przykładzie wykorzystałem inną funkcje "Słownie", jak ci nie odpowiada to sobie podmień.

Pozdrawiam

[belstar]

Kod: Zaznacz cały

sName = obj.Model.Name

Możesz tą linie wyrzucić.

[kiela]

Dziękuje

[kiela]

A jak można by wyświetlać wykonanie funkcji czyli liczbę słownie w polu formatowanym? Bo tam jest przykład dla pola etykiety.

[belstar]

Witam

Proponuje zacząć naukę programowania makr od:
http://wiki.services.openoffice.org/wik ... ASIC_Guide
Zassać znakomitą publikacje Andrew Macro (google powie gdzie).
Zaopatrzyć się w Mri lub Xray.

Co do twojego pytania, trochę lecisz na łatwiznę. Analizując załącznik (makro i zdarzenia formantów), sam na pewno byś do tego doszedł.

Kod: Zaznacz cały

'uzyskujemy dostęp do etykiety o nazwie "Label" znajdującej się na formularzu o indeksie (0)
oLabel = thisComponent.DrawPage.Forms.getbyindex(0).GetByName("Label")
'etyieta ma wyświetlić wynik funkcji slownie
oLabel.label = slownie(obj.getValue)

"Label" jest nazwą formantu, jak byś wstawił "pole formatowane" (usuwając etykietę lub zmieniając jej nazwę) i nazwał je "Label" prawie byłbyś w domu, ale zachowując konwencje i porządek w kodzie, przerobiona linia ma mieć wygląd:

Kod: Zaznacz cały

oFormatField = thisComponent.DrawPage.Forms.getbyindex(0).GetByName("FormatField")

Ponieważ pole formatowane nie ma właściwości Label tylko Text, trzeba to zmienić.

Kod: Zaznacz cały

oFormatField.text = slownie(obj.getValue)

Do przeglądania właściwości i metod obiektów pomocne okaże się korzystanie z Mri lub Xray

Pozdrawiam

[kiela]

Dziękuje za odp.