Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - D2O

Pages: 1 [2] 3 4 ... 71
16
GLBasic - de / Re: Laufwerke
« on: 2018-Feb-19 »
[emoji106]

Gesendet von meinem HUAWEI RIO-L01 mit Tapatalk


17
GLBasic - de / Re: Laufwerke
« on: 2018-Feb-18 »
 :blink:
Hmmm, das hört sich so an wie wenn da was mit reincompiliert wird wo nicht rein gehört.

1. Öffne die *.apk mal mit dem 7-Zip manager.
Da kannst Du die ganzen Ordner, Dateien und deren größe in einer apk einsehen.
Beispiel:  http://snap.ashampoo.com/WT82LYX0

2. In der GLB IDE unter Datei->Projekt mal dfas Bereinigen anklicken. Hier werden alle unötigen Dateien erstmal gelöscht. (Da gibts auch ein ein ICON in der Toolleiste-> Mülleimer)

3. ;) bin mal kurz Offline, die Hunde schreien nach "Spaziergang"




18
GLBasic - de / Re: Laufwerke
« on: 2018-Feb-18 »
Guten Morgen,
dar ich ich das Projekt mal ansehen, bzw. kannst Du es mir zukommen lassen?
Wenn ja, dann schreib mir einfach ein PN.

Oder hast Du mal einen anderen Test gemacht?
ein Simples "Hello World".

Als Win32 Datei ~ 1,7mb
Als Android Datei ~ 1,5mb
Code: (glbasic) [Select]
// --------------------------------- //
// Project: Hello
// Start: Sunday, February 18, 2018
// IDE Version: 15.089


// SETCURRENTDIR("Media") // go to media files

LOADFONT "Media/smalfont.png",1
SETFONT 1

WHILE TRUE

PRINT "Hello World",10,10

SHOWSCREEN
WEND

19
GLBasic - de / Re: Laufwerke
« on: 2018-Feb-17 »
Also ich hab hier gerademal knapp 4mb davon sind um die 3mb für die Grafik und irgendwas mit 4-5000 Zeilen Code.

Da kann was nicht stimmen.

20
GLBasic - de / Re: Laufwerke
« on: 2018-Feb-17 »
... mein Android File ist fast 200mb groß obwohl ich nur knapp 200 Zeilen Code....

 :o Ähmm, sicher das da nich noch was anderes mit dabei ist? Sound und Co.?
200 mb sind nicht normal.

Nur die *.apk datei??

21
GLBasic - de / Re: Laufwerke
« on: 2018-Feb-17 »
Hallo Worebu,

CHR$(92)  ist Dein Freund ;)

Das  Backslash  "\" wird auch für zusätze wie "\N" (Zeilenende) benutzt.
Daher muss man manche Zeichen mit CHR$() übergeben oder anzeigen lassen.

Schau mal in der GLB Hilfe unter "ASC()" nach, das sind die ASCII zeichen aufgeführt.

22
GLBasic - de / Re: Laufwerke
« on: 2018-Feb-15 »
Servus,

in etwa so:
Code: (glbasic) [Select]
OCAL a% = 65 // Start mit dem Buchstaben 'A' in der ASCII Tabelle
LOCAL y% = 100
LOCAL out$[]
DIM out$[26]


FOR i = 0 TO 25

IF DOESDIREXIST(CHR$(a%)+":")

out$[i] = "Laufwerk "+CHR$(a%)+": " + "ist vorhanden"
ELSE
out$[i] = "     Laufwerk "+CHR$(a%)+": " + "ist nicht vorhanden"



ENDIF

INC a%,1
NEXT


WHILE TRUE

FOR i = 0 TO 25

PRINT out$[i],100,y
y = y+10

NEXT


y = 100

SHOWSCREEN
WEND

23
GLBasic - de / Re: Maus abfangen
« on: 2018-Feb-11 »
Hallo @Worebu,

ich glaube das was Du suchst, wäre eine MouseHit() funktion.
Da hab ich noch was, ist aber fast 10 Jahre her, man oh man, so Alt bin ich schon ;)

