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
BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das LibreOffice Forum zu erhalten!
> 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
(gelöst) Methode zum Auslesen auslösender Kontrollfelder
Zuletzt geändert von PeterF am Sa 1. Sep 2018, 17:08, insgesamt 1-mal geändert.
Re: Methode zum Auslesen auslösender Kontrollfelder
Hallo Peter,
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
Code: Alles auswählen
SUB Ausloeser(oEvent AS OBJECT)
oField = oEvent.Source.Model
END SUB
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
https://www.familiegrosskopf.de/robert/index.php?&Inhalt=base_handbuch
https://www.familiegrosskopf.de/robert/index.php?&Inhalt=xml_formulare
Re: Methode zum Auslesen auslösender Kontrollfelder
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.
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.
Re: Methode zum Auslesen auslösender Kontrollfelder
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
"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
https://www.familiegrosskopf.de/robert/index.php?&Inhalt=base_handbuch
https://www.familiegrosskopf.de/robert/index.php?&Inhalt=xml_formulare
Re: Methode zum Auslesen auslösender Kontrollfelder
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
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 ❤️