Übermalte Fenster

[Werner_Bayern]

Servus,

bekomme das Problem einfach nicht in den Griff, auf versch. PCs passiert das - aber nicht eindeutig nachvollziehbar, dass nach Anzeige eines Dialogs und ordentlichem Schließen der ursprüngliche Dialog nicht mehr richtig gezeichnet wird:

Neuzeichnen01.PNG (5.03 KiB) 10007 mal betrachtet

Hier wird also das XbpBrowse auf dem Tabpage Bestellung nicht mehr komplett neu gezeichnet.
Die aktuellen dafür zuständigen Einstellungen:

Code: Alles auswählen

oFenster:clipSiblings := .t.  // geändert am 04.09.2013, wieder zurück auf .t., das ist richtig
oFenster:clipChildren := .f.  // 28.02.2014

Parent und Owner stimmen.

[georg]

Hallo, Werner -


vor einiger Zeit habe ich ein vergleichbares Problem gehabt, da konnte ich aber die Parent-/Owner-Beziehung letztendlich als Ursache ausmachen. Auch wenn Du Dir 100 % sicher bist, dass alles passt: schau noch einmal nach, eventuell wird die Variable, die Du verwendest, irgendwo verändert.

Ansonsten versuche ich, den entsprechenden Code-Abschnitt in ein Miniprogramm zu packen und prüfe, ob das Problem dort auch auftritt, wenn mein ganzes Framework aussen vor ist.

[Wolfgang Ciriack]

Pack doch mal ein Static auf die Tabpage und nimm als Parent für dein Browse nicht die Tabpage sondern das Static.
M.E. hat Roger in eXPress++ das genau aus dem Grund auch getan.

[Werner_Bayern]

Servus Wolfgang,

so mache ich es bereits:

Code: Alles auswählen

oTab2 := XbpTabPage():new(oFenster:drawingArea,, aTabPos, aTabGroesse, {{XBP_PP_FGCLR, TABVORDERGRUND},;
{XBP_PP_BGCLR, TABHINTERGRUND}})
oTab2:caption := cFormular
oTab2:minimized := .f.
oTab2:preOffset  := 20
oTab2:postOffset := 60
oTab2:create()
oTab2:TabActivate := {|| oTab2:setColorBG(TABAKTIV), oTab1:setColorBG(TABINAKTIV), oTab3:setColorBG(TABINAKTIV),;
oTab1:minimize(), oTab3:minimize(), oTab2:maximize(), setAppfocus(oBrowse)}

oXbp:=XbpStatic():new( oTab2,, aRAHMENPOS, aRAHMENGROESSE, {{XBP_PP_FGCLR, TABVORDERGRUND}, {XBP_PP_BGCLR, TABHINTERGRUND}} )
oXbp:create()

drawingArea := oXbp

oBrowse := GuiBrowseDb(drawingArea, {0, drawingArea:currentsize()[2] - nHoehe}, {nBreite, nHoehe})

[Werner_Bayern]

Auch wenn Du Dir 100 % sicher bist, dass alles passt: schau noch einmal nach, eventuell wird die Variable, die Du verwendest, irgendwo verändert.

Dumme Frage: Wie mache ich das am besten?
setParent(), setOwner(), Childlist(), alles irgendwie anzeigen lassen für jedes neu erzeugte Fenster?

Irgendwie scheint das Problem unter Vista extrem selten aufzutauchen, unter XP und Win7 öfters...

[brandelh]

ich meine ich hätte meine DebugPrint() Funktion hier veröffentlicht, ein Fenster das automatisch geöffnet wird wenn man eine Zeile ausgibt:

http://www.xbaseforum.de/viewtopic.php?f=16&t=3121

[georg]

Hallo, Werner -


ich setze immer noch den xppdbg ein, und kontrolliere in so einem Fall den Wert der Variablen, die ich bei new() übergebe. Wobei ich zugeben muss, dass Dein Code da wenig Raum für so etwas gibt.

[brandelh]

Xppdbg ist schon brauchbar, solange es nicht um das Verhalten von Fenstern geht, denn wenn man ihn bedient verliert das zu untersuchende Fenster / Control den Focus.
Das mit DebugPrint habe ich übrigens der IDE von Basic4Android abgeschaut

