Am Mi, den 16.02.2005 schrieb Marcus Troester um 13:03:
[...]
> >>"Standard" ersetze ich durch die Bezeichnung, des Form-Feldes im Men�:
> >>Form Properties -> General -> Name?
> >
> > Kann sein, ich arbeite mit OOo1.1, da geht es so:
> >
> > Formular �ffnen, Bearbeitungsmodus einschalten, Entwurfsmodus
> > einschalten, ein Formularfeld markieren, damit die Symbolleiste sichtbar
> > wird, Formularnavigator �ffnen.
> >
> > Dann sieht man die Hirarchie beginnend mit "Formular" und dem ersten
> > Unterknoten, der normalerweise "Standard" hei�t (bei der deutschen und
> > englischen Version). Das ist der hier gefragte Name.
>
> wo der Wert standardm��ig auch "standard" gesetzt ist? Jap, das meinte
> ich auch.
Vorsicht, Gro�-/Kleinschreibung beachten, aber sonst okay.
> > Einfacher ist vielleicht
> >
> > ThisComponent.DrawPage.Forms(0).IsNew
> > Damit benutzt man immer das erste "Formular". Die Dinger k�nnen aber
> > nicht nur Unterformulare sondern auch mehrere Hauptformulare
> > enthalten.
>
> auch das habe ich mal versucht.
>
> >>Und "Col12" durch die entsprechende Zeile im Tabellendesign?
> >
> > �hm, Du stellst Fragen. Dazu m��te man jetzt wissen, welcher Service von
> > Event.Source zur�ckgegeben wird. Ich sepekuliere mal, da� es das
> > Formularelement ist, in dem das Datum im Formular angezeigt wird. Dessen
> > "BoundFiled", also das dazugeh�rige Feld in der DB-Tabelle auf OOo-Seite
> > wird auf "" bzw. Null gesetzt.
> >
> > Wobei ich mich Frage, ob man nicht einfach das Datumseingabefeld
> > (Control) leer setzen kann ...
>
> meinst du:
> Event.Source.GetByIndex(0).GetByName().BoundField.updateNull()
>
> Also ich habe es jetzt auch mit "Geburtsdatum" versucht, dass ist der
> FielName in der Tabelle und auch der Control Name, zu finden �ber
> Rechtsklick �ber dem Formularfeld -> Control -> General -> Name
>
> Auch habe ich es mit "Col15" Versucht, weil der Feldname Geburtsdatum in
> der Tabelle in der 15. Spalte liegt.
Also ich hatte mal ein �hnliches Problem, n�mlich ein ID-Feld mit einem
generierten Schl�ssel virzubelegen. Das habe so gel�st (und wei�, das es
funktioniert hat ;):
' Gebunden an:
' Form Standard.Nach dem Zur�cksetzen
sub FillInIfNew
dim oDoc as object
dim oForm as object
oDoc = thisComponent
oForm = oDoc.drawpage.forms(0)
if oForm.isNew then
FillInKey()
endif
end sub
' Wird nach Eingabe ins Kategorienamen-Feld
' aufgerufen und schreibt automatisch den Schl�ssel
Sub FillInKey
dim key as string
dim oDoc as object
dim oForm as object
dim oField as object
key = DB_Basis.newGlobalDBKey()
oDoc = thisComponent
oForm = oDoc.drawpage.forms(0)
oForm.updateString(1, key)
end sub
Wobei klar sein sollte, das "key = DB_Basis.newGlobalDBKey()" nat�rlich
den Wert erzeugt und zur�ckgibt.
Der Wert in der vorletzten Zeile bei "updateString(1, key)" ist die
Spaltennummer in der zugrunde liegenden Tabelle. Also m��te bei Dir
etwas wie "oForm.updateNull(<die Spaltennummer, beginnend mit eins>)"
den Job tun.
> Insgesamt hat nichts hingehauen. :(
Wird schon noch ...
> > Es gab mal ein Tutorium f�r SO5.2, dessen erste AUsgabe auch ien Kapitel
> > �ber dieses Thema hatte. Vielleicht gibt es das bei Sun noch, allerdings
> > vermutlich ohne Kapitel 4 -Datenbanken.
>
> von Sun habe ich zu Basic und SO7 das hier gefunden:
> http://docs.sun.com/app/docs/doc/817-3924
Steht denn da was zu dem Thema drin? Wenn ja: Lesen. ;)
Gru�,
Marc
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
