BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das LibreOffice Forum zu erhalten!

❤️ DANKE >><< DANKE ❤️

> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des LibreOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗

(gelöst) Methode zum Auslesen auslösender Kontrollfelder

Base ermöglicht es Ihnen, Ihre Daten in einer Datenbank direkt mit LibreOffice zu bearbeiten.
Antworten
PeterF
Beiträge: 28
Registriert: Mi 15. Aug 2018, 09:30

(gelöst) Methode zum Auslesen auslösender Kontrollfelder

Beitrag von PeterF » Mi 29. Aug 2018, 13:50

Hallo Leute,

ich hab mal wieder eine Frage:
Gibt es eine Methode, auslösende Kontrollfelder zu identifizieren?
Ich hab ein numerisches Pad über Schaltflächen zusammengestellt, mit dem ich ein Kombifeld speisen möchte (die Kombination Pad - Kombifeld halte ich bei Touch-Pad Eingaben für effektiv).
Nun möchte ich nicht für alle 12 Schaltflächen (es sind auch Buchstaben dabei) je ein separates Makro generieren, um zum gewünschten Ergebnis zu kommen.
Viel eleganter wäre es, wenn es eine Methode geben würde, die mir den Namen oder Titel der auslösenden Schaltfläche ausliest, damit ich über 'cases' z.Bsp. der 'Schaltfläche 1' eine 1 zuweisen kann.
Vielen Dank im Voraus für Eure Vorschläge.

Lieben Gruß aus Sachsen
Peter
Zuletzt geändert von PeterF am Sa 1. Sep 2018, 17:08, insgesamt 1-mal geändert.

RobertG
Beiträge: 2732
Registriert: Sa 19. Mai 2012, 17:37
Kontaktdaten:

Re: Methode zum Auslesen auslösender Kontrollfelder

Beitrag von RobertG » Mi 29. Aug 2018, 17:00

Hallo Peter,

Code: Alles auswählen

SUB Ausloeser(oEvent AS OBJECT)
oField = oEvent.Source.Model
END SUB
Das Feld, von dem aus das Makro ausgelöst wird, ist oField. Jetzt kannst Du oField.Name oder oField.LabelControl usw. abfragen. Siehe dazu das Kapitel zu Formularen im Base-Handbuch.

Gruß

Robert
https://de.libreoffice.org/get-help/documentation/
https://www.familiegrosskopf.de/robert/index.php?&Inhalt=base_handbuch
https://www.familiegrosskopf.de/robert/index.php?&Inhalt=xml_formulare

PeterF
Beiträge: 28
Registriert: Mi 15. Aug 2018, 09:30

Re: Methode zum Auslesen auslösender Kontrollfelder

Beitrag von PeterF » Mi 29. Aug 2018, 22:03

Hallo Robert,

das war ziemlich einfach. Mir fehlte das "oEvent.Source.Model".
Allerdings zum Auslesen des Schaltflächen Titels braucht's nur "oField.Label" (LabelControl kennt Base hier nicht).

Vielen Dank
Peter

P.S.: Ich hab es schon verarbeitet. Werde es in meiner 'Adreßlogik' auch einbauen. Da fällt so einiger Programmcode weg. ;)

RobertG
Beiträge: 2732
Registriert: Sa 19. Mai 2012, 17:37
Kontaktdaten:

Re: Methode zum Auslesen auslösender Kontrollfelder

Beitrag von RobertG » Do 30. Aug 2018, 12:26

Hallo Peter,

"oField.LabelControl" habe ich gerade noch eingesetzt. "oField.LabelControl.Label" erreicht bei dem mit einem Formularfeld verknüpften Beschriftungsfeld das, was dort sichtbar für den Betrachter eingetragen steht. Das Beschriftungsfeld hat natürlich keine Eigenschaft "LabelControl", aber fast alle anderen Formularfelder.

Gruß

Robert
https://de.libreoffice.org/get-help/documentation/
https://www.familiegrosskopf.de/robert/index.php?&Inhalt=base_handbuch
https://www.familiegrosskopf.de/robert/index.php?&Inhalt=xml_formulare

PeterF
Beiträge: 28
Registriert: Mi 15. Aug 2018, 09:30

Re: Methode zum Auslesen auslösender Kontrollfelder

Beitrag von PeterF » Do 30. Aug 2018, 15:33

Hallo Robert,

auch wenn ich ein ziemlicher Neu-Anfänger bin (mit Basic hatte ich mich vor ca. 30 Jahren während meines Studiums beschäftigt) und meine Programmierung schleppend voran kommt, freut es mich, doch etwas beitragen zu können.

Grüße aus Sachsen
Peter

An alle, die das LibreOffice-Forum nutzen:


Bitte beteiligen Sie sich mit 7 Euro pro Monat und helfen uns bei unserem Budget für das Jahr 2024.
Einfach per Kreditkarte oder PayPal.
Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet.

❤️ Vielen lieben Dank für Ihre Unterstützung ❤️

Antworten