Bild strecken

Übersicht

BlitzBasic

Beginners-Corner

	petecoolbelab Betreff: Bild strecken	So, Apr 27, 2008 17:06 Antworten mit Zitat
Hi, Habe ein Problem: ich will ein bild strecken, hab auch schon gesucht und resize image gefunden bei mir bleibt der Bildschirm aber immer schwarz. woran liegt das? Code: [AUSKLAPPEN] [EINKLAPPEN] Graphics 1024, 768, 16, 2 msnimage = LoadImage("msn1.jpg") ResizeImage msnimage, 1024, 768 DrawImage msnimage, 0, 0 If KeyHit(1) Then End EndIf

petecoolbelab

Betreff: Bild strecken

So, Apr 27, 2008 17:06
Antworten mit Zitat

Hi,
Habe ein Problem:
ich will ein bild strecken, hab auch schon gesucht und resize image gefunden bei mir bleibt der Bildschirm aber immer schwarz. woran liegt das?

Code: [AUSKLAPPEN]

Graphics 1024, 768, 16, 2

msnimage = LoadImage("msn1.jpg")
ResizeImage msnimage, 1024, 768
DrawImage msnimage, 0, 0

If KeyHit(1) Then
End
EndIf

	Eingeproggt	So, Apr 27, 2008 17:12 Antworten mit Zitat
Ne Vollständige Hauptschleife mit Flip wär nicht schlecht. mfG, Christoph.

Eingeproggt

So, Apr 27, 2008 17:12
Antworten mit Zitat

Ne Vollständige Hauptschleife mit Flip

wär nicht schlecht.

mfG, Christoph.

	Der Eisvogel	So, Apr 27, 2008 17:15 Antworten mit Zitat
Also du musst statt: Code: [AUSKLAPPEN] [EINKLAPPEN] If Keyhit(1) then End Endif Code: [AUSKLAPPEN] [EINKLAPPEN] WaitKey End schreiben. Den das Resizen dauert seine Zeit. Wenn es dann fertig ist, dann wird es gezeichtnet und dann wird abgefragt ob Ecs gedrückt wurde. Dann ist das Prog. zuende. Da bleibt keine Zeit um das Bild anzugucken. Mit dem "WaitKey" wartet das Prog. bis eine Taste gedrückt wurde. In dieser Zeit siehst du das Bild. Wart einfach ein bisschen, nach ner Weile kommt es. MfG Der Eisvogel
Ungarische Notation kann nützlich sein. BlitzMax ; Blitz3D Win 7 Pro 64 Bit ; Intel Core i7-860 ; 8 GB Ram ; ATI HD 5750 1 GB Projekte: Window-Crasher Ich liebe es mit der WinAPI zu spielen.

Der Eisvogel

So, Apr 27, 2008 17:15
Antworten mit Zitat

Also
du musst statt:
Code: [AUSKLAPPEN]

If Keyhit(1) then
End
Endif

Code: [AUSKLAPPEN]

WaitKey
End

schreiben.
Den das Resizen dauert seine Zeit. Wenn es dann fertig ist, dann wird es gezeichtnet und dann wird abgefragt ob Ecs gedrückt wurde. Dann ist das Prog. zuende. Da bleibt keine Zeit um das Bild anzugucken. Mit dem "WaitKey" wartet das Prog. bis eine Taste gedrückt wurde. In dieser Zeit siehst du das Bild. Wart einfach ein bisschen, nach ner Weile kommt es.

MfG
Der Eisvogel

Ungarische Notation kann nützlich sein.
BlitzMax ; Blitz3D
Win 7 Pro 64 Bit ; Intel Core i7-860 ; 8 GB Ram ; ATI HD 5750 1 GB
Projekte: Window-Crasher
Ich liebe es mit der WinAPI zu spielen.

	petecoolbelab	So, Apr 27, 2008 17:28 Antworten mit Zitat
Hab das jetzt ein bisschen geändert. Sieht jetzt so aus. Warum endet das Programm immer? Code: [AUSKLAPPEN] [EINKLAPPEN] Graphics 1024, 768, 16, 2 msnimage = LoadImage("msn1.jpg") email = Input Text 200, 310, "" SetBuffer BackBuffer() Cls ResizeImage msnimage, 1024, 768 DrawImage msnimage, 0, 0 Flip If KeyHit(1) Then End EndIf

petecoolbelab

So, Apr 27, 2008 17:28
Antworten mit Zitat

Hab das jetzt ein bisschen geändert. Sieht jetzt so aus. Warum endet das Programm immer?

Code: [AUSKLAPPEN]

Graphics 1024, 768, 16, 2

msnimage = LoadImage("msn1.jpg")

email = Input Text 200, 310, ""

SetBuffer BackBuffer()
Cls
ResizeImage msnimage, 1024, 768
DrawImage msnimage, 0, 0
Flip

If KeyHit(1) Then
End
EndIf

	Der Eisvogel	So, Apr 27, 2008 17:32 Antworten mit Zitat
Weil nur Abgefragt wird ob Esc gedrückt wurde. Dann ist der Kompiler am Ende, und macht gewöhnlich Schluss. Erstetzt das: Code: [AUSKLAPPEN] [EINKLAPPEN] If KeyHit(1) Then End EndIf durch das: Code: [AUSKLAPPEN] [EINKLAPPEN] Waitkey End oder durch das: Code: [AUSKLAPPEN] [EINKLAPPEN] Repeat:Until KeyDown(1) End MfG Der Eisvogel
Ungarische Notation kann nützlich sein. BlitzMax ; Blitz3D Win 7 Pro 64 Bit ; Intel Core i7-860 ; 8 GB Ram ; ATI HD 5750 1 GB Projekte: Window-Crasher Ich liebe es mit der WinAPI zu spielen.

