Animeret gif i access

I VERY MUCH DOUBT that you can get an animated gif to "move" in Access!

If it is possible the it will need an Activex control (OCX) or something.

Here is an idea!
An animated GIF contains more than one image and then through software each image gets displayed. So, you make a number of images and then place an image object on a form. Then using the forms timer event you can loop through each image replacing the objects source with the next image.

here is a link that may give some info
http://members.aol.com/royalef/gifmake.htm

http://www.grafx-design.com/01anim.html

blev seriøst nysgerrig da jeg læste denne tråd :)

En tredjeparts activeX control kan tilsyneladende klare opgaven...ex
http://skyscraper.fortunecity.com/capacity/402/activex.html

Kræver at du har Regsvr32.exe installeret i din C:\Windows\System\ folder... Har jeg ikke, så jeg kan ikke teste om det virker :(

Regsvr32.exe følger med en del developer tools.....så

>>terry faktisk en god ide du kommer med 18:16 :)

....sådan noget vrøvl - selvfølgelig har jeg da det LOL......og skidtet virker ovenikøbet :))

OK here goes. Download den pakke jeg referer til.

Kopier filen Gif89.dll til C:\Windows\System32
(en god ide er at du først foretager en søgning efter Regsvr32.exe for at se hvor den er placeret på din PC). Hos mig ligger den i C:\Windows\System32. Kan på en anden PC ligges i C:\Windows\System afhængigt af hvilket OS du kører med. Så søg efter den for at finde den korrekte placering.

ActiveX objektet skal nu registreres i Access. Åbn din db, og din form hvor giffen skal placeres. I hovedmenuen vælger du Funktioner\ActiveX objekter og klikker på knappen "Registrer". Find filen Gif89.dll og klik på OK.

Dllén er nu registreret.

For at indsætte din gif:
Vælg Indsæt\ActiveX object og vælg "Gif89 class".

Access indæstter en box i din form.
Højreklik på den og under fanen Andre, skriver du under Filename stien hvor din animerede gif ligger. Ex: D:\Dokumenter\Gif\NavnPåMinAnimeredeGif.gif

Du kan så vælge om giffen skal gemmes i databasen, eller om der bare skal linkes til den (fylder mindre)

OBS!! Du skal være obs på at hvis animationen skal virke på andre PCér skal du først kopiere dllén over og registrere den som jeg beskriver i starten af denne afhandling :)

;) for sent ..... tja om ikke andet så har jeg da lært lidt om animationer i Access i dag LOL

hi Susanne>Good link you found there so if you want 50% for your troubles then let m eknow and I will place a question

nah doesn´t matter

den som kommer først til mølle og alt det der :)

OK then I owe you :o)

Thanks

Hehe can never know what kind of Access probs I might run into in the future ;)

Tak for indsatsen "Susanne/Terry" !! i kommer med i min aftenbøn,, høhø,, under det gode afsnit.

MKH
Mandersen

;)

...har iøvrigt glemt en ikke helt uvæsentlig detalje... Når Gif89.dll er kopieret over i windows mappen skal du vælge Start\Kør

her skriver du så:
C:\Windows\System32\Regsvr32.exe C:\Windows\System32\Gif89.dll
...hvis filen Regsvr32.exe befinder sig i mappen System32

...og så skifter du til Access og registrerer Gif89.dll (activeX)

det er måske derfor skidtet ikke virker,,, jeg prøver igen, hvis ikke det virker vil jeg håbe du er der igen.

hilsen mandersen

:) jeps er det

....sig til hvis du får problemer

Hello super Susanne
DET VIRKER!!!kan du også få evt en titelbar til at blinke?
hvor skrap er du i access??

Hilsen
Mandersen

:) fint

mht til skrap - når ikke terry til sokkeholderne LOL

en titelbar der blinker - mhh ved ikke om man kan, men jeg kan da prøve at undersøge sagen......

jowda kan man sagtens

skift til designvisning på den form hvor du vil have blinkeriet
Højreklik på den sorte firkant øverst i venstre hjørne på formen, og vælg egenskaber.

På fanen "Hændelser" sætter du "Timerinterval" til fx 500, hvis du ønsker 1/2 sekund interval mellem blinkene.

På fanen "Hændelser" klikker du på de 3 prikker ved feltet "Ved timer udløb". Indsæt denne kode:

Private Sub Form_Timer()
'frmTimer er det navn jeg har givet min formular
' betyder at det der blinker i formularen er frmTimer
    If Me.Form.Caption = "frmTimer" Then
        Me.Form.Caption = " "
    Else
        Me.Form.Caption = "frmTimer"
    End If
End Sub

Er du sikker på du ønsker denne feature - er hamrende irriterende at se på..

Hej Susanne.. 10000Tak .. nu skal jeg prøve blinkeriet..jeg opretter lige et lille extra spørgsmål som jeg håber du kan hjælpe med?? så er der point til dig for slideriet med alle mine spørgsmål.
Du har nu meget godt fat i det her.

MKH
Mandersen

hehe hvad med en lille reference til dit nye sp :)

http://exp.dk/spm/330850

hi terry nice question there ;) and thnx

Sorry her den igen.

http://exp.dk/spm/330850

Terry må være Jens Lyn.
han er hurtig :`)

Tak for hjælpen jeg er meget ny i det her
Mandersen

no problem
du skal jo også først lige finde ud af hvordan tingene fungerer her på E :)