[de-users] Base Formular, Sprung auf ID
Hi,
Ich muss aus einem Formular ein anderes Formular aufrufen und dort in die
gleiche Datenzeile springen
Um den Sprung zu machen habe ich bisher den Datensatzzähler benutzt:
datensatz = oForm.getRow()
oFormulario = oForms.loadComponentFromURL("Weiterleitungen","_blank",0,pProp())
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Position"
args1(0).Value = datensatz
dispatcher.executeDispatch(document, ".uno:AbsoluteRecord", "", 0, args1())
dieser code kommt aus dem Macrogenerator von OOo
allerdings funktioniert dies nicht mehr sobald ein Filter gesetzt ist,
dh ich muss stattdessen auf die Datensatz ID springen
Diese auszulesen ist auch kein Problem:
datensatz = oForm.getByName("TB_ID").text
Allerdings weiss ich nicht wie ich den Datensatzpointer im neuen Formular auf
diese ID setzen kann
Ich denke es muss wohl einen ähnlichen Befehl geben wie der dispatcher nur für
die ID
Vielen Dank für Eure Hilfe,
Christophe NIX
Network Administrator
PAC Systems PGmbH
Quartum Center - Hütte 79
B - 4700 Eupen
Tel : +32 (0)87 59 35 50
Fax : +32 (0)87 59 35 59
www.pacsystems.be <http://www.pacsystems.be/>
RE: [de-users] Toolbars eines Formulars in einer odb per Makro verstecken
Hi,
Der Benutzer öffnet ein Writer Dokument in dem ein Dialog startet und das
Hauptdokument versteckt wird, von da aus gehts weiter
Die Dialogbox stellt ein Menu dar welches dann aus der externen odb Datei die
Formulare öffnet
Der Bug zu dem Formularproblem ist hier beschrieben
http://www.openoffice.org/issues/show_bug.cgi?id=63392
Dazu habe ich bereits zuvor einmal hier gepostet
--
Hi,
ich habe da ein kleines Problem das mich heute morgen beim Kunden ins schwitzen
gebracht hat ich habe etliche Makros m Büro vorbereitet aud Version 2.0, beim
Kunden ist die 2.0.2 installiert Als ich dort ankam funktionierte die Hälfte
meiner Makros nicht.
ZB folgendes
Sub ASListeAktualisieren
Doc = StarDesktop.CurrentComponent
Forms = Doc.Drawpage.Forms
oForm = Forms.GetByIndex(0)
oForm.getByName("LB_AS").refresh
End Sub
und zwar bleibt er an der Drawpage Zeile hängen mit der Meldung "Objektvariabel
nicht belegt"
Werde jetzt mal hier im Büro auch die 2.0.2 installieren und sehen ob ich das
in den Griff bekomme.
Wäre aber schon dankbar für einen Hinweis ;)
Gruss,
Christophe
--
Werde schonmal den Rest etsten ;)
Danke schonmal :)
Christophe
-Original Message-
From: Thomas Krumbein [mailto:[EMAIL PROTECTED]
Sent: mardi 20 juin 2006 13:46
To: users@de.openoffice.org
Subject: Re: [de-users] Toolbars eines Formulars in einer odb per Makro
verstecken
Hey Christophe,
Christophe Nix schrieb:
> Keiner eine Idee? :)
Was denn für eine? Ist doch alles OK.
> Bisher mache ich das folgendermassen
>
> Sub HideToolbars Dim frame as object doc =
> Stardesktop.getCurrentComponent() frame = doc.CurrentController.Frame
> lmgr = frame.LayoutManager lmgr.setVisible(false) End Sub
Also, so mache ich das auch - bei externen Formularen. Nur dann macht es ja
eigentlich Sinn. Wenn der Benutzer vorher Base öffnet und dann erst das
Formualr startet, hat er doch einen Schritt zu viel und viel zu viel
Möglichkeiten, Unsinn zu machen.
Ansonsten: Brauchst du wahrscheinlich einen Schritt mehr. Wenn das Formualr
dann nicht Teil des StarDesktops ist, ist es wahrscheinlich Teil des
Base-Dokumentes. Dann such halt erst einmal das - und dann das Formular. Hmm,
halt: ich sehe gerade:
Versuch doch mal, das aktive Dokument wie folgt zu bekommen:
oframe = starDesktop.getAktiveFrame()
lmgr = oFrame.LayoutManager
...
Das sollte auf jeden Fall gehen - denn auch dieses Dokument sollte Teil des
Stardesktops sein.
> Dies funktioniert leider ausschliesslich in Version 2.0.1 aufgrund
> eines Bugs, da in der Version die Formulardokumente Teil des
> Stardesktops sind.
Na, das sollten Sie doch auf jeden Fall sein
Ausserdem bleibt bei dieser Variante trotzdem die
> Statusleiste erhalten. Ein wenig verstümmelt zwar aber weiterhin
> aktiv.
Das stimmt - und ist wohl ein Bug. Da gibt es verschieden Issues. Bleibt nur
eins: Den Statusbalken getrennt nochmals ausschalten. Ich kann dir nur den Code
geben, den ich nutze - allerdings habe ich nur externe Formulare.
oCW = starDesktop.getAkctiveFrame.getContainerWindow.AccessibleContext
for i = 0 to oCW.getAccessibleChildCount()-1
iNr = oCW.getAccessibleChild(i).AccessibleContext.AccessibleRole
if iNr = com.sun.star.accessibility.acessibilityRole.STATUS_BAR then
oStB = oCW.accessibleChild(i)
exit for
end if
next
oStB.visible = false
Vielleicht hilft es dir.
Viele Grüße
Thomas
--
## Marketing deutschsprachiges Projekt
## http://de.openoffice.org - www.openoffice.org ## Vorstand OpenOffice.org
Deutschland e.V.
## Mitglieder willkommen: www.OOoDeV.org
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
RE: [de-users] Toolbars eines Formulars in einer odb per Makro verstecken
Keiner eine Idee? :) -Original Message- From: Christophe Nix Sent: vendredi 2 juin 2006 13:31 To: users@de.openoffice.org Subject: [de-users] Toolbars eines Formulars in einer odb per Makro verstecken Hi, Bisher mache ich das folgendermassen Sub HideToolbars Dim frame as object doc = Stardesktop.getCurrentComponent() frame = doc.CurrentController.Frame lmgr = frame.LayoutManager lmgr.setVisible(false) End Sub Dies funktioniert leider ausschliesslich in Version 2.0.1 aufgrund eines Bugs, da in der Version die Formulardokumente Teil des Stardesktops sind. Ausserdem bleibt bei dieser Variante trotzdem die Statusleiste erhalten. Ein wenig verstümmelt zwar aber weiterhin aktiv. Nun würde ich mich freuen, wenn mir jemand erklären könnte wie der Code richtig aussehen müsste, damit ich in den weiteren Verisonen von OOo keine Probleme bekomme. Ausserdem praktisch wäre das maximieren des Dokuments per Makro, aber ich denke das bekomme ich hin so wie ich weiss wie ich das Formular korrekt anspreche. Vielen Dank im Voraus, Gruss, Christophe Nix - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
[de-users] Toolbars eines Formulars in einer odb per Makro verstecken
Hi, Bisher mache ich das folgendermassen Sub HideToolbars Dim frame as object doc = Stardesktop.getCurrentComponent() frame = doc.CurrentController.Frame lmgr = frame.LayoutManager lmgr.setVisible(false) End Sub Dies funktioniert leider ausschliesslich in Version 2.0.1 aufgrund eines Bugs, da in der Version die Formulardokumente Teil des Stardesktops sind. Ausserdem bleibt bei dieser Variante trotzdem die Statusleiste erhalten. Ein wenig verstümmelt zwar aber weiterhin aktiv. Nun würde ich mich freuen, wenn mir jemand erklären könnte wie der Code richtig aussehen müsste, damit ich in den weiteren Verisonen von OOo keine Probleme bekomme. Ausserdem praktisch wäre das maximieren des Dokuments per Makro, aber ich denke das bekomme ich hin so wie ich weiss wie ich das Formular korrekt anspreche. Vielen Dank im Voraus, Gruss, Christophe Nix - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
RE: [de-users] Makros funktionieren nicht mehr von 2.0 auf 2.0.2
Nein bin ich nicht :) Vielen Dank für den Hinweis ;) Mal schauen wie ich meine Makros richtig umstricken kann. -Original Message- From: Regina Henschel [mailto:[EMAIL PROTECTED] Sent: vendredi 26 mai 2006 15:31 To: users@de.openoffice.org Subject: Re: [de-users] Makros funktionieren nicht mehr von 2.0 auf 2.0.2 Hallo Christophe, Christophe Nix schrieb: > Hi, > > Keiner eine Idee? :) > Kann doch nicht sein, dass ich der einzige bin der darüber gestolpert > ist ;) > Bist du auch nicht. Oder bist du "schmieta"? http://www.openoffice.org/issues/show_bug.cgi?id=63392 mfG Regina - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
RE: [de-users] Makros funktionieren nicht mehr von 2.0 auf 2.0.2
Hi,
Keiner eine Idee? :)
Kann doch nicht sein, dass ich der einzige bin der darüber gestolpert ist ;)
Gruss,
Christophe
-Original Message-
From: Christophe Nix
Sent: lundi 22 mai 2006 13:30
To: users@de.openoffice.org
Subject: [de-users] Makros funktionieren nicht mehr von 2.0 auf 2.0.2
Hi,
ich habe da ein kleines Problem das mich heute morgen beim Kunden ins schwitzen
gebracht hat ich habe etliche Makros m Büro vorbereitet aud Version 2.0, beim
Kunden ist die 2.0.2 installiert Als ich dort ankam funktionierte die Hälfte
meiner Makros nicht.
ZB folgendes
Sub ASListeAktualisieren
Doc = StarDesktop.CurrentComponent
Forms = Doc.Drawpage.Forms
oForm = Forms.GetByIndex(0)
oForm.getByName("LB_AS").refresh
End Sub
und zwar bleibt er an der Drawpage Zeile hängen mit der Meldung "Objektvariabel
nicht belegt"
Werde jetzt mal hier im Büro auch die 2.0.2 installieren und sehen ob ich das
in den Griff bekomme.
Wäre aber schon dankbar für einen Hinweis ;)
Gruss,
Christophe
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
[de-users] Makros funktionieren nicht mehr von 2.0 auf 2.0.2
Hi,
ich habe da ein kleines Problem das mich heute morgen beim Kunden ins schwitzen
gebracht hat
ich habe etliche Makros m Büro vorbereitet aud Version 2.0, beim Kunden ist die
2.0.2 installiert
Als ich dort ankam funktionierte die Hälfte meiner Makros nicht.
ZB folgendes
Sub ASListeAktualisieren
Doc = StarDesktop.CurrentComponent
Forms = Doc.Drawpage.Forms
oForm = Forms.GetByIndex(0)
oForm.getByName("LB_AS").refresh
End Sub
und zwar bleibt er an der Drawpage Zeile hängen mit der Meldung "Objektvariabel
nicht belegt"
Werde jetzt mal hier im Büro auch die 2.0.2 installieren und sehen ob ich das
in den Griff bekomme.
Wäre aber schon dankbar für einen Hinweis ;)
Gruss,
Christophe
