Hallo Erik,
das versuche ich z.B. im onBlur Event des Feldes, ausgelagert in einer Script Lib:
Sub onBlurBirthday()
On Error GoTo fehler
MsgBox "onBlur"
Dim birthday As String
birthday = me.m_uiDoc.Fieldgettext("birthday")
birthday = FullTrim(StringUtils.trimLineBreaks( birthday ))
Call me.m_uiDoc.Fieldsettext("birthday", birthday )
weiter:
Exit Sub
fehler:
Call ErrorHandler.handleError( Error, Erl, Err, CURRENT_LIB_NAME, me.m_className, "onBlurBirthday" )
Resume weiter
End Sub
Das event wird allerdings nicht gefeuert (MsgBox erscheint nicht). Statt dessen die genannte Fehlermeldung.
Das als Textfeld zu deklarieren halte ich aus verschiedenen Gründen eher für unglückglücklich.
Gruß
Hubert
Hallo ronka,
wenn @Trim, dann bereits in der Eingabe Umsetzung:
@If( !@IsTime( @ThisValue ) ;
@Date( @Trim( @Text( @ThisValue ) ) );
@ThisValue )
Und in der Eingabe Validierung dann die Prüfung:
@If( !@IsTime( @ThisValue ) ;
@Failure( "Fehler" ) ;
@success ) ;
Funktioniert aber auch nicht. Meldung bleibt.
Ich hatte auch nach einer Script Lösung gefragt, weil ich bestrebt bin, alle Events in Script Bibliotheken auszulagern.
Gruß
Hubert