XProfan

Okrea ( [...]

) y RedCube II ( [...]

) el fleißig Start- y Endtesten laufen con usted sin Choque? Wenn sí entonces gibts una Weg.

Was es con ...

IF (23.07.11)

Probiere auch veces si StartTest No en accidentes si veces sólo el Fensterstil 80 setzt.

RICOSCH

Hi IF,
Su Progis laufen y el DEMO "Planeten"
Fensterstyle Yo alles intenta si 80 oder normales Ventana, hängt se en !

es una Problema si yo oGL("SetName", anzahl%) also con uno Variable versehe ? porque sólo así bekomme Todavía mi Bilderobjekte Beschrifftet ?

I LOVE TOOLS

Noe, mostrar... @oGL("SetName", N) -> N: LongInt - Kennzeichen -

egal obs una numerische Konstante oder Variable es -

Roland schreibt erfahrungsgemäß en el Parameterbeschreibungen De todos modos (como hier auch) genau hin qué esperado se.

Como lo no yo en el accidentes restos Usted vlt. primero wohl sólo encima una minimalen Ver código fuente herauszubekommen wo como el Diferencia z.B. zwischen Deinem- y el Planetendemo es.

E.T.

Bei'm invitar el Bilder, después de Directorio Auswahl:

...y si el Prog propio Bilder en el Startverzeichnis auspackt, debería esta en Programa-Ende Por favor, auch otra vez lejos voluntad

bb-error.jpg	34 kB

Hochgeladen:	27.07.2011

Ladeanzahl:
		Descargar

Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

Hatter also mi AddFiles- y "if there is no image then end" - Verschlimmbesserung also otra vez expandido.

RICOSCH

en el ya disponible quelltext es el con el Starttest y endtest con drin
also hier
[...]

y el con el Verschlimmbesserung musste Todavía primero verstehen y nachvollziehen. Wärst Usted así lieb y fügst lo otra vez con un ?

y @ E.T. si el Programa normal termina also con ESC voluntad auch el angelegten Temp-Bilder gelöscht, el como ne Fehlermeldung dazwischen funkt Yo no bedacht.

y Por favor, no igual fünzig bilder invitar

para testen reichen así 10 - 20 stück,
es sí o ne- menge a tun.
En me meckert él De todos modos veces rum "soviele Elemente son no da" y soweiter.
y Bitte no alzuernst nehmen todos, dankeschön

I LOVE TOOLS

Einfach esta ganzen Krims hier samt unnötige Variables entfernen:
Kompilieren Marca Separación

pfad$   = GetDir$("@")
Pfad$   = pfad$ + "\\*.jpg"
bilder$ = FindFirst$(pfad$)
AddFiles bilder$

WhileNot %IOResult

    bilder$=FindNext$()
    addfiles bilder$
    inc counter%

endwhile

ifnot instr(".jpg",bilder$) = 0

    messagebox("Es wurden keine jpg Files gefunden !!","Fehler",0)

endif

...

whilenot anzahl% = counter%

    DATEI$ = ListBoxItem$(anzahl%)
    bild& = Create("hsizedPic",-1,  Datei$,200,120,1)
    casenot bild& : continue
    texture%[i% + 1] = oGL("getTextureBMP",bild&,1)
    Namen$[anzahl%] = Datei$
    deleteObject bild&'IF ergänzung
    ...
    inc i%
    inc anzahl%

endwhile

y sustituir en algo como como:
Kompilieren Marca Separación

AddFile "*.jpg"
caso %getCount=-1 : end messageBox("Keine Bilder","Keine Bilder",0)

whileLoop 0,%getCount+1

    bild& = Crear("hsizedPic",-1,  listBoxItem$(&bucle),200,120,1)
    casenot bild& : continue
    texture%[&bucle+1] = oGL("getTextureBMP",bild&,1)
    Namen$[&bucle+1] = listBoxItem$(&bucle)
    deleteObject(bild&)

RICOSCH

Gracias IF,
como steckt todavía zuviel alte Schule en me, daß con el Loop kannte Yo como no.
El jetzigen zeilen son viel compakter. ahora costumbre Yo auch sólo todavía con addfiles *.gif; addfiles *.bmp ... ergänzen ,?

I LOVE TOOLS

Exactamente! ^ ^

Einfach:
Kompilieren Marca Separación

addFiles "*.jpg"
addFiles "*.bmp"
addFiles "*.png"
...

whileLoop 0,%getCount+1

RICOSCH

así con Deiner gekürzten Variante bekomme Yo siempre una "Mapa de bits no ladbar"
muss veces gucken wo lo otra vez hagt.

Aber el con el Setname y Starttest Yo rausgefunden !
Am Rechner meiner Tochter se ejecuta lo Tatelos, Yo escribir que aquí aber en sonem mini Netbook Medion Akoya e1212. Posesiones zwar ya el mobile Intel Grafik treiber
aktualisiert. Der es aber auch todavía de 2008. Yo bekomme siempre una Windowsfehler
el qué con el iglicd32.dll no stimmt, also definitiv grafikkarten problem.

I LOVE TOOLS

>> also definitiv grafikkarten problem.

Naja! Wenn Okrea y RedCube II con usted laufen entonces liegt lo aber auch al Code y Usted debe vlt. versuchen herauszubekommen bajo welchen Bedingungen lo lauffähig wäre.