Why doesn't this code work on android from Delphi xe 10?

Question

Android

On windows works on android no, why?
procedure TForm1.ListBox1ItemClick(const Sender: TCustomListBox;
const Item: TListBoxItem);
varn
, i: integer;
s, k, c, v, d: string;
begin
ListBox2.Clear;
n := ListBox1.ItemIndex;
k := ListBox1.Items[ListBox1.ItemIndex];
if length(k) = 1 then
s := k
else
s := k[2];
if n = strtoint(s) then
begin
for i := 0 to Memo1.Lines.Count - 1 do
begin
v := Memo1.Lines.Strings[i];
if length(v) = 1 then
c := v
else
begin
c := v[2];
if c = s then
begin
d := Memo1.Lines.Strings[i];
ListBox2.Items.Add(d);
end;
end;
end;
end;
end;

Answer 1

Due to the peculiarities of converting your pascal to java. It is better to program in Java for android, because it is not known how well the code is converted.

Answer 2

I decided