die Datei c:\ALASKA\XPPW32\Source\samples\basics\DBBMP\Animate.prg kennt ihr wohl.
nun ist es, wie viele GUI Sample, NICHT auf XbpDialog aufgebaut ...
das umschreiben war weniger das Problem ... aber ich bekam kein Bild zu sehen
nun kann ich reproduzieren woran es bei mir lag
Code: Alles auswählen
oDlg := XBPDIALOG() :new( APPDESKTOP(),,,,,.F. )
oDlg:close := { | mp1, mp2, obj | lExit := .T. }
oDlg:create()
//
// warum MUSS hier ein CenterControl() stehen ?
//
CenterControl(oDlg)
oDlg:show()