Hallo Leute!
Hab ein Problem.
Habe ein Dialog mit einem Textfeld und einem Button.
Jetzt will ich - wenn man auf den Button drückt - daß eine Msg-Box auftaucht mit dem Inhalt des Textfeldes.
Habs mal so probiert
Code: Alles auswählen
Dim oDialog1 AS Object
Sub StartDialog1
BasicLibraries.LoadLibrary("Standard")
oDialog1 = LoadDialog("Standard", "Martin")
oDialog1.Execute()
end sub
Die Methode LoadDialog hab ich 1:1 von der Hilfe übernommen.
Jetzt möchte ich mit
Code: Alles auswählen
oDialog1 = LoadDialog("Standard", "Martin")
REM Model des Dialogs holen
oDialog1Model = oDialog1.Model
inhalt = oDialog1.GetControl("feld")
MsgBox inhalt.text
End Sub
den Inhalt darstellen.
Es wird auch eine Msg-Box geöffnet, allerdings ohne Inhalt!
Was mir noch aufgefallen ist - wenn ich das Textfeld vorher mit einem Wert belege, wird der vorgegebene Wert auch in der Msg-Box angezeigt.
Wer weiß Rat??
Danke schonmal!
Martin