| |
|
|
Nico Madysa | So, si je mich pas schwer irre, habe je enfin la fois une faute trouvé. qui Befehl CopyPic (et avec cela probablement aussi CopySizedPic) pouvoir cela verwendete Bild pour dem ersten Aufrufe inutilisable. KompilierenMarqueSéparationcls $FF
Bild wird erstellt - einfach eine schräge Linie
var p& = Create(hNewPic,32,32,$FFFFFF)
StartPaint p&
UsePen 0,5,0
Line 0,0 - 32,32
EndPaint
Mit CopyPic wird die erste Zeile gemalt; dreimal dasselbe Bild nebeneinander
CopyPic p& , 0,0 - 32,32 > 0,0 ; -1
CopyPic p& , 0,0 - 32,32 > 32,0 ; -1
CopyPic p& , 0,0 - 32,32 > 64,0 ; -1
Mit DrawPic hingegen die zweite; auch dasselbe Bild dreimal nebeneinander
DrawPic p& , 0,32 ; -1
DrawPic p& , 32,32 ; -1
DrawPic p& , 64,32 ; -1
Nachdem ein Bild mit CopyPic gemalt wurde, ist es nicht mehr verwendbar!
Kommentiert man CopyPic hingegen aus, so malt DrawPic wie verlangt das Bild dreimal.
waitinput
DeleteObject p&
end
|
|
|
| |
|
|
|
RGH | Salut, cela Problem wird dans qui nächstem XProfan-Version gelöst son.
Salut Roland |
|
|
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 10.02.2009 ▲ |
|
|
|