hello,
i create a application LAMW4 [gui] with a main form and 3 other "child" (actRecyclabe). i can switch without probleme
In a child form (scanform) i have a jZBarcodeScannerView. (the permission camera is ok) i can take many photo of codebar, i can close without probleme and go to the main form, but if i want re-open the scanform the app crash. so i re-open the app, i can have scanform and if close it without scan there is no probleme.
the procedure use to call the scanform if you need
(...)
procedure TFbase.BscanClick(Sender: TObject);
begin
if(Fscan = nil) then
begin
gApp.CreateForm(TFscan, Fscan);
Fscan.InitShowing(gApp);
Fscan.BarCode.Visible:=false;
Fscan.Bproduit.Visible:=true;
fscan.Bsignaler.Visible:=false;
Fscan.Bproduit.Text:='Commercer à scanner';
DataBase.DataBaseName:='myData.db';
Fbase.DataBase.Select('SELECT * FROM Produits');
Fscan.totprod.Text:=IntToStr(Fbase.DataBase.Cursor.GetRowCount)+
' produits dans la base';
end
else
begin
Fscan.Show;
DataBase.DataBaseName:='myData.db';
Fbase.DataBase.Select('SELECT * FROM Produits');
Fscan.totprod.Text:=IntToStr(Fbase.DataBase.Cursor.GetRowCount)+
' produits dans la base';
Fscan.Bproduit.Text:='Commercer à scanner';
fscan.Bsignaler.Visible:=false;
Fscan.BarCode.Visible:=false;
Fscan.Bproduit.Visible:=true;
end;
end;
(...)