Größe beim Anwendungsfenster ändern
Verfasst: Sa, 29. Mär 2014 17:25
Hallo,
ich habe ein kleines Testprogramm installiert. Ein Anwendungsfenster und ein weiteres Fenster darin.Das Fenster im Anwendungsfenster läßt sich mit der Maus in der Größe stufenlos verstellen. Das äußere Anwendungsfenster läst sich nicht stufenlos verstellen. Im xbase++ Beispielprogramm SDIDemo ist das ebenfalls so. Geht das generell nicht zu verstellen?
mfg
Wolfgang
ich habe ein kleines Testprogramm installiert. Ein Anwendungsfenster und ein weiteres Fenster darin.
Code: Alles auswählen
PROCEDURE Main
LOCAL nEvent, mp1, mp2, oXbp, aPos[2], aSize, nHeight:=500, nWidth := 715
// Größe vom DeskTop feststellen
// um Anwendungsfenster zu zentrieren
aSize := SetAppWindow():currentSize()
aPos[1] := Int( (aSize[1]-nWidth ) / 2 )
aPos[2] := Int( (aSize[2]-nHeight) / 2 )
// Anwendungsfenster erzeugen
oFensterStart := XbpDialog():new()
oFensterStart:border := XBPDLG_DLGBORDER
oFensterStart:taskList := .T.
oFensterStart:title := "Timechecker"
oFensterStart:maxButton:= .T.
oFensterStart:create( ,, aPos, {nWidth, nHeight},, .T. )
// Fenster erzeugen
oFensterl := XbpDialog():new()
oFensterl :border := XBPDLG_DLGBORDER
oFensterl :taskList := .T.
oFensterl :title := "Fenster links"
oFensterl :maxButton:= .T.
oFensterl :create(oFensterstart:drawingArea ,, {8,100}, {348,357},, .T. )
SetAppWindow( oFensterl )
SetAppFocus ( oFensterl )
DO WHILE .T.
nEvent := AppEvent( @mp1, @mp2, @oXbp )
oXbp:handleEvent( nEvent, mp1, mp2 )
ENDDO
RETURN
mfg
Wolfgang