Der Eisvogel

So, Apr 27, 2008 17:32
Antworten mit Zitat

Weil nur Abgefragt wird ob Esc gedrückt wurde. Dann ist der Kompiler am Ende, und macht gewöhnlich Schluss.
Erstetzt das:
Code: [AUSKLAPPEN]

If KeyHit(1) Then
End
EndIf

durch das:
Code: [AUSKLAPPEN]

Waitkey
End

oder durch das:
Code: [AUSKLAPPEN]

Repeat:Until KeyDown(1)
End

MfG
Der Eisvogel

Ungarische Notation kann nützlich sein.
BlitzMax ; Blitz3D
Win 7 Pro 64 Bit ; Intel Core i7-860 ; 8 GB Ram ; ATI HD 5750 1 GB
Projekte: Window-Crasher
Ich liebe es mit der WinAPI zu spielen.

	Eingeproggt	So, Apr 27, 2008 17:32 Antworten mit Zitat
Du liest nicht alle Beiträge, oder? Du brauchst ne Schleife, die dein Programm "beschäftigt"... Wenn es alle Befehle abgearbeitet hat, beendet sich das programm nunmal. Also Code: [AUSKLAPPEN] [EINKLAPPEN] Repeat Delay 10 Until KeyHit(1) End

Eingeproggt

So, Apr 27, 2008 17:32
Antworten mit Zitat

Du liest nicht alle Beiträge, oder?

Du brauchst ne Schleife, die dein Programm "beschäftigt"... Wenn es alle Befehle abgearbeitet hat, beendet sich das programm nunmal.

Also

Code: [AUSKLAPPEN]

Repeat
Delay 10
Until KeyHit(1)
End

	petecoolbelab	So, Apr 27, 2008 20:12 Antworten mit Zitat
Achso, das hast du gemeint. Danke!

petecoolbelab

So, Apr 27, 2008 20:12
Antworten mit Zitat

Achso, das hast du gemeint. Danke!

	petecoolbelab	So, Apr 27, 2008 20:40 Antworten mit Zitat
Hat irgendwer schnell ne Funktion oder so bereit, die X und Y zurückgeben?

petecoolbelab

So, Apr 27, 2008 20:40
Antworten mit Zitat

Hat irgendwer schnell ne Funktion oder so bereit, die X und Y zurückgeben?

	ChristianK	So, Apr 27, 2008 20:49 Antworten mit Zitat
X und Y von was?
AdvanceLcd Intel Core 2 Duo 3.2 GHz, 4 GB RAM, GeForce 8800 GTX \| MacBook Pro 15,4″ Intel Core 2 Duo 2.4 GHz, 2 GB RAM, GeForce 8600M GT

ChristianK

So, Apr 27, 2008 20:49
Antworten mit Zitat

X und Y von was? Rolling Eyes

AdvanceLcd
Intel Core 2 Duo 3.2 GHz, 4 GB RAM, GeForce 8800 GTX | MacBook Pro 15,4″ Intel Core 2 Duo 2.4 GHz, 2 GB RAM, GeForce 8600M GT

	D2006 Administrator	So, Apr 27, 2008 23:14 Antworten mit Zitat
~GESCHLOSSEN~ Du bist wohl die Person hier im Portal, die schon am häufigsten aufgefordert wurde keine Doppelposts mehr zu machen. Und trotzdem widersetzt du dich dieser Anordnung, was man - wie ich finde - mittlerweile als Vorsatz bezeichnen könnte. Deswegen gratuliere ich dir hiermit herzlichst zur zweiten Verwarnung. Und ja, ich habe wieder einen Thread von dir geschlossen, aber Vorsicht: Nochmal lasse ich mich deswegen nicht mit Hitler vergleichen, nur dass das klar ist!
Intel Core i5 2500 \| 16 GB DDR3 RAM dualchannel \| ATI Radeon HD6870 (1024 MB RAM) \| Windows 7 Home Premium Intel Core 2 Duo 2.4 GHz \| 2 GB DDR3 RAM dualchannel \| Nvidia GeForce 9400M (256 MB shared RAM) \| Mac OS X Snow Leopard Intel Pentium Dual-Core 2.4 GHz \| 3 GB DDR2 RAM dualchannel \| ATI Radeon HD3850 (1024 MB RAM) \| Windows 7 Home Premium Chaos Interactive :: GoBang :: BB-Poker :: ChaosBreaker :: Hexagon :: ChaosRacer 2

D2006

Administrator

So, Apr 27, 2008 23:14
Antworten mit Zitat

~GESCHLOSSEN~

Du bist wohl die Person hier im Portal, die schon am häufigsten aufgefordert wurde keine Doppelposts mehr zu machen. Und trotzdem widersetzt du dich dieser Anordnung, was man - wie ich finde - mittlerweile als Vorsatz bezeichnen könnte.

Deswegen gratuliere ich dir hiermit herzlichst zur zweiten Verwarnung.

Und ja, ich habe wieder einen Thread von dir geschlossen, aber Vorsicht: Nochmal lasse ich mich deswegen nicht mit Hitler vergleichen, nur dass das klar ist!

Übersicht

BlitzBasic

Beginners-Corner

Nach Oben

BlitzBasic Portal

Bild strecken

Betreff: Bild strecken