German Icon auf Button laden

[strupp01]

Ich benutze in meinem Programm einige Icon, die auf Button angezeigt werden. Wenn die Dateien auf dem Tablett in einem Verzeichnis z.B. Test liegen geht das problemlos mit

'Icon auf Button_Plus einlesen
Dim Button_Plus_Icon As BitmapDrawable
Button_Plus_Icon.Initialize(LoadBitmap(File.DirRootExternal,"/Test/Plus.png"))
Button_Plus.setIcon(True,Button_Plus_Icon)

Ich möchte diese Dateien in meiner erstellten .apk-Datei haben. Daher hebe ich in meinem projekt-Ordner unter dem Vereichnis ein Unterverzeichnis Icon erstellt und dort alle Icon hin kopiert.

Test/Files/Icon/Plus.png
/minus.png
...

Die .apk-Datei wird dadurch zwar größer aber das ist OK.

Wie kann ich jetzt diese Icon-Dateien im Programmcode auf meine Buttons anzeigen? Wie muß der Befehl Button_Plus_Icon.Initialize(LoadBitmap... ausshen ?

Gruß strupp01

 

[klaus]

Kopiere Deine Icons nicht in einen Unterordner sondern in den Files Ordner des Projektes.
Dann kannst Du diese Dateien mit
Button_Plus_Icon.Initialize(LoadBitmap(File.DirAssets, "Plus.png"))
einlesen.

 

[strupp01]

Hallo Klaus,
danke für deine Hilfe. Ich habe die Dateien in das Verzeichnis Files verschoben und im Programm den Eintrag geändert.
Es tritt jedoch ein Fehler auf. Im Protokoll steht folgendes

Außerdem ist die Programmzeile geschlängelt unterstrichen

Beim Programmabbruch erscheint die Fehlermeldung

Wo ist mein Fehler ?

 

[klaus]

Hast Du die Icondateien auch im Files Manager geladen?

Was ist setIcon ?

 

[strupp01]

Hatte die Dateien so nicht eingelesen. Kannte ich noch nicht. Nach Einlesen ist die Wellenlinie verschwunden und im Protokoll ist der Eintrag nicht mehr vorhanden.
Trotzdem erschein Fehlermeldung

Den Eintrag seticon habe ich mal aus einem Beispiel übernommen. Kann sein, dass er nicht benötigt wird.

 

[klaus]

Kannst Du Dein Projekt als zip Datei posten?
Dann könnte ich mal reinschauen um zu sehen was das Problem ist.

 

[strupp01]

Ist ein sehr großes Programm. Wird wohl die max. Größe übersteigen. Außerdem möchte ich auch nicht hier komplett ins Netz legen. Müßte mal morgen ein Miniprogramm schreiben und dann probieren und ggf. als zip-Datei hochladen.

 

[strupp01]

Funktioniert jetzt alles. Hatte einen Fehler in einem Kommando.
Danke für die Hilfe.