[OPGELOST]setFocus voor Object op bepaalde pagina van Dialog

[OPGELOST]setFocus voor Object op bepaalde pagina van Dialog

Berichtdoor BoySue » wo feb 09, 2011 9:26 pm

Hallo,
Met oDialog.getControl(objectnaam).setFocus krijgt het bedoelde object de focus,
dat blijkt tenminste mbv xRay (oDialog.getControl("ArtikelBak").hasFocus = true).
Maar op het scherm is dit niet het geval.
Op de fora wel oplossingen gevonden voor objecten op Forms, maar niets werkt tot nu toe op een Dialog.

Probleem wordt geïllustreerd in bijgevoegde Database_Dialog1bew.odb
Klikken op "Menu Item 1" ,
dan "Inbreng artikel" kiezen tovert de input-vakken van pagina (Stap)11 op het scherm.

Niettegenstaande het eerste input vakje ("ArtikelBak") in Sub Button1_1_Click van module MenuMod de focus gezet kreeg
(xRay bevestigt dit met oDialog.getControl("ArtikelBak").hasFocus = true)
blijkt dit niet zo te zijn en is er toch eerst een muisklik op het inputvakje nodig om de input te starten.

Alle hints die in de bijgevoegde database werken zijn uiterst welkom.

Willy.
Bijlagen
Database_Dialog1bew.odb
(8.9 KiB) 115 keer gedownload
Laatst bijgewerkt door BoySue op do feb 10, 2011 9:14 am, in totaal 2 keer bewerkt.
genietend van:
LinuxMint 9 kernel 2.6.32-21
OpenOffice.org 3.2.0 000320m12 (build:9483)
BoySue
 
Berichten: 18
Geregistreerd: do sep 02, 2010 2:47 pm

Re: setFocus voor Object op bepaalde pagina van Dialog?

Berichtdoor RPG » do feb 10, 2011 1:13 am

Hallo

Een wait 1000 doet wonderen.

Romke
LibreOffice 6.1.5.2 op openSUSE Leap 15
RPG
 
Berichten: 3925
Geregistreerd: wo apr 15, 2009 1:01 am
Woonplaats: Apeldoorn, Nederland

Re: setFocus voor Object op bepaalde pagina van Dialog?

Berichtdoor BoySue » do feb 10, 2011 9:11 am

Hallo,

WAIT 1000, zelf wait 500 doet idd wonderen!

Code: Selecteer alles   UitklappenInklappen
Rem Handle clicking "Inbreng artikel"
Sub Button1_1_Click
   with oDialog
      .getControl("Button1_1").Model.State = 1   'Button1_1 selected      
      .getControl("Button1_2").Model.State = 0   'Button1-2 not selected
      .Model.Step = 11                     'Dialogpage to display
   end with
   oDialog.getControl("Label1").Model.Label = " Page 11 actief "
   oDialog.getControl("Button1_1").Model.State = 0   'Button1_1 nolonger selected
   oDialog.getControl("DatumBak").Model.text = format(DATE,"DD-MM-YYYY")
   wait 500
   oDialog.getControl("ArtikelBak").setFocus
End Sub



Bedankt Romke :super:

Willy
genietend van:
LinuxMint 9 kernel 2.6.32-21
OpenOffice.org 3.2.0 000320m12 (build:9483)
BoySue
 
Berichten: 18
Geregistreerd: do sep 02, 2010 2:47 pm


Keer terug naar Macro's

Wie is er online

Gebruikers op dit forum: Geen geregistreerde gebruikers. en 1 gast

cron