bmp tga jpg to Data

Programmation d'applications complexes
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

................
Dernière modification par Backup le sam. 01/oct./2011 13:46, modifié 1 fois.
lionel_om
Messages : 1500
Inscription : jeu. 25/mars/2004 11:23
Localisation : Sophia Antipolis (Nice)
Contact :

Message par lionel_om »

Pourquoi tu passes par un tableau pour stocker les valeurs de tes pixels, pour les écrire juste après avec une double boucle FOR ?

Lio :?:
Webmestre de Basic-univers
Participez à son extension: ajouter vos programmes et partagez vos codes !
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

lionel_om a écrit :Pourquoi tu passes par un tableau pour stocker les valeurs de tes pixels, pour les écrire juste après avec une double boucle FOR ?

Lio :?:
parce que mon code n'est absolument pas optimisé :lol:

(je vais paufiner la chose :) merci )

ps : et puis la mise en tableau permet l'inversion, ou tout un tas de bidouille sur les pixels ..... :)
lionel_om
Messages : 1500
Inscription : jeu. 25/mars/2004 11:23
Localisation : Sophia Antipolis (Nice)
Contact :

Message par lionel_om »

Dobro a écrit :
lionel_om a écrit :Pourquoi tu passes par un tableau pour stocker les valeurs de tes pixels, pour les écrire juste après avec une double boucle FOR ?

Lio :?:
parce que mon code n'est absolument pas optimisé :lol:

(je vais paufiner la chose :) merci )

ps : et puis la mise en tableau permet l'inversion, ou tout un tas de bidouille sur les pixels ..... :)
C'est sûr, mais dans ce cas ça peut toujours se faire dans le même double boucle For :

Code : Tout sélectionner

If StartDrawing(ImageOutput(#image))
  ; ***********mise en tableau ************
  For i = 0 To hauteur -1
    For j = 0 To largeur -1
      Read a.l
      tableau(j, i)=a.l
      Plot(j,i,tableau(j,i))
    Next j
  Next i
  StopDrawing()
EndIf 
Lio :wink:
Webmestre de Basic-univers
Participez à son extension: ajouter vos programmes et partagez vos codes !
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

lionel_om a écrit :C'est sûr, mais dans ce cas ça peut toujours se faire dans le même double boucle For :

Code : Tout sélectionner

If StartDrawing(ImageOutput(#image))
  ; ***********mise en tableau ************
  For i = 0 To hauteur -1
    For j = 0 To largeur -1
      Read a.l
      tableau(j, i)=a.l
      Plot(j,i,tableau(j,i))
    Next j
  Next i
  StopDrawing()
EndIf 
Lio :wink:
heu ! Franchement t'avais vraiment cru que j'avais pas compris ? 8O :lol: :lol: Merci quand meme :D
lionel_om
Messages : 1500
Inscription : jeu. 25/mars/2004 11:23
Localisation : Sophia Antipolis (Nice)
Contact :

Message par lionel_om »

Dobro a écrit :heu ! Franchement t'avais vraiment cru que j'avais pas compris ? 8O :lol: :lol: Merci quand meme :D
Non c'est pour si y'avait un petit nouveau qui passait dans le coin... 8)
Webmestre de Basic-univers
Participez à son extension: ajouter vos programmes et partagez vos codes !
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

:D
Répondre