Liebe Liste,
ich habe jetzt einige Zeit an einem Datenbankformular versucht, die in einem
Formular eingegebenen Werte an eine Listbox in einem Formular zu übergeben.
Die beiden Formulare stehen parallel zueinander, das eine hat die
Bezeichnung "Name", das andere die Bezeichnung "MainForm".
Die einzige Möglichkeit, die ich halbwegs in die Gänge kriege, ist, dass die
Listbox beim Öffnen über die Funktion "Formular aktualisieren" jedes Mal
aktualisiert wird. Unerwünschter Nebeneffekt: Das Makro dazu habe ich einfach
über den Recorder erstellen lassen - mehr schaffe ich auch nach Recherche im
Netz (über das Wiki und entsprechende Weiterleitungen zu Michael Dannenhöfer,
Sun etc.) in Sachen Makros nicht, weil mir wohl die Grundlagen dazu fehlen.
Bisher habe ich mir das Folgende zusammengeschustert:
sub ListboxAktualisieren
rem ----------------------------------------------------------------------
rem define variables
dim odoc as object
dim odrawpage as object
dim oform as object
dim oControl as object
rem ----------------------------------------------------------------------
odoc=thisComponent
odrawpage=odoc.drawpage
oform=odrawpage.forms.getbyName("MainForm")
oControl=oform.getByName("ListBox")
oControl refresh()
end sub
Ob ich die ganzen Variablen so richtig deklariert habe weiß ich nicht. Ich
habe einfach weiter gemacht, bis das Makro keine Fehlermeldung mehr an dieser
Stelle produzierte.
Zum Schluss bin ich dann ja wohl bei der ListBox angelangt. Nur weiß ich
überhaupt nicht, welchen Befehl ich ihr weitergeben muss, damit sie sich ein
bisschen bewegt, mal nachzusehen, ob die Abfrage bei der Datenbank auch etwas
Neueres ergibt. "refresh()" erzeugt lediglich ein Achselzucken bei Basic -
kennt es wohl nicht.
Gruß
Robert
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