Schranz0r hatte damal auch mal was geschrieben.
Hier mal der Code von mir und der Link zu dem thread.

http://www.glbasic.com/forum/index.php?topic=2572.msg19177#msg19177
oder gib in der SuFu mal "MouseHit" ein.
Schönen Sonntag noch :)

Code: (glbasic) [Select]
// --------------------------------- //
// Project: Mousehit
// Start: Saturday, June 21, 2008
// IDE Version: 5.300



GLOBAL f1 = 200
GLOBAL f2 = 0
GLOBAL f3 = 50

GLOBAL f4 = 50
GLOBAL f5 = 50
GLOBAL f6 = 3

LOCAL mx,my,b1,b2

WHILE TRUE
        MOUSESTATE mx,my,b1,b2  ///Mouse Initialisieren

        MouseHitUpdate(b1,b2) // Abfrage welche Mousetasten überprüft werden sollen



                                // Mousbutton 1
                IF MouseHit(1) = 1  // (1) = b1 | (2) = b2
                                                        // Returns >>  1 = MouseHit | 2 = MouseDown | -1 = release event | 0 = Nothing
                                f1 = RND(255)
                                f2 = RND(255)
                                f3 = RND(255)
                ENDIF

                                // Mousbutton 2
                IF MouseHit(2) = 1
                                f4 = RND(255)
                                f5 = RND(255)
                                f6 = RND(255)
                ENDIF


        DRAWRECT 10,10,100,100,RGB(f1,f2,f3)
        DRAWRECT 115,10,100,100,RGB(f4,f5,f6)




SHOWSCREEN
WEND
END


//////////////////////////////////////////////////////////////////////////////////////////////////////

FUNCTION MouseHitUpdate : l_1 = 0, l_2 = 0

GLOBAL gMouseDown[], gMouseState[]
GLOBAL K[]
        DIM K[3]

LOCAL i
    // First Time call/ zum ersten Mal hier
    IF BOUNDS(gMouseDown[],0)=0
        DIM gMouseDown[7]
        DIM gMouseState[7]
    ENDIF

    // For each key / für jede Taste
    FOR i=0 TO 2
       // k = KEY(i)  ////<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
       K[0] = 0  //Dummy, für das bessere verständnis ;)  Button 1 - 2

       K[1] = l_1
       K[2] = l_2


        // Key is pressed / Taste ist gedrückt
        IF K[i]
            IF gMouseDown[i]
                gMouseState[i]=2  // war 1
            ELSE
                gMouseDown[i]=2  // war 1
                gMouseState[i]=1 // war 2
            ENDIF
        ELSE
            // Key is not pressed / Taste nicht gedrückt

            // Has key been pressed before?
            // War die Taste gedrückt?
            IF gMouseDown[i]
                gMouseDown[i] = 0
                gMouseState[i] = -1
            ELSE
               gMouseState[i]=0
            ENDIF
        ENDIF
    NEXT
ENDFUNCTION





//  0 = not pressed / nicht gedrückt
//  1 = just pressed / gerade runtergedrückt
//  2 = pressed / gedrückt (gehalten)
// -1 = release event / wieder losgelassen

// Liefert den aktuellen zustand zurück, Max 6 Mousbuttons 1-6
FUNCTION MouseHit : mKEY
// SIcherheits abfrage
        IF mKEY > 2 THEN mKEY = 0
        IF mKEY < 0 THEN mKEY = 0

        RETURN gMouseState[mKEY]
ENDFUNCTION



24
GLBasic - de / Re: GLBasic & IPhone
« on: 2018-Jan-30 »
Nein, hab noch nichts dafür erstellt.
Aber Du bebrauchs dafür einen MAC.

Hier wird ein X-Code erstellt und der wird dann auf dem MAC compiliert.

25
GLBasic - de / Re: Fehlermeldung WIN32
« on: 2018-Jan-01 »
 :booze:

26
GLBasic - de / Re: Fehlermeldung WIN32
« on: 2017-Dec-31 »
Naja, zumindest für WinCE.

