Jak programová posouvání Visual FoxPro tvar

Překlady článku Překlady článku
ID článku: 190818 - Produkty, které se vztahují k tomuto článku.
Rozbalit všechny záložky | Minimalizovat všechny záložky

Souhrn

Na rozdíl od ovládacího prvku mřížky, která má metodu posuvníku, může být volána programově procházejte záznamy mřížky formulář má například metodu.

Musíte použít metodu SetViewPort programově posouvání Visual FoxPro 6.0 formuláře.

Další informace

Následující ukázkový formulář posune programově pomocí Page Up a PAGE DOWN klíče:
   Sample Code
   -----------
				
   PUBLIC oform
   oform=NewObject("ScrollForm")
   oform.show

   DEFINE CLASS ScrollForm AS form
      Top = 0
      Left = 0
      Height = 101
      Width = 168
      ScrollBars = 2
      Caption = "Use PgUp/PgDwn to Scroll Form"
      vertscrollpos = 0
      Name = "Form1"
      ADD OBJECT shape1 AS shape WITH ;
         Top = 12, ;
         Left = 12, ;
         Height = 421, ;
         Width = 553, ;
         Name = "Shape1"
      ADD OBJECT command1 AS commandbutton WITH ;
         Top = 24, ;
         Left = 36, ;
         Height = 27, ;
         Width = 84, ;
         Caption = "Close", ;
         Name = "Command1"
      PROCEDURE KeyPress
         LPARAMETERS nKeyCode, nShiftAltCtrl
         IF nKeyCode=3
            Thisform.vertscrollpos=Thisform.vertscrollpos+Thisform.height
            Thisform.SetViewPort(0,Thisform.vertscrollpos)
            Thisform.Refresh
         ENDIF
         IF nKeyCode=18
            Thisform.vertscrollpos=Thisform.vertscrollpos-thisform.height
            Thisform.SetViewPort(0,Thisform.vertscrollpos)
            Thisform.Refresh
         ENDIF
      ENDPROC
      PROCEDURE command1.Click
         thisform.release
      ENDPROC
   ENDDEFINE
				

Vlastnosti

ID článku: 190818 - Poslední aktualizace: 1. července 2004 - Revize: 1.1
Informace v tomto článku jsou určeny pro produkt:
  • Microsoft Visual FoxPro 6.0 Professional Edition
Klíčová slova: 
kbmt kbcode kbhowto KB190818 KbMtcs
Strojově přeložený článek
Důležité: Tento článek byl přeložen pomocí software společnosti Microsoft na strojový překlad, ne profesionálním překladatelem. Společnost Microsoft nabízí jak články přeložené překladatelem, tak články přeložené pomocí software na strojový překlad, takže všechny články ve Znalostní databázi (Knowledge Base) jsou dostupné v češtině. Překlad pomocí software na strojový překlad ale není bohužel vždy dokonalý. Obsahuje chyby ve skloňování slov, skladbě vět, nebo gramatice, podobně jako když cizinci dělají chyby při mluvení v češtině. Společnost Microsoft není právně zodpovědná za nepřesnosti, chyby nebo škody vzniklé chybami v překladu, nebo při použití nepřesně přeložených instrukcí v článku zákazníkem. Společnost Microsoft aktualizuje software na strojový překlad, aby byl počet chyb omezen na minimum.
Projděte si také anglickou verzi článku:190818
Právní omezení pro obsah znalostní báze týkající se produktů, jejichž podpora byla ukončena
Tento článek byl napsán o produktech, pro které společnost Microsoft již neposkytuje nadále podporu. Článek je tedy nabízen v takovém stavu, v jakém je, a nebude již nadále aktualizován.

Dejte nám zpětnou vazbu

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com