| |
|
|
funkheld | Dieses bild& en el Mientras que-Schleife; bild&=create("hpiccopy",screen&,200,200,50,50) se sí siempre otra vez neu producido. Wird como siempre otra vez neuer Speicher verbraucht, oder se el Bild siempre en el gleichen Speicherbereich gelegt, así el el vorgehende no rausgenommen voluntad braucht?
Gracias.
Gruss
{$cleq}
{$compiler d:\XProfan11\}
{$runtime d:\XProfan11\}
declarar screen&,bild&,ende&
ende&=1
Ventana 20,20-500,500
Cls RGB(220,220,220)
screen& = create("hNewPic", 400,400,rgb(255,255,0))
startpaint screen&
usebrush 1,rgb(0,128,255)
ellipse 200,200-250,250
endpaint
Whileloop 10000
drawpic screen&,20,20;0
bild&=create("hpiccopy",screen&,200,200,50,50)
startpaint screen&
drawpic bild&,100,10;0
endpaint
EndWhile
End
|
|
|
| |
|
|
|
Jörg Sellmeyer | Profano-Ayuda a Crear (hPic...)
Vor el Beenden des Programmes muß el Handle con DeleteObject otra vez freigegeben voluntad, como ansonsten el de el Mapa de bits belegte Speicherplatz no otra vez a el Sistema zurückgegeben se.
In Deinem Fall se el Bucle sí sólo una vez durchlaufen, como kann no así viel passieren. Usted puede aber con DeleteObject el Handle siempre otra vez löschen. Si usted tatsächlich viele Handles bneötigst, speicherst Usted ellos al Besten en un Array. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 13.04.2012 ▲ |
|
|
|
|
funkheld | Posesiones ahora una Whileloop con 10000 Lo kommt para Crash.
¿Cómo se puede Yo ahora algo vom Screen en el Variable bild& conjunto sin dauernd dieses DeleteObject bild& a nutzen .
Gibt lo kein Befehl dazu?
Gracias. Gruss |
|
|
| |
|
|
|
| DeleteObject es el übliche Weg. |
|
|
| |
|
|
|
Jörg Sellmeyer | Was hast Usted gegen DeleteObject? |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 13.04.2012 ▲ |
|
|
|
|
funkheld | Jup, danke. Yo habe unten una Zona eingerichtet con : mcls 50,50 Darin Yo una Teil des Screen kopiert : copybmptomem 200,200-50,50>0,0
Como bekomme Yo el BIld ahora a una cierto lugar vom Screen&? Como komme Yo a el Adresse des mcls-Speichers a Daten a manipulieren ?
Gracias.
Gruss
{$cleq}
{$compiler d:\XProfan11\}
{$runtime d:\XProfan11\}
declarar screen&,bild&,ende&
ende&=1
Ventana 20,20-500,500
Cls RGB(220,220,220)
screen& = create("hNewPic", 400,400,rgb(255,255,0))
bild&=create("hnewpic",60,60,rgb(0,0,0))
mcls 50,50
startpaint screen&
usebrush 1,rgb(0,128,255)
ellipse 200,200-250,250
endpaint
Mientras que ende&
drawpic screen&,20,20;0
copybmptomem 200,200-50,50>0,0
.........
EndWhile
waitkey
End
|
|
|
| |
|
|
|
Jörg Sellmeyer | Usted puede auch con StartPaint -1 direkt en el Memorybitmep dibujar oder Usted erzeugst con @Crear("HPIC",N,S) y el Parámetro "& MEMBMP" una Kopie Profanhilfe a Crear (hPic,...)
... el aktuellen con MCLS oder MLOADBMP erzeugten Speicherbitmap.... |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 13.04.2012 ▲ |
|
|
|
|
| Gibt en efecto MCopyBmp X1,Y1 - X2,Y2 > X3,Y3; N1[, N2] qué después de StartPaint en Screen anwenden kann. |
|
|
| |
|
|
|
|
Darin Yo una Teil des Screen kopiert
Und si la Screen (teils, z.B. de Fenstern) verdeckt se? |
|
|
| |
|
|
|
funkheld | MCopyBmp va sólo en MLoadBmp Bildern:
Der Bildschirmausschnitt el beginnend en X1,Y1 una Breite de X2 Pixel y una Höhe de Y2 Pixel ha, se de el con MLoadBmp geladenem Bild a el Position X3,Y3 kopiert.
Trifft en me pero no a, Yo möchte una Kopie sin siempre dieses "Create"...
Gracias.
Gruss |
|
|
| |
|
|
|
| @Funkheld: Was genau hast Usted porque antes?
Puedo me nämlich vorstellen el lo una einfachere/ schnellere Herangehensweise son.
Si usted algo como como "Sprites" realisieren möchtest entonces empfehle Yo el Bild en el Speicher zusammenzusetzen y una vez pro Frame el Zielausgabefenster a kopieren.
Quasi vom Ablauf her:
|
|
|
| |
|
|
|
funkheld |
Was hast Usted gegen DeleteObject?
Wenn Yo algo laufend speichern möchte para Auswerten, por qué muss uno como siempre una neuen Speicherbereich schaffen y otra vez liberación.
Gibt lo nichts el uno sólo el una Reservierten Speicherbereich para una cierto Zweck arbeitet con el Grafik?
Gracias.
If: kanndst du así algo veces otra vez como Nativen Code para XPSE entwickeln ?
Gracias.
Gruss |
|
|
| |
|
|