Sie kennen bestimmt alle die kleinen animierten Videos, die z. B. beim FileCopy, FileDelete, FileSearch etc. angezeigt werden. Diese laufen im Loop und können, was deren Hintergrund angeht, transparent sein. Durch den Einsatz des sog. "Animation"-Objekts können diese bequem auf jeder Form angezeigt werden. Einfach die Microsoft Windows Common Controls-2 6.0 (SP4) als Komponente laden und das Animationsobjekt auf die Form ziehen. Der nachfolgende Sourcecode verrät mehr über den Einsatz der jeweiligen Funktionen des Objekts. Private Sub Form_Load() With Animation1 ' Animation laden .Open App.Path & "\FileCopy.avi" ' Animation laden .Play End With End Sub Private Sub Form_Unload(Cancel As Integer) ' Animation stoppen Animation1.Stop End Sub Die Hintergrundfarbe des Animation-Controls lässt sich individuell anpassen: Animation1.BackColor = vbWhite Hinweis: Dieser Tipp wurde bereits 18.290 mal aufgerufen.
Anzeige
![]() ![]() ![]() (einschl. Beispielprojekt!) Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv! - nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten - Symbol-Galerie mit mehr als 3.200 Icons im modernen Look Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m. |
TOP! Unser Nr. 1 ![]() Neu! sevDataGrid 3.0 Mehrspaltige Listen, mit oder ohne DB-Anbindung. Autom. Sortierung, Editieren von Spalteninhalten oder das interaktive Hinzufügen von Datenzeilen sind ebenso möglich wie das Erstellen eines Web-Reports. Tipp des Monats ![]() Jürgen Sorko Auto-Indent für die (RTF)TextBox Dieser Tipp zeigt, wie sich eine AutoIndent-Funktion für die Standard-TextBox bzw. für das RichTextBox-Control realisieren lässt - so wie man es von der VB-IDE her kennt und gewohnt ist. TOP Entwickler-Paket ![]() TOP-Preis!! Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1605.50 EUR... |
||||||||||||||||
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |