Daten in ein Subform Grid schreiben
Verfasst: Fr, 23.11.2007 10:12
Hallo ich versuch über Basic Daten in ein Grid in einem Subformular zu schreiben.
Das lesen der Daten gibt keine Probleme.
Gibt mir die Werte ohne Probleme.
Versuche ich aber zu Schreiben
Die MsgBox git mir zwar „aaa“ zurück aber im Formular sieht man den Eintrag nicht
auch versuche mit
Sind erfolglos.
Hat irgendjemand einen Ansatz wie man das lösen kann wäre sehr interessant da man damit zum Beispiel ein Datum, Preis etc.. automatisch einsetzen kann.
Das lesen der Daten gibt keine Probleme.
Code: Alles auswählen
oDoc = thisComponent
oDrawPage = oDoc.Drawpage
oForm = oDrawPage.Forms
oGrid = oForm.getByName("MainForm").getByName("SubForm").getByName("SubForm_Grid")
nBetrag = oGrid.getByName("Importe").Value
iAnzahl = oGrid.getByName("Unidades").Value 'Versuche ich aber zu Schreiben
Code: Alles auswählen
oGrid.getByName("Total").Text = "aaa" 'Format(nImporte * iUnidades, "#,##0.00 $€")
oGrid.getByName("Unidades").Value = 2
msgbox oGrid.getByName("Total").Textauch versuche mit
Code: Alles auswählen
form1=oDrawPage.forms.getbyIndex(0)
osubform=form1.getbyname("SubForm")
myselect=osubform.getString(5)
MsgBox myselect
oSubform.setString(5, "aaa")Hat irgendjemand einen Ansatz wie man das lösen kann wäre sehr interessant da man damit zum Beispiel ein Datum, Preis etc.. automatisch einsetzen kann.