Allgemeine Fragen zur PROFAN Programmierung

Views (Heute): 249231 (10667)

| Suchen
| Zurück zur Übersicht

Autor | Thema: Animierte Dialoge von Windows
Lemmi Noname
| Datum:20.01.02 17:07 (lemmi.noname@t-online.de) |
Hi Leute, ich hab ein Problem : Überall in Windows treten animierte Dialoge auf (Download - Internet Explorer; Kopieren - Explorer; Winzip - Koprimieren). Ich habe vor in meinem Programm auch so einen animierten Dialog zu verwenden, habe jedoch keine Ahnung wie ??? Könnt ihr mir helfen ? Hochachtungsvoll Lemmi Noname
Frank Abbing
| Datum:20.01.02 20:14 (frankabbing@12move.de) |
Hallo, probiers' mal mit der ProSpeed.dll auf http://www.12move.de/home/frankabbing/ Mit den Sprite-Funktionen ist es ein leichtes, sollte Animationen zu erstellen, sogar ohne Größen-Beschränkungen. Und gewöhn' dir doch bitte an, deinen richtigen Namen zu benutzen, oder heißt du wirklich Lemmi Noname ? Irgendwie erinnert mich das an Lemmi und die Schmöker, wenn das noch jemand kennt..... Gruß, Frank
Sven Schmidts
| Datum:21.01.02 08:48 (schmidts@flat2serv.de) |
Wenn ich es recht in Erinnerung habe, dann kann VisualWindow bzw. PRFellow diese Animations erzeugen. Irgendwo in der entsprechenden Komponentenpalette befindet sich eine Komponente "Animation", die auf die Windows-eigenen zurückgreift. Die Animationen werden von Windows selbst zur Verfügung gestellt. Mfg. Sven Schmidts
Lemmi Noname
| Datum:21.01.02 15:09 (lemmi.noname@t-online.de) |
Danke für die schnelle Hilfe ! Leider verfüge ich nicht über PRFellow (wo bekomme ich das her ?) MfG Lemmi Noname
Sven Schmidts
| Datum:21.01.02 15:20 (schmidts@flat2serv.de) |
Hallo, keine Ahnung, aber VisualWindows: - Info: http://www.msgroup.de/profan/vwp2.htm#info - Download: http://www.msgroup.de/profan/vwp2.zip Mfg. Sven Schmidts
Stefan Schnell
| Datum:21.01.02 23:58 (mail@stschnell.de) |
Hallo Lemmi, Dein Problem lässt sich einfach lösen, habe mal mit Frank seiner ProSpeedDLL folgende Routine entwickelt: '*CompilerDirektiven*********************************************************** $P+ '*IncludeDateien*************************************************************** $I ProSpeed_UseDLL.Inc $I ProSpeed_Funktionen.Inc '*VariablenDeklarationen******************************************************* Declare hPicture&, hBack1&, hBack2&, hFileCopy% Declare Name$ Declare hDialog%, hDialogDC& '*Funktionsdefinitionen******************************************************** Def GetDC(1) !"USER32", "GetDC" '*Hauptprogramm**************************************************************** Let hDialog% = @Create("Dialog", %HWnd, "FileCopy", 10, 10, 280, 80) Let hDialogDC& = GetDC(hDialog%) Let Name$ = "FILECOPY.PSF" Let hPicture& = LoadExtBMP(Addr(Name$), hDialogDC&) Let Name$ = "FILECOPYBACK.PSF" Let hBack1& = LoadExtBMP(Addr(Name$), hDialogDC&) Let hBack2& = LoadExtBMP(Addr(Name$), hDialogDC&) Let hFileCopy% = InitSprite(hPicture&, hDialogDC&, hBack1&, hBack2&, 0, 0, 260, 40, \ 17, 1, 8, 5, 5, 0, 0) Sleep 10000 DeleteAllSprites() FreeExtBMP(hBack2&) FreeExtBMP(hBack1&) FreeExtBMP(hPicture&) @DestroyWindow(hDialog%) $I ProSpeed_FreeDLL.Inc '*Ende************************************************************************* End In der Datei FileCopy.PSF befindet sich die StandardAnimation für DateiKopieren (das fliegende Papier zwischen den Ordnern). Dies ist eine AVI-Animation, die ich einfach so umgewandelt habe, das sie mit ProSpeedDLL läuft. Wenn Du interesse an den StandardAnimatedControls von Windows hast, so schicke mir ein eMail. Hoffe Dir geholfen zu haben. Tschüss Stefan Schnell
Uwe ''Pascal'' Niemeier
| Datum:22.01.02 09:47 (Pascalxd@owl-online.de) |
Hallo Leute! Hier noch eine Lösung für Puristen (ohne Zusatz-dll oder spezielle IDE):
    window 50,50-200,200
    def GetModuleHandle(1) !"KERNEL32","GetModuleHandleA"
    declare dll&,Ani&,dll$
    dll$="shell32"
    dll&=GetModuleHandle(addr(dll$))
    Ani&=control("SysAnimate32","",$50080006,10,10,100,100,%hwnd,1,dll&)
    sendmessage(Ani&,1124,0,150)'--ACM_OPEN (letzter Parameter: ID der AVI in der dll)
    waitkey
Einzelheiten stehen in der Win32.hlp unter "AnimationControls" P.S. Um zu gucken, welche AVI's es gibt und wie die ID's lauten, wirft man am Besten mal einen Blick mit Reshacker in die Shell32. HTH Pascal
Sven Schmidts
| Datum: 22.01.02 10:48 (schmidts@flat2serv.de) |
:)

| Zurück zur Übersicht