-
Dennis
-
-
Offline
-
Administrator
-
-
Beiträge: 203
-
Dank erhalten: 262
-
-
-
|
Hi Leute,
das Flackern und die "Dauer" liegen begründet im Hintergrundbild - das trage ich Stefan nochmal vor. Ansonsten ist hier eine Version, die mittels "Kein Refresh" optimiert wurde. Pfeilschnell...
Von Kinderschuhen können wir da glaube ich fast icht mehr sprechen Liebe Grüße
Und bitte: Denkt daran, beim Thema zu bleiben - für alles weitere hierzu macht bitte mal ein neues Thema auf, wenn es noch Bedarf gibt! Danke.
cX4Web Code
Was ist das? 1
2 *** Ordner wählen
3 Standard-Dialog 'Ordner' in [Ordnerwahl], Titel='Bildordner wählen...', Vorgabe='*.jpg|*.png|*.bmp', kein Stopp
4 Setze in [cX.Stapel(Bilderstapel).Anhängen]: '[cX.Datei([Ordnerwahl]).Liste(*.jpg|*.png|*.bmp)]'
5
6 Anzeige-Fenster 'Bildbetrachter', ID='Programm', Breite=208,23, Höhe=146,58, Rahmen: einfach 3D
7 Bild-Element, scrollbar, anordnen 1 (ID='BildContainer', X='3,18', Y='3,18', Breite='126,47', Höhe='124,35', Zielfenster='Programm', Farbe '-1')
8 Baum '[cX.Stapel(Bilderstapel).Liste]', Stil: 'Baumlinien, Plus, Bild, Text' (ID='Baum_1', X='131,23', Y='3,18', Breite='71,97', Höhe='124,35', Zielfenster='Programm', fett)
9
10 *** Nach jedem Schleifendurchlauf wird alles neu gezeichnet. Bei einem Ordner mit ¶vielen Bilddateien kann das dauern und Dateinamen wie ¶zum Beispiel wienerwaldsee2(2),jpg erzeugen einen Fehler...¶Die Taste F7 zeigt auch bei einem grossen Kommentar dann alles komfortabel an.
11 *** unterbinden der Anzeige-Aktualisierung beschleunigt solche grafischen Dinge enorm
12 Setze in [cX.Anzeige(Programm).KeinRefresh]: '1'
13
14 Schleife ab hier mit Variable [Zähler] von 1 bis [cX.Stapel(Bilderstapel).Anzahl] Schrittweite 1
15 Setze , MultiSet 'bilddat=[Ordnerwahl][cX.Stapel(Bilderstapel).Wert([Zähler])]¶cX.Anzeige(Programm).Titel=[Zähler]'
16 Bild-Element Bild '[bilddat]' (ID='Bild_[Zähler]', Breite='20', Höhe='20', Zielfenster='Programm.BildContainer', deaktiviert 0)
17 Schleife bis hier
18 Setze in [cX.Anzeige(Programm).KeinRefresh]: '0'
19
20 Warte Endlos (Warten auf zu behandelnde Ereignisse)
...
cX4Web Code: Einfach anklicken zum Kopieren und in click.EXE 5.0 einfügen
(25 Zeilen, cX 5.0.8.5, Lizenz: Cmd_Table, ElementPlus, Premium)
Folgende Benutzer bedankten sich: Soko, daywalker, Hideki, technicplace
|