[georg]

Hallo, Werner -


verwendest Du Owner-Drawing bei den Spalten? Bist Du sicher, dass die Spalten alle den korrekten Parent/Owner haben?

[Dieter]

Hallo Werner,
ich nehme an, dass im :TabActivate-Codeblock

... oBrowse:configure(), oBrowse:refreshAll() ...

vor dem setAppFocus(oBrowse) fehlen.

[Werner_Bayern]

Die Frage von mir war, was genau soll ich mir anschauen?

Code: Alles auswählen

oFenster := ScrollDialog():new(oDlg:drawingArea,,

So baue ich mir meine Fenster auf. Was soll ich mir wie von oDlg anzeigen lassen?

Code: Alles auswählen

? oDlg==SetAppWindow()

[Werner_Bayern]

Hallo Werner,
ich nehme an, dass im :TabActivate-Codeblock

... oBrowse:configure(), oBrowse:refreshAll() ...

vor dem setAppFocus(oBrowse) fehlen.

Warum sollte ich beides verwenden? Ist doch nicht nötig? Ich brauche doch keine Neukonfiguration des Browse beim Tabactivate? Ebensowenig einen Datenrefresh? Oder hab ich da was überhaupt nicht verstanden?

[Dieter]

Hallo Werner,

Ein xbpbrowse-Objekt soll ja nur einmal mit :create() erzeugt werden. Bei einer zwischenzeitlicher Veränderungen am Browse-Objekt (z.B. durch Eingaben in einer anderen Tabpage) kann beim Wiederaufruf der Tabpage mit dem Browse-Objekt ein oBrowse:configure() notwendig sein, damit der Browser richtig angezeigt wird (zusammen mit :refreshall()).
Kann es sein, dass du den Browse mehrfach erzeugst, ohne dass das Browse-Objekt vorher destroyed wurde? Wenn ich dich richtig verstehe, hast du beim ersten Aufruf der Tabpage keine Probleme. Erst nach dem erneutem Aufruf der Tabpage-Browser-Seite können die Darstellungsprobleme im Browser anfangen. Bei Mehrfacherzeugung von speicherintensiven Objekten, wie z. B. xbpBrowse, kann es dann schnell zu den von dir geschilderten Problemen kommen. Bei Rechnern mit wenig RAM-Speicher geschieht dies wohl schneller, als bei leistungsstärkeren Rechnern.
Du könntest im Taskmanager mal überprüfen, ob beim mehrfachen Aufruf deines Fensters, dass die Tabpages enthält, oder beim Hin- und Herschalten zwischen den Tabpages der Speicherbedarf deiner EXE ansteigt.

[Werner_Bayern]

Servus Dieter,

danke. Bei mir ist das aber nicht so, das Browse wird nur 1x direkt nach dem Erzeugen des TP erzeugt. Habs aber trotzdem im Taskmanager überprüft, so wie Du es geschrieben hast. Kein Gramm mehr an Speicher beim hin- und herschalten der Tabpages.

Es wird da auch nicht das TP gewechselt, sondern ein neues Fenster geöffnet, dort ein Browse, ein Datensatz ausgewählt und ggf. übernommen in das bestehende Browse.

Code: Alles auswählen

oXbpA:activate := {|| oFenster:disable(), artuebern(cFormular, aWW, nFormularnr), Postappevent(xbeP_Keyboard,xbeK_CTRL_PGDN,,oBrowse), xbpBrowse_stabil(oBrowse), dbselectarea("formular"), oFenster:enable(), SetAppFocus( oBrowse ) }

Bei dem xbpBrowse_stabil wird u. a. ein oBrowse:refreshAll() ausgeführt.

[Dieter]

Hallo Werner,

ich sehe in deinem Code gar kein SetAppFocus(oTab2). Das SetAppFocus(oBrowse) reicht alleine nicht aus!

[Magic]

Hallo Werner,

ich kenne solche unerklärlichen Auswirkungen vor allem dann, wenn ich mit :resize arbeite.
Wie sieht es denn bei Dir aus, wird irgendwo ein :resize verwendet?


In dem Slot TabActivate: würde ich das :minimize() der anderen Tabpages jeweils rausnehmen. Das ist so weit ich weis überflüssig.
So weit ich mich noch erinnern, kann ist auch das :maximize() in der 1.9 SL1 nicht mehr nötig.
Ich würde Schritt für Schritt die TabActivate: "bereinigen" und prüfen wie sich das Programm dann verhält.
Zur Not auch das Setzen der Farben noch rausnehmen.

Ich vermute dass in dieser Kombination die Ursache Deines Problems liegt. Also im Bereich :resize oder :tabActivate.

[AUGE_OHR]

Hier wird also das XbpBrowse auf dem Tabpage Bestellungnicht mehr komplett neu gezeichnet.

welche Version von XppUi2.dll verwendest du ?

[Werner_Bayern]

16.11.2009

[AUGE_OHR]

16.11.2009

also Hotfix 25.
unter den PDRs finde ich nur noch Hotfix 27 wo XbpBrowse erwähnt wird ... hat auch mit TabPage zu tun.

[Werner_Bayern]

Nein, komisch, aber das ist die Version von HF25.

Hab beide zur Sicherheit auch binär verglichen, kein Unterschied. Fix von 2010 ist die dll von 2009.

[Werner_Bayern]

unter den PDRs finde ich nur noch Hotfix 27 wo XbpBrowse erwähnt wird ... hat auch mit TabPage zu tun.

Da setze ich sowieso die 2012er Version ein (nicht die 2013er). HF 27 ist von 2010.

[Werner_Bayern]

ich sehe in deinem Code gar kein SetAppFocus(oTab2). Das SetAppFocus(oBrowse) reicht alleine nicht aus!

Das Browse hat aber danach den Focus.

Soll ich das machen?

Code: Alles auswählen

oXbpA:activate := {|| oFenster:disable(), artuebern(cFormular, aWW, nFormularnr), Postappevent(xbeP_Keyboard,xbeK_CTRL_PGDN,,oBrowse), xbpBrowse_stabil(oBrowse), dbselectarea("formular"), oFenster:enable(), SetAppFocus( oTab2 ), SetAppFocus( oBrowse ) }

[Werner_Bayern]

ich kenne solche unerklärlichen Auswirkungen vor allem dann, wenn ich mit :resize arbeite.
Wie sieht es denn bei Dir aus, wird irgendwo ein :resize verwendet?

Nein, hab ich nicht drin. Den Rest hab ich jetzt mal rausgenommen, wie von Dir angedacht.

[Werner_Bayern]

Nachtrag: Das passiert auch, wenn ein Fenster im Hintergrund ist, das Vordergrundfenster gehided wird. Dann wird manchmal das Hintergrundfenster, das dann ja sichtbar wird, nicht neu gezeichnet / komplett dargestellt.

[Dieter]

Hallo Werner,

du hast geschrieben:

Soll ich das machen?

Code: Alles auswählen

oXbpA:activate := {|| oFenster:disable(), artuebern(cFormular, aWW, nFormularnr), Postappevent(xbeP_Keyboard,xbeK_CTRL_PGDN,,oBrowse), xbpBrowse_stabil(oBrowse),    dbselectarea("formular"), oFenster:enable(), SetAppFocus( oTab2 ), SetAppFocus( oBrowse ) }

Ich habe folgende Probleme mit deinem Codeblock:
1. Nach oFenster:disable() funktioniert meiner Meinung nach das Postappevent(xbeP_Keyboard,xbeK_CTRL_PGDN,,oBrowse) nicht mehr, da oBrowse ja auch im disableten oFenster liegt.
2. Ich weiß nicht, welcher Code in xbpBrowse_stabil() steht?

Ich würde vorab folgendes versuchen:

Code: Alles auswählen

oXbpA:activate := {|| oFenster:disable(), artuebern(cFormular, aWW, nFormularnr), dbselectarea("formular"), oFenster:enable(),;
   SetAppFocus( oTab2 ), SetAppFocus( oBrowse ), Postappevent(xbeP_Keyboard,xbeK_CTRL_PGDN,,oBrowse), xbpBrowse_stabil(oBrowse) }