bug ou inintelligence de ma part ?
Publié : dim. 08/mai/2005 1:55
regarder bien :
apres, je fais :
j'ouvre une bank p() :
Cette bank est lineaire ok ?
Bon, dans cette bank, j'affiche des valeurs representant les pixels de format rgb(r,v,b)
Et bien, en 1024*768, ca, ca marche :
Et la verification pixel par pixel fonctionne aussi et affiche la meme chose (evidement) :
Et bien, quand je force l'affichage en 800*600, la verification pixel par pixel marche mais pas la copie ligne par ligne !!!!!
---W---H---Y---??????
Code : Tout sélectionner
If ExamineDesktops()
dw=DesktopWidth(0)
dh=DesktopHeight(0)
dc=32
Else
dw=1024
dh=768
dc=32
EndIf
Code : Tout sélectionner
OpenScreen(dw,dh,dc,"")
Code : Tout sélectionner
Dim p(dw*2*dh*2)Bon, dans cette bank, j'affiche des valeurs representant les pixels de format rgb(r,v,b)
Et bien, en 1024*768, ca, ca marche :
Code : Tout sélectionner
MemVideo = DrawingBuffer()
For u=0 To dh-1
CopyMemory(@p(u*dw*2), MemVideo+u*dw*4, dw*4)
Next
Code : Tout sélectionner
For u=0 To dh-1 : For i=0 To dw-1 : Plot (i,u,p(i+u*dw*2)) : Next : Next---W---H---Y---??????
