Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Flimmern
Autor: Silver
Datum: 15.03.04 12:15
Hallo, das mit der Laufschrift war nur ein Test. Mein eigentliches Problem liegt zwar ähnlich, jedoch wird keine Schrift sonder eine "Balkendiagramm" gescrollt: Alles was hierfür benötigt wird, ist ein Timer (Timer1) und eine Picturebox (Picture1) Der CODE: Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (pDst As Any, pSrc As Any, ByVal ByteLen As Long) Private y() As Long Private LosGehts As Boolean Private Sub Form_Load() ReDim y(1000) With Picture1 .ScaleMode = vbPixels .AutoRedraw = True .Height = 1695 .Width = 4215 End With For t = 1 To UBound(y) y(t) = Int(Rnd(1) * Picture1.ScaleHeight) Next t Timer1.Interval = 100 End Sub Private Sub Picture1_Click() LosGehts = True End Sub Private Sub Timer1_Timer() If LosGehts = True Then CopyMemory y(2), y(1), UBound(y) * 4 y(1) = Int(Rnd(1) * Picture1.ScaleHeight) End If Picture1.Cls For t = 1 To Picture1.ScaleWidth Picture1.Line (t, Picture1.Height)-(t, y(t)), vbRed Next t End Sub Sobald das Programm gestartet wird läuft der Timer und es wir 10 mal pro Sekunde das "Diagramm" gezeichnet. Die Werte (in Y) ändern sich jetzt noch nicht. Und Flimmern tut auch noch nix. Wird nun das Picture1 angeklickt, wird das Array um eine Stelle nach hinten verschoben und ein neuer Wert generiert. Dh: Das "Diagramm" scrollt. Und flimmert auch plötzlich (nicht ruckelt, sondern flimmert)! Wieso nur???

Flimmern	1.468	Silver	14.03.04 18:00
Re: Flimmern	1.142	E7	14.03.04 19:34
Re: Flimmern	1.167	Silver	14.03.04 23:24
Re: Flimmern	1.090	Zardoz	15.03.04 07:14
Re: Flimmern	1.066	SailSteam	14.03.04 20:44
Re: Flimmern	1.000	Silver	14.03.04 23:19
Re: Flimmern	1.353	Zardoz	14.03.04 22:00
Re: Flimmern	1.124	GuidoE	20.03.04 03:20
Re: Flimmern	1.064	ApfelBaum	20.03.04 10:55
Re: Flimmern	1.021	Zardoz	20.03.04 16:25
Re: Flimmern	1.094	GuidoE	20.03.04 18:46
Re: Flimmern	1.076	Zardoz	23.03.04 17:48
Re: Flimmern	1.039	GuidoE	23.03.04 18:25
Re: Flimmern	1.183	Killerkeule	15.03.04 08:53
Re: Flimmern	994	Silver	15.03.04 11:51
Re: Flimmern	1.342	Silver	15.03.04 12:15
Re: Flimmern	971	Killerkeule	15.03.04 12:53
Re: Flimmern	1.045	TheNukeduke	15.03.04 21:17
Re: Flimmern	987	Silver	15.03.04 21:25
Re: Flimmern	1.028	Noti	16.03.04 05:04
Re: Flimmern	976	ApfelBaum	16.03.04 12:51
Re: Flimmern	973	Silver	16.03.04 22:15
Re: Flimmern	1.040	Silver	16.03.04 22:18

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen