Lupeneffekt & Bild aus dem Netz laden

Übersicht BlitzMax, BlitzMax NG Codearchiv & Module

Neue Antwort erstellen

Suco-X

Betreff: Lupeneffekt & Bild aus dem Netz laden

BeitragMo, Feb 06, 2006 18:08
Antworten mit Zitat
Benutzer-Profile anzeigen
Hi
Hier mal wieder ein kleiner Codeschnipsel von mir. Kurz, bringt aber recht interessante Ergebnisse. Das Hintergrundbild wird aus dem Internet geladen (Danke Schmarren, friede deinem Traffic) Wink
Mit der Linken Maustaste aktiviert ihr die Lupe.
Übrigens kann man hier auch sehen, das man Bilder mit LoadImage auch einfach aus Banks oder sonstigen Speicherbereichen laden kann.

Code: [AUSKLAPPEN]

Strict

Local ImageBank:TBank
Local BackgroundImage:TImage
Local LupenPixmap:TPixmap
Local LupenImage:TImage



Print ""
Print "Bild wird runtergeladen, bitte warten.."

ImageBank = LoadBank("http::home.arcor.de/darrensharm/renders/finalhigh.jpg")

If Not ImageBank
   Notify("Bilddatei konnte nicht runtergeladen werden")
   End
EndIf


Print "Bild wurde erfolgreich runtergeladen"





Graphics 1024, 768, 32, 85


BackgroundImage = LoadImage(ImageBank, MIPMAPPEDIMAGE)


Repeat
   Cls
   
   SetScale 1.0, 1.0
   DrawImageRect BackgroundImage,0,0, GraphicsWidth(), GraphicsHeight()
   
   
   If MouseDown(1)
      LupenPixmap = GrabPixmap(MouseX()-64, MouseY()-64,128,128)
      LupenImage = LoadImage(LupenPixmap, MIPMAPPEDIMAGE)
      SetScale 2.0, 2.0
      DrawImage LupenImage, MouseX()-64*2.0, MouseY()-64*2.0
   EndIf
   
   Flip
Until KeyHit(KEY_ESCAPE)
End



Mfg Suco
Intel Core 2 Quad Q8300, 4× 2500 MHz, 4096 MB DDR2-Ram, GeForce 9600GT 512 MB
  • Zuletzt bearbeitet von Suco-X am Fr, Jun 02, 2006 9:02, insgesamt einmal bearbeitet

YellowRider

Ehemaliger Admin

BeitragMo, Feb 06, 2006 18:35
Antworten mit Zitat
Benutzer-Profile anzeigen
Hm, das mit den Banks gefällt mir Smile. Danke für die Information.

mfg
YellowRider

Geeecko

BeitragDi, März 21, 2006 16:19
Antworten mit Zitat
Benutzer-Profile anzeigen
mir auch Smile

BtbN

BeitragMi, März 22, 2006 10:06
Antworten mit Zitat
Benutzer-Profile anzeigen
Könnte man nicht einfach 'LoadImage("http::home.arcor.de/darrensharm/renders/finalhigh.jpg")' machen?
Weil dann könnte man sich den Speicher für die Bank sparen.

Suco-X

Betreff: ........

BeitragFr, März 24, 2006 10:26
Antworten mit Zitat
Benutzer-Profile anzeigen
Hi
Könnte man sicher auch so laden. Man könnte aber auch die Bank wieder freigeben.
Viele Firewalls fragen aber nach, ob sie ins Internet dürfen. Dabei stoppen sie das ganze System. Wenn das Programm jetzt im Fullscreen Modus ist und man nicht an diese Anfrage der Firewall rankommt, ist das sehr sehr nervig.
Mfg Suco
Intel Core 2 Quad Q8300, 4× 2500 MHz, 4096 MB DDR2-Ram, GeForce 9600GT 512 MB

Neue Antwort erstellen


Übersicht BlitzMax, BlitzMax NG Codearchiv & Module

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group