Schade eigentlich das sich hier im Deutschsprachigen teil hier im Forum so gut wie nichts mehr tut. :(


Wünsch Euch trotzdem einen guten Rutsch.

27
GLBasic - de / Re: Fehlermeldung WIN32
« on: 2017-Dec-31 »
Hmm, eigendlich brauch/benutze ich kein WinCE, habe aber es einfach mal Just4Fun Probiert.
Geht bei mir auch nicht.

Code: (glbasic) [Select]
WHILE TRUE

        PRINT "Hello World!",100, 100, 1
        SHOWSCREEN

WEND

Quote
_______________________________________
*** Configuration: WINCE ***
precompiling:
GPC - GLBasic Precompiler V.14.721 SN:fb943093 - 3D, NET
Wordcount:4 commands
compile+link:
/cygdrive/Q/Compiler/platform/WinCE/Lib/libGLBasicWinCE.a(OpenGLRainbows.o)(.text+0x4334):OpenGLRainbows.cpp: undefined reference to `sinf'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libGLBasicWinCE.a(OpenGLRainbows.o)(.text+0x4340):OpenGLRainbows.cpp: undefined reference to `cosf'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libGLBasicWinCE.a(Rainbows3D.o)(.text+0x4a58):Rainbows3D.cpp: undefined reference to `tanf'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libGLBasicWinCE.a(Rainbows3D.o)(.text+0x7214):Rainbows3D.cpp: undefined reference to `tanf'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libGLBasicWinCE.a(Rainbows3D.o)(.text+0x7644):Rainbows3D.cpp: undefined reference to `cosf'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libGLBasicWinCE.a(3DMath.o)(.text+0x520):3DMath.cpp: undefined reference to `acosf'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libCxImageWinCE.a(pngread.o)(.text+0x324):pngread.c: undefined reference to `ExitProcess'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libCxImageWinCE.a(pngerror.o)(.text+0x38):pngerror.c: undefined reference to `ExitProcess'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libCxImageWinCE.a(pngerror.o)(.text+0x108):pngerror.c: undefined reference to `ExitProcess'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libCxImageWinCE.a(pngwrite.o)(.text+0xa74):pngwrite.c: undefined reference to `ExitProcess'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libCxImageWinCE.a(pngset.o)(.text+0x68):pngset.c: undefined reference to `lstrlenA'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libCxImageWinCE.a(pngset.o)(.text+0xc4):pngset.c: undefined reference to `lstrlenA'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libCxImageWinCE.a(pngset.o)(.text+0x164):pngset.c: undefined reference to `lstrlenA'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libCxImageWinCE.a(pngset.o)(.text+0x540):pngset.c: undefined reference to `lstrlenA'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libCxImageWinCE.a(pngset.o)(.text+0x71c):pngset.c: undefined reference to `lstrlenA'
/cygdrive/Q/Compiler/platform/WinCE/Lib/libCxImageWinCE.a(pngset.o)(.text+0x8d8):pngset.c: more undefined references to `lstrlenA' follow
*** FATAL ERROR - Bitte die Compiler-Ausgabe ins Forum kopieren
_______________________________________
*** Fertig ***
Dauer: 3.7 sek. Zeit: 11:32
Erstellen: 0 erfolgreich.
*** 1 FEHLGESCHLAGEN ***

28
GLBasic - de / Re: Fehlermeldung WIN32
« on: 2017-Dec-28 »
Unter denn Projekt einstelllungen auch Win CE ausgewählt?

29
GLBasic - de / Re: Fehlermeldung WIN32
« on: 2017-Dec-22 »
Hallo @Worebu ,
ich meine das ich die Feherlmeldung auch schon mal hatte, weis aber nicht mehr an was oder wie ich das beseitigt hatte.
Sorry, hätte gerne geholfen.

Aber, sind die "Platformen" noch alle da?
Oder hast Du die richtige Paltform version heruntergeladen?

Es gibt ja Versionen für die V14 und V15.

Pages: 1 [2] 3 4 ... 71