| |
|
|
| Hi como bin Yo otra vez. 2 Fragen tener Yo mitgebracht 1.) In mi Programa Yo folgende Zeilen: (Normales Windowsfenster) KompilierenMarcaSeparaciónf1&=CreateExtBmp(%HDC,%maxx,%maxy)
f2&=CreateExtBmp(%HDC,%maxx,%maxy)
string bereich#,0="SPRITE.BMP"
spriteplan&=LoadExtImage(bereich#)
sprites&=InitSprite(spriteplan&,%HDC,f1&,f2&,0,0,40,40,spriteindex%,1,10,40,40,1,1)/pre> en InitSprite verabschiedet se el Programa sin Worte. ¿Por qué? Was es nun los? 2.) Was son el para Effekte (Sprite se doppelt y schwarz adecuado, obwohl Transparenz weis) KompilierenMarcaSeparacióndeclare prospeed&,f1&,f2&,bereich#,spriteplan&,sprites&
dim bereich#,100000
$I C:PROFANAKTUELLE PROJEKTELOSINCProspeed_Funktionen.inc
prospeed&=usedll("C:PROFANAKTUELLE PROJEKTELOSProspeed.dll")
window 10,10- 300,300
windowtitle "Test"
f1&=CreateExtBmp(%HDC,300,300)
f2&=CreateExtBmp(%HDC,300,300)
string bereich#,0="C:SPRITE.BMP"
spriteplan&=LoadExtImage(bereich#)
sprites&=InitSprite(spriteplan&,%HDC,f1&,f2&,0,0,40,40,4,1,10,10,10,1,1)
while 1
waitinput
wend
dispose bereich#
freedll prospeed&
FreeExtBmp(f1&)
FreeExtBmp(f2&)
FreeExtBmp(spriteplan&)
FreeExtBmp(sprites& class=s2>)
Gracias en el Vorraus Rolf |
|
|
| |
|
|
|
| Ohh naja a Cuestión 2 Yo el Solución, habe el CopyExtBmp(f1&,0,0,%maxx,%maxy,%HDC,0,0,0) CopyExtBmp(f2&,0,0,%maxx,%maxy,%HDC,0,0,0) vergessen. Jedoch Cuestión 1? Initsprite lässt el Programa aussteigen. Also no que aquí gepostete Testprogramm. hmm? Rolf |
|
|
| |
|
|
|
| Hier veces una Ejemplo para Testen: KompilierenMarcaSeparación $P+
SetErrorLevel 0
Declare bereich#
Declare sprites&
Declare f1&,f2&,pfad$
Declare prospeed&,prospeed$,spriteplan&
DIM bereich#,10000
PFADROUTINEN *******************************
pfad$=getdir$("@")
chdir pfad$
Prospeed$=pfad$;"Prospeed.dll"
$I C:PROFANAKTUELLE PROJEKTESpeedanimProspeed_Funktionen.inc
*M Init- und Exit-Prozeduren:
SetTrueColor 1
WindowStyle $003F
WindowTitle "Test"
Window 147,40 - 450,479
f1&=CreateExtBmp(%HDC,300,40)
f2&=CreateExtBmp(%HDC,300,40)
string bereich#,0="C:SPRITE.BMP"
spriteplan&=LoadExtImage(bereich#)
sprites&=InitSprite(spriteplan&,%HDC,f1&,f2&,0,0,40,40,4,1,15,100,10,1,1)
CopyExtBmp(f1&,0,0,%maxx,%maxy,%HDC,0,0,0)
CopyExtBmp(f2&,0,0,%maxx,%maxy,%HDC,0,0,0)
WhileNot appexit%
WaitInput
Wend
freedll prospeed&
freedll hdll%
Disponer Zona#
Wenn uno Initsprite auskommentiert klappt lo - sonst Programmende ???? WARUM ??? Rolf |
|
|
| |
|
|
|
| Nagut entonces antworte Yo veces incluso: Mensch bin Yo blöd ! Hab el allerwichtigste verschluckt: Usedll Sorry el tut sí ya weh Bis entonces Rolf |
|
|
| |
|
|
|
| ¡Hola Rolf,
Falls du dich wunderst el Franco no antwortet, es dieses Wochenende no zuhause (Campen en el Wetter ).
Das Wunder con el vergessenen @usedll... Tuve auch schonmal, muy lustig el el meisten Befehle trabajo (zwar langsam) obwohl el Dll todavía no veces en el Speicher es !
Noch una kleiner Tip si du Profano 7 y aufwärts hast...
cadena bereich#,0=SPRITE.BMP spriteplan&=LoadExtImage(bereich#)
...kannst du por...
bild$=SPRITE.BMP spriteplan&=LoadExtImage(@addr(bild$))
...sustituir, ha el Vorteil el du no Zona dimensionieren musst.
Moritz |
|
|
| |
|
|
|
| Ahh Gracias Moritz Naja ha Franco auchmal verdient - obwohl aquí en Koblenz el Wetter mehr schlecht es. Sí, el con > 7.0 me está bekannt, aber solche Sachen mach Yo al Schluss. Franco es bekannt, el Yo una Tool escribir para el Pspeed - y zwar el Speedanimator. Läuft soweit bastante bien. Schönes Restwochenende todavía Rolf |
|
|
| |
|
|
|
| Hört se muy interessant a Rolf ! Was macht el Speedanimator el genau, oder se el todavía no verraten ?
Wo wir schonmal beim Thema son, Pathfinder 1.5 es auch casi fertig, después de que mich fast 2 Wochen tener en el Wahnsinn treiben dejar wegen una extremo schwierigen Fehler !
Hier veces ne poco Información general el neuen Features:
-Höhere Geschwindigkeit y div. Fehler Fijo -Neues Bildersystem para nachträglichen Cambio el Ebene y Position el Bilder -Bilderpfade voluntad en el Projekt mitspeichert -Pfad Punkte puede umbenannt voluntad (se auch mitgespeichert) -RGB-Verknüpfungssystem -riesiges Optionsmenü -Pfad-Arranger (mehrere Pfade en uno Expediente zusammenfügen) -unendliche Undo/Redo Función -Icon-Leiste -Breseham y Mapa de bits Export -Laden de Jpg,Gif y Wmf (Dank Franco) -Erstellen de Null-Proyectos (redactar de Positionsunabhängigen Pfaden) -div. otro kleine Los cambios y Neuerungen...
Kommt bald, schätze 1-2 Wochen todavía
Moritz |
|
|
| |
|
|
|
| Tja Moritz, el Speedanimator es simplemente una Programa, indem uno: - Einzelne Frames malen kann - esta en una Sprite hinzufügen kann - dazu una Prevista abspielen kann - bearbeiten el individual Frames u.s.w ...... Im Moment bin Yo al verzweifeln, como Yo el redactar en Setpixelebene mache y alles qué en el großen Malbild erstellt se en Pixel en el 40x40 Formato por Setpixel kopiert se. Soweit sogut. Laden kann Yo aber desafortunadamente en esta Art no, como Yo el con el Setpixel aufgrund el Fehlerhaften Sizedfunktion gemacht habe. Copysized verzehrt el Bild desafortunadamente. Franco hatte algo de uno otro Función en el Win32 erzählt, finde esta aber por desgracia, no. - Achso, bin en Su neue Versión höchst gespannt !!! Tal vez wäre auch una Scrollbereich des geladenen Bildes en Deinem Programa drin, como Yo veces una Bild größer como el Arbeitsfeld hatte y no todos Pfade unterbekommen habe Nur como Vorschlag. Rolf |
|
|
| |
|
|
|
| Wird wohl muy praktisch voluntad dein Programa !
Hab auch ya pocos. ähnliche Programas en Animated-Icons para desarrollar, se dein Tool así ähnlich oder todavía unos pocos spezielle Características bieten ? (determinado )
Zu dein Problema fällt me auch sólo StretchBlt() una, aber el macht sí ya CopySizedBmp.
So bastante tener Yo el auch no verstanden, du setzt en uno Speicherbitmap el 40x40 Pixel y kopierst ellos entonces por MCopySizedBmp (oder CopySizedBmp()) en dein Arbeitsfenster en %hdc en el entsprechenden Größe, oder ?
Ist el Größe des a entwerfenden Sprites en 40x40 Pixel festgesetzt ?
Tal vez wäre auch una Scrollbereich des geladenen Bildes en Deinem Programa drin, como Yo veces una Bild größer como el Arbeitsfeld hatte y no todos Pfade unterbekommen habe.
War el Bild größer como 2000x2000 Pixel ? Ansonsten puede ser ahora con el neuen Bild Sistema el Bilder komplett verwalten:
-Hinzufügen, entfernen... -Cambio el Position -Cambio el Ebene
Und el natürlich así oft y wann uno voluntad auch después de speichern y otra vez abierto, tal vez no bastante así praktisch como una Scrollfunktion aber en el Endeffekt el gleiche
Moritz |
|
|
| |
|
|
|
| Sí correcto: Das große Arbeitsfenster se wärend des Zeichnens en 40x40 verkleinert. Aber en me Aprovecho bewusst: Setpixel Hab vorher Copysizedbmp o Función de Franco (es sí eigentlich ident.) genutzt. Dort el problema es: Im großen Arbeitsfenster es cada Bildpunkt igual. Das en el pequeño (es en me OnTheFly) se si yo Copysized nehme verzerrt. Aber irgendwie voluntad Yo bald Expediente invitar y muss entonces de el pequeño Bild una Kopie el große Arbeitsfenster bringen - y el se auch verzerrt - kennste determinado. Naja - veces schauen. RocknRolf |
|
|
| |
|
|
|
| Sí correcto: Das große Arbeitsfenster se wärend des Zeichnens en 40x40 verkleinert. Aber en me Aprovecho bewusst: Setpixel Hab vorher Copysizedbmp o Función de Franco (es sí eigentlich ident.) genutzt. Dort el problema es: Im großen Arbeitsfenster es cada Bildpunkt igual. Das en el pequeño (es en me OnTheFly) se si yo Copysized nehme verzerrt. Aber irgendwie voluntad Yo bald Expediente invitar y muss entonces de el pequeño Bild una Kopie el große Arbeitsfenster bringen - y el se auch verzerrt - kennste determinado. Naja - veces schauen. RocknRolf |
|
|
| |
|
|
|
| ¡Hola zurück !!!
Das Wetter war nada así übel, salvo 2 kleine Regenschauer. Sind fast el todo Tiempo Motorboot gefahren )
Su Problema ha se sí hecho, Rolf, Gott sei Dank...
Saludo, una müder Franco. |
|
|
| |
|
|