Inoffizielles deutsches Xbase-Forum

moin,

in einer CLASS SysForm FROM XbpDialog hab ich einen weiteren XbpDialog als MDI-Client

METHOD SysDlg:Action(cDLL,cVER)
   oDlg := XbpDialog():New(::drawingArea,,{0,0}, aSize,,.F.)
   oDlg:close := { || lExit := .T. }

auf dem sind nun viele Buttons.

Code: Alles auswählen

   bBlock := ::MakeBlock("ShowBig",nIcon,oIcon,cDLL)
   oPB:activate := &(bBlock)

der Button ruft im Codeblock die Procedure ShowBig() auf und zeigt ein neues "freies" Fenster an.

Code: Alles auswählen

   oDlg := XbpDialog():new( AppDesktop(),,,,, .F.)

die Eventschleife ist praktisch gleich (Main, MDI-Client, "freie" Fenster)

Code: Alles auswählen

   DO WHILE !lExit = .T.
      nEvent := AppEvent ( @mp1, @mp2, @oXbp )
      DO CASE
         CASE nEvent == xbeP_Keyboard .AND. mp1 == xbeK_ESC
            EXIT
      OTHERWISE
         oXbp:HandleEvent ( nEvent, mp1, mp2 )
      ENDCASE
   ENDDO

mit ESC verlässt er die Schleife.

nun clicke ich in das MDI-Client Fenster mit den Buttons während noch "freie" Fenster geöffnet sind.
statt das der MDI-Client Dialog schliesst tun es die "freien" Fenster bei ESC ... hm ... wieso

wenn ich die "freien" Fenster als Thread starte funktioniert ESC immer in "dem" Fenster.

p.s. real Keyboard

Du solltest vielleicht noch einbauen dass ESC nur die Eventloop des aktiven (Focusierten) Fensters schliesst.

Gruss Carlo

Oder es ganz einfach mit eigenen Threads versuchen?

die Eventschleife ist praktisch gleich (Main, MDI-Client, "freie" Fenster)

Hast Du in jedem Teilchen eine Event-Schleife? Wenn ja, ist das der Grund.

hi,

hab ich doch geschrieben das es im Thread funktioniert ... und da ist mir auch klar geworden was vorher passiert ist.

wenn ich per Button den neuen Dialog geöffnet hatte konnte ich weiter Button aktivieren -> neue Dialoge.
nun war am Anfang keine Eventloop im Source ( Fullview aus Imageview Demo ) und er machte bei zurück gehen das Fenster immer zu ... also eine Eventloop

jetzt steckt er aber im letzten Fenster das ich aufgerufen habe ... egal in welches Fenster ich klicke

also muss er erst die Eventloop verlassen usw. bevor ich wieder beim MDI-Client bin (mit den Buttons)

Was verstehst Du unter Event Loop? Ich verstehe nur Railway Station.

Geht mir ähnlich.

Inoffizielles deutsches Xbase-Forum

wieso geht ESC dort hin ... [erledigt]

wieso geht ESC dort hin ... [erledigt]

Re: wieso geht ESC dort hin ...

Re: wieso geht ESC dort hin ...

Re: wieso geht ESC dort hin ...

Re: wieso geht ESC dort hin ...

Re: wieso geht ESC dort hin ... [erledigt]

Re: wieso geht ESC dort hin ... [erledigt]