[gelöst] BASE: Datensatznummer auslesen, zur Zeile springen

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

ruessmann
Beiträge: 6
Registriert: Do, 09.09.2010 11:31

[gelöst] BASE: Datensatznummer auslesen, zur Zeile springen

Beitrag von ruessmann »

Hallo,

ich habe ein Hauptformular in Tabellenform, in dem ich die Datensätze auswählen möchte, und ein Unterformular mit Feldern, in denen ich arbeiten möchte.
Damit die geänderten Daten auch in dem Hauptformular erscheinen nutze ich folgenden Code:

Code: Alles auswählen

 Dim oDoc, oForm as Object
   oDoc = thisComponent
   oForm = oDoc.drawpage.forms.getbyname("MainForm")
   oform.updaterow()
   oForm.reload()
Leider springt das Formular immer zum ersten Datensatz zurück.
Kann man die Datensatznummer vorher per Makro auslesen und danach per Makro wieder zu dieser Nummer springen?

Hier noch die Datei zur besseren Vorschau:

--------------------------------------------------------------------

Edit: Danke, der Code funktioniert einwandfrei, genau wie ich es wollte.



Moderation,4: verschoben in BASIC-Unterbereich, wo alle Makro-Fragen hin gehören; Betreff angepasst
Dateianhänge
Kopie (2) von Auftraege.odb
(15.54 KiB) 41-mal heruntergeladen
Zuletzt geändert von ruessmann am Di, 24.01.2012 07:26, insgesamt 2-mal geändert.
F3K Total
********
Beiträge: 3724
Registriert: Mo, 28.02.2011 17:49

Re: BASE: Datensatznummer auslesen und zum Datensatz springe

Beitrag von F3K Total »

Jupp,
geht so:

Code: Alles auswählen

oForm = oDoc.drawpage.forms.getbyname("MainForm")
nRow=oForm.row
oform.updaterow()
oForm.reload()
oform.absolute(nRow)
Gruß R
Antworten