Moin,
ich habe das System nach der Anleitung aus der "Linux-Welt 5/2020" für das erstellen von "Android"-Apps eingerichtet.
Wenn ich die Anwendung dann aber mittels "STRG+F1" starte, erhalte ich folgende Meldung:
Der Code sieht so aus:Fatal: [EStringListError] Failed: List index (0) out of bounds
Code: Alles auswählen
{hint: save all files to location: /home/lazman/fpcupdeluxe/projects/LAMWProjects/HelloWorld/jni/ }
library controls; //[by LAMW: Lazarus Android Module Wizard: 09.08.2020 18:03:36]
{$mode delphi}
uses
Classes, SysUtils, And_jni, And_jni_Bridge, AndroidWidget, Laz_And_Controls,
Laz_And_Controls_Events, unit1;
{%region /fold 'LAMW generated code'}
.....
begin
gApp:= jApp.Create(nil);
gApp.Title:= 'LAMW JNI Android Bridges Library';
gjAppName:= 'org.lamw.helloworld';
gjClassName:= 'org/lamw/helloworld/Controls';
gApp.AppName:=gjAppName;
gApp.ClassName:=gjClassName;
gApp.Initialize;
gApp.CreateForm(TAndroidModule1, AndroidModule1);
end.
Code: Alles auswählen
{Hint: save all files to location: /home/lazman/fpcupdeluxe/projects/LAMWProjects/HelloWorld/jni }
unit unit1;
{$mode delphi}
interface
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Classes, SysUtils, AndroidWidget, Laz_And_Controls;
type
{ TAndroidModule1 }
TAndroidModule1 = class(jForm)
jButton1: jButton;
jEditText1: jEditText;
procedure jButton1Click(Sender: TObject);
private
{private declarations}
public
{public declarations}
end;
var
AndroidModule1: TAndroidModule1;
implementation
{$R *.lfm}
{ TAndroidModule1 }
procedure TAndroidModule1.jButton1Click(Sender: TObject);
begin
jEditText1.Text:='Hello World';
end;
end.
Passiert das wieder nur bei mir oder hat noch jemand das Problem?
Gruß
Heiko