Habe Problem mit For ... Next und DrawBlock
Übersicht

Ensign JoeBetreff: Habe Problem mit For ... Next und DrawBlock |
![]() Antworten mit Zitat ![]() |
|
---|---|---|
Naja, der Titel sagt eigentlich schon alles:
Folgender Code (ein "wenig" abgekürzt...) Am Anfang: Code: [AUSKLAPPEN] Flip
Global Progressbar = LoadImage("progressbar.PNG") MaskImage Progressbar, 255,0,255 Global ProgressbarTileLeft = LoadImage("progressloaderleft.PNG") Global Hintergrund = LoadImage("background.JPG") ;Laden des Hintergrundbilds ResizeImage Hintergrund, GraphicsWidth(), GraphicsHeight() Global ProgessBarTile = LoadImage("progressloader.PNG") Global SchliessenNormal = Loadimage("closebtn_normal.PNG") Da wo die Function aufgerufen werden soll: Code: [AUSKLAPPEN] CreateControl("progressbar", True, ((GraphicsWidth() / 2) - (300 / 2)) + 20, ((GraphicsHeight() / 2) -(200 / 2)) + 80, 999,999,"beende programm", 50, "")
FreeFont Schrift Anfang der Function: Code: [AUSKLAPPEN] Function CreateControl(Typ$, EnabledDDD, ObjPosX#, ObjPosY#, ObjWidth#, ObjHeight#, Titel$, SonstigesInt, SonstigesStr$)
If Typ$ = "calendar" Then ;Kalender Da wo das Problem eigentlich liegt: Code: [AUSKLAPPEN] ElseIf Typ$ = "progressbar" Then
;Prozessleiste DrawImage ProgressBar, ObjPosX#, ObjPosY# DrawBlock ProgressBarTileLeft, ObjPosX#, ObjPosY# If SonstigesInt > 0 Then For bbb = ObjPosX# + 7 To ObjPosX# + SonstigesInt Step 2 DrawBlock ProgressBarTile, bbb, ObjPosY# <<<<<<<< Da ist das Problem!!! Next End If Schrift = LoadFont("wintitle.fon", 14) SetFont Schrift Text ObjPosX# + 20, ObjPosY# + 10, Upper(Titel$) + "... " + SonstigesInt + "%" End If End Function Bei der 1. Ausführung: Wurde die For... Next-Schleife übergangen. Jetzt: Kommt folgender Fehler: Illegal memory access (oder so ähnlich) Der kommt bei mir immer wenn irgendwas fehlt... Blos was??? |
||
Ensign Joe |
![]() Antworten mit Zitat ![]() |
|
---|---|---|
OK! hat sich erledigt!
Irgendwas hat mit dem Filename nicht gestimmt (obwohl der richtig war!) Ich habe die Zeile einfach neu geschrieben und tada!!! @Triton oder sonst einen Moderator: Bitte trashen! ![]() |
||
Übersicht


Powered by phpBB © 2001 - 2006, phpBB Group