Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Animation
Message
De
08/09/2005 05:39:21
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
À
08/09/2005 04:59:11
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Versions des environnements
Visual FoxPro:
VFP 7
OS:
Windows XP SP2
Network:
Windows XP
Database:
Visual FoxPro
Divers
Thread ID:
01047631
Message ID:
01047634
Vues:
12
>Hello Everbody.
> I want to add an animation file in my form who can i do this. I do every thing but my file is not work. please help me

You mean something like an animated gif? If so you could use webrowser in VFP7.ie:
lcAnimatedGif = "c:\myPath\myAnimated.gif"

Public oForm
oForm = Createobject('myForm')
oForm.Show

Define Class myForm As Form
  Add Object myBrowser As OleControl ;
    with OleClass="Shell.Explorer",;
    Height=120,Width=120

  Procedure myBrowser.Refresh
    Nodefault
  Endproc

  Procedure Init
    With This.myBrowser
      .Navigate2('file://'+m.lcAnimatedGif)
      Do While .ReadyState # 4
      Enddo
      .Document.body.Scroll="no"
    Endwith
  Endproc
Enddefine
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform