| |
| |
|
 | Tauscht (blitzschnell) une bestimmte la couleur REPLCOL& im ganzen Bild dans qui la couleur NEWCOL&, concept aus: [...] 
Originalcode: [...]
KompilierenMarqueSéparation
proc HPIC.REPLACECOL
PARAMETERS HPIC&,REPLCOL&,NEWCOL&,XX&,YY&
var HPICTMP&=CREATE("hNewPic",XX&,YY&,NEWCOL&)
STARTPAINT HPICTMP&
DRAWPIC HPIC&,0,0;-1,REPLCOL&
ENDPAINT HPICTMP&
STARTPAINT HPIC&
DRAWPIC HPICTMP&,0,0;0
ENDPAINT
DELETEOBJECT HPICTMP&
RETURN HPIC&
| 17.07.2008 ▲ | |
|
| |
|
|
Jac
de
Lad | L'idée comme mir très bien.  |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 17.07.2008 ▲ |
|
| |
|
|
| de rien, wäre seulement plus beau si on statt "nur" qui Taille (xx,yy) une Art "Clippingregion" définir pourrait - zumindest per Rechteck.  la fois regarder comment cela am reibungslosesten aller pourrait... (um z.B. seulement région 10,10 - 20,20 derart trop "bearbeiten") |
|
| |
| |
| |
|
|
| cet Version ici [...] ist besser:
optionnel seulement 3 paramètre ou bien 7 paramètre avec Zielbereichangabe.
KompilierenMarqueSéparation
proc HPIC.REPLACECOL
PARAMETERS HPIC&,REPLCOL&,NEWCOL&,X&,Y&,XX&,YY&
var H&=0
IF %PCOUNT<4
H&=CREATE("hPicCopy",HPIC&)
X&=0
Y&=0
XX&=%BMPX
YY&=%BMPY
DELETEOBJECT H&
ENDIF
H&=CREATE("hNewPic",XX&,YY&,NEWCOL&)
STARTPAINT H&
DRAWPIC HPIC&,0-X&,0-Y&;-1,REPLCOL&
ENDPAINT H&
STARTPAINT HPIC&
DRAWPIC H&,X&,Y&;0
ENDPAINT
DELETEOBJECT H&
RETURN HPIC&
endproc
|
|
| |
| |
| |
|
|
Jac
de
Lad | |
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 17.07.2008 ▲ |
|
| |
|
|
| | Sieht ensuite komplett comment aus? |
|
| |
| |
| |
|
|
Jac
de
Lad |
KompilierenMarqueSéparation
proc HPIC.REPLACECOL
PARAMETERS HPIC&,REPLCOL&,NEWCOL&,X&,Y&,XX&,YY&
var H&=0
IF %PCOUNT<4
H&=CREATE("hPicCopy",HPIC&)
X&=0
Y&=0
XX&=%BMPX
YY&=%BMPY
DELETEOBJECT H&
ENDIF
H&=CREATE("hNewPic",XX&,YY&,NEWCOL&)
STARTPAINT H&
DRAWPIC HPIC&,0-X&,0-Y&;-1,REPLCOL&
ENDPAINT
DELETEOBJECT HPIC&
RETURN H&
endproc
|
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 17.07.2008 ▲ |
|
| |
|
|
| Ne, cet Solution funktioniert pas... gib la fois Koordinaten un...
mon Testcode: [...]
Ergibt pour Deinem Code:
statt
 |
|
| |
| |
| |
|
|
Jac
de
Lad | peux grad nich testen. cela Einzige, quoi je anders fais mais est, dass je cela Handle des temporären Bildes zurückgebe, anstatt den Kram wieder 1:1 zurückzukopieren. Versteh je maintenant pas.  |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 17.07.2008 ▲ |
|
| |
|
|
| | Gug encore la fois à la hâte seulement quoi übersehen car entier so simple ist qui Vorgang malheureusement pas. |
|
| |
| |
| |
|
|
Jac
de
Lad | Määääääp, tu as oui so droite.
et es fehlt sans équivoque encore un profansches "GetWidth" et "GetHeight"... |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 17.07.2008 ▲ |
|
| |
|
(1.109)
Deutsch
English
Français
Español
Italia
