GLBasic forum

Other languages => GLBasic - de => Topic started by: Worebu on 2018-Feb-15

Title: Laufwerke
Post by: Worebu on 2018-Feb-15
Moinsen,

gibt es eine Möglichkeit  ALLE verfügbaren Laufwerke anzuzeigen?
Quasi wie bei Microsoft im Explorer.

Über ein Idee würde ich mich freuen .
Title: Re: Laufwerke
Post by: D2O 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
Title: Re: Laufwerke
Post by: Worebu on 2018-Feb-15
Jep, genau so . Danke.
Title: Re: Laufwerke
Post by: Worebu on 2018-Feb-17
Hi,

ich hab noch eine technische Frage


IF DOESDIREXIST(CHR$(a%)+":")                     diese Zeile funktioniert

IF DOESDIREXIST(CHR$(a%)+":\")                    diese nicht

Dir.gbas"(17) error : GPC0001 syntax error         das ist die Fehlermeldung (Zeile 17 ist die mit dem Befehl)


Hat jemand das schon mal gehabt?, was meint Ihr ,  liegt es am Schrägstrich?

Title: Re: Laufwerke
Post by: D2O 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.
Title: Re: Laufwerke
Post by: Worebu on 2018-Feb-17
Danke für die Erklärung. Mit CHR$(92) hab ich's auch gemacht. Der Fehler kam mir halt komisch vor. Aber was anderes, mein Android File ist fast 200mb groß obwohl ich nur knapp 200 Zeilen Code
habe und 100kb Grafik. Kann was optimieren oder Einstellen ?
Title: Re: Laufwerke
Post by: D2O on 2018-Feb-17
Quote from: Worebu 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??
Title: Re: Laufwerke
Post by: Worebu on 2018-Feb-17
202mb nur die .apk
Title: Re: Laufwerke
Post by: D2O 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.
Title: Re: Laufwerke
Post by: Worebu on 2018-Feb-17
Das denke ich auch .... aber was. Der Windows File ist nur 1.7mb gross.
Title: Re: Laufwerke
Post by: D2O 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
Title: Re: Laufwerke
Post by: Worebu on 2018-Feb-18
Hi,

jetzt wird's lustig. habe auch das "Hello World" genommen Win 1718kb und Android 1456kb  :blink:
Title: Re: Laufwerke
Post by: Worebu on 2018-Feb-18
Hab noch einen.

Ich habe den Android Ordner gelöscht und noch einmal durch den Compiler gejagt und ..... 103 mb, also knapp 100 mb weniger. Ich habe nichts gemacht, das Projekt ist so wie es auch mit 202 mb war.
Title: Re: Laufwerke
Post by: D2O 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 (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"



Title: Re: Laufwerke
Post by: Worebu on 2018-Feb-18
Hi,
genau das war's. Ich hatte die Originaldateien von den Grafiken und Sounds in einem Unterordner von "Media" und GLB
hat den ganzen Media Ordner ins Projekt Compiliert nicht nur die benutzten Files (wie dachte). Meine Kopien raus genommen
und weg ist der Müll. Also merken: nur benutzte Files in den Media Ordner. Dank Dir und eine schöne Arbeitswoche  :whip:
Title: Re: Laufwerke
Post by: D2O on 2018-Feb-19
[emoji106]

Gesendet von meinem HUAWEI RIO-L01 mit Tapatalk

Title: Re: Laufwerke
Post by: Worebu on 2018-Feb-23
Moin, ich hab da noch eine Frage. Werden unter Android die Laufwerke anders angesprochen wie unter Windows?
Ich bekomme nämlich nichts angezeigt.  :'(
Title: Re: Laufwerke
Post by: Schranz0r on 2018-Feb-23
Da hast du an sich ja keine Laufwerke.
Wie man allerdings Zugriff von SD auf Internen Speicher und andersrum bekommt... keinen Plan.
Title: Re: Laufwerke
Post by: D2O on 2018-Feb-23
Hallo,

versuche mal das hier, (Code ist aus der Hilfe, etwas abgewandelt)

Code (glbasic) Select
WHILE TRUE


y = 0


ok = SETCURRENTDIR("/") //
cur$ = GETCURRENTDIR$()
num = GETFILELIST("*.*", files$[])
num_dir  = INTEGER(num / 0x10000) // Hi-Word
num_file = MOD(num, 0x10000)      // Lo-Word

FOR i=0 TO BOUNDS(files$[], 0)-1 // BOUNDS(files$[], 0)-1 = num = num_dir+num_file
  PRINT files$[i], 0,y
  y = y+20
NEXT




SHOWSCREEN
MOUSEWAIT

y = 0

ok = SETCURRENTDIR("/sdcard") //
cur$ = GETCURRENTDIR$()
num = GETFILELIST("*.*", files$[])
num_dir  = INTEGER(num / 0x10000) // Hi-Word
num_file = MOD(num, 0x10000)      // Lo-Word

FOR i=0 TO BOUNDS(files$[], 0)-1 // BOUNDS(files$[], 0)-1 = num = num_dir+num_file
  PRINT files$[i], 0,y
  y = y+20
NEXT

SHOWSCREEN
MOUSEWAIT

WEND


zuerst wird das Stammverzeichnis ausgelesen,
dann mach Touch berührung der enthaltene ordner "/sdcard".
vorausgesetzt sdcard gibt es ;)
Das siehst Du aber schon beim ersten auslesen.
Title: Re: Laufwerke
Post by: Worebu on 2018-Feb-23
Danke  =D, das funzt, Jedenfalls auf dem Handy. Mal sehen was mein Tab dazu sagt . Schönes WE noch.  :booze:
Title: Re: Laufwerke
Post by: Worebu on 2018-Jun-24
Hi, ich habe es jetzt mal mit meinem Radio probiert und nix hinbekommen. ich kriege das Verzeichnis nicht angesprochen.
Ich weiß nicht wie ich das Laufwerk einbinden kann. ich habe mal ein Foto von einem Dateimanager angehängt.

Wäre für eine Idee dankbar

PS: USB3 ist der Stick, man kann 2 Anschließen. der andere heißt dann USB4