EFFET NEIGE PARASITE D'ECRAN DE TELE (PURE GDI)
f0xi
Messages postés
4205
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
12 mars 2022
-
7 oct. 2006 à 15:12
jonasherrero Messages postés 2 Date d'inscription vendredi 15 janvier 2010 Statut Membre Dernière intervention 23 janvier 2010 - 27 déc. 2010 à 23:52
jonasherrero Messages postés 2 Date d'inscription vendredi 15 janvier 2010 Statut Membre Dernière intervention 23 janvier 2010 - 27 déc. 2010 à 23:52
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/39846-effet-neige-parasite-d-ecran-de-tele-pure-gdi
https://codes-sources.commentcamarche.net/source/39846-effet-neige-parasite-d-ecran-de-tele-pure-gdi
27 déc. 2010 à 23:52
10 oct. 2006 à 18:46
10 oct. 2006 à 18:23
pas bien!
10 oct. 2006 à 16:53
9 oct. 2006 à 22:14
L'effet est super et question code : nickel.
10/10
8 oct. 2006 à 22:52
bravo pour le code foxi..
8 oct. 2006 à 09:36
c'est rigolo...
^^ on se croirait à Noël ;)
7 oct. 2006 à 18:13
Ah ouais sympas ^^
J'allais commencer à exploiter ton idée de départ, mais avant, je me suis dit que j'allais viendre voir si quelqu'un avait une autre idée à soumettre...
Je m'appercois que je n'ai plus grand chose à faire en fait ^^
Un grand merci à toi, c'est sympas. La vitesse me vas, et on peut régler les paramètres de base! C'est parfait, comme d'habitude...
Merci encore ^^
bye
7 oct. 2006 à 17:51
bravo ! L'effet est super !
@+
Matt
7 oct. 2006 à 17:42
l'effet est pas mal
mais pourquoi avoir appelé le Refresh dans le Timer et pas avoir dessiné directement à la place ?
ceci t'éviterais de déclarer un DoubleBuffered et du coup moins de ressources
donc sit retire le DoubleBuffered et tu modifes comme suit :
// le timer
procedure TForm1.Timer1Timer(Sender: TObject);
begin
// un simple appel au refresh de paintbox declanche l'evenement OnPaint de cette derniere
//PaintBox1.Refresh;
// on redimensionne le buffer a la taille de la paintbox, au cas ou
Buffer.Width := PaintBox1.Width;
Buffer.Height := PaintBox1.Height;
// on applique l'effet sur le buffer
FX_Snow(TrackBar1.Position shl 2, $121212, CheckBox1.Checked, Buffer);
// on dessine le buffer dans le canvas de paintbox
PaintBox1.Canvas.Draw(0,0,Buffer);
end;
ça tourne encore mieux
@+
Cirec
7 oct. 2006 à 17:09
Sinon, c'est très bien fait, et en peu de temps! Très utile pour ceux qui ont besoin d'une télé en panne. ;)
Une remarque: Sur une vraie télé, c'est un vrai random, pas un pseudo...
Mais, bon... ça ne se voit pas trop.
7 oct. 2006 à 16:50
jamais na!
7 oct. 2006 à 16:33
7 oct. 2006 à 15:12