Inhalt eines Textfeldes automatisch in ein andres übernehmen

[gschuckar]

Hallo martin,
versuchs mal damit:

Code: Alles auswählen

REM  *****  BASIC  *****
option explicit
REM oDlgText ist der Name des Dialoges, welches die Textfelder enthält
dim oDlgText as Object
Sub Main
DialogLibraries.LoadLibrary("Standard")
oDlgText = createUnoDialog(DialogLibraries.Standard.dlgText)

oDlgText.execute()
End Sub

sub changeText()
oDlgText.getControl("text2").setText(oDlgText.getControl("text1").getText())
end sub

Dem Textfeld, in welchem der User jetzt etwas eingibt, must Du die sub changeText bei dem Ereigniss 'text modifiziert' zuweisen.
Have fun
Gerd