Hallo,
ich will den Titel eines Labels programmgesteuert ändern, doch irgendwie
klappt das nicht.
Hier ein vereinfachtes Makro.
sub test
DialogLibraries.LoadLibrary( "Standard" ) 'existiert!
MyDlg = CreateUnoDialog(DialogLibraries.Standard.Dialog1) 'existiert!
MyControl=MyDlg.GetControl("Label1") 'existiert!
MyControl.Model.Step=0
a=MyControl.text 'Zur Überwachung
a=MyControl.model.label 'Zur Überwachung
MyControl.model.label ="test!"
MyControl.text ="haha" 'geht auch nicht
a=MyControl.text 'Zur Überwachung
a=MyControl.model.label 'Zur Überwachung
end sub ' test
a zeigt zwar die Änderungen an, aber der Dialog wird nicht geändert.
Was ist daran falsch?
Wie könnte das denn gehen?
Danke im Vorraus.
Horst Schulze
OO 2.2.1 auf Win XP
Horst Schulze
--
Partei Bibeltreuer Christen, PBC
Werte erhalten - Zukunft gestalten
"Wohl dem Volk, dessen Gott der Herr ist!" Psalm 33,12
www.pbc.de
