French Spinner 1 erreur

Bonjour,
Je suis actuellement en train de faire une application camera avec comme source d'info un tuto sur ce site. au lieu de mettre les options dans le menu, je les ai mises dans un spinner. seulement problème, j'ai mis pour l'instant uniquement le flash. Donc Auto-Activé-Désactivé dans le spinner. Mais lorsque l'on clique dessus, celà met:
Error occured
An error has occured in sub:camera_spinner1_itemclick(javaline:311)
java.lang.runtimeException: setParameters failed
Continue?

Voilà le code en entier:
B4X:
'Activity module
Sub Process_Globals
   'These global variables will be declared once when the application starts.
   'These variables can be accessed from all modules.

End Sub

Sub Globals
   'These global variables will be redeclared each time the activity is created.
   'These variables can only be accessed from this module.
   Dim camera1 As AdvancedCamera
   Dim Panel1 As Panel
   Dim Spinner1 As Spinner
End Sub

Sub Activity_Create(FirstTime As Boolean)
   Activity.LoadLayout("Camera")
   Spinner1.AddAll(Array As String("Automatique", "Activé", "Désactivé"))
End Sub

Sub Activity_Resume
 camera1.Initialize(Panel1, "Camera1")
End Sub

Sub Activity_Pause (UserClosed As Boolean)
camera1.StopPreview
    camera1.Release
End Sub
Sub Camera1_Ready (Success As Boolean)
    If Success Then
        camera1.StartPreview
        
    Else
        ToastMessageShow("Cannot open camera.", True)
    End If
End Sub

Sub Camera1_PictureTaken (Data() As Byte)
    camera1.StartPreview
    Dim out As OutputStream
    out = File.OpenOutput(File.DirRootExternal, "Image.jpg", False)
    out.WriteBytes(Data, 0, Data.Length)
    out.Close
    ToastMessageShow("Image saved: " & File.Combine(File.DirRootExternal, "Image.jpg"), True)

    
End Sub
Sub Spinner1_ItemClick (Position As Int, Value As Object)
   If Value="Automatique" Then
   camera1.FlashAuto
   ToastMessageShow("Flash automatique", False)
   Else If Value="Activé" Then
   camera1.FlashOn
   ToastMessageShow("Flash activé", False)
   Else If Value="Désactivé" Then
   camera1.FlashOff
   ToastMessageShow("Flash désactivé", False)
   End If
End Sub
 
Ouh là

C'est USOS, plusieurs applications en 1. pour y accéder: bureau tramway -> Débloquer -> petite caméra.
Aussi (puisque vous avez le .zip), j'aurai voulu savoir:
Est-il possible d'envoyer un e-mail ou un sms exactement comme SIRI, c'est à dite "envoie a papa J'ai le cadeau" et que le programme puisse distinguer dans un edittext "envoie un papa" et "j'ai le cadeau". La programme est dans le .zip, c'est la petite bouche sur le bureau tramway.
EDIT: Le problème vient de la caméra, car j'ai essayé avec un bouton, et c'est la même chose.
REEDIT: J'avais oublié 2 parenthèses. Maintenant rajoutées, çà fait (java.lang.nullPointerException)
P.S: le zip est trop lourd. Voici un lien:
urlink.fr/58g
 
Last edited:
Bon... Finalement, je crois que je vais abandonner une caméra avancée, et partir vers une caméra simple. Presque aucune fonction, à chaque fois, il manque "un paramètre".
 
OK!

Je teste avec mon asus eeepad TF101 (il n'y as PAS DE FLASH!) Voilà pourquoi celà ne marche pas!
P.S: Il n'y a pas de problèmes d'affichage sur ton Nenus One? A la base, c'est prévu pour les tablettes 7 et 10 pouces!!
Merci beaucoup klaus! :sign0098:
 

klaus

Expert
Licensed User
Longtime User
Il n'y a pas de problèmes d'affichage sur ton Nenus One?
Sur mon Nexus One la prévisualisation et le spinner fonctionnent.
Pour le Spinner je vérifié seulement que l'évènement Click ne génère pas d'erreur et pas les fonctions sélectionnées.
Pour vérifier j'ai dû légèrement modifier ton code pour directement lancer l'activity Camera à cause de la taille de l'écran, je n'ai pas de tablette.
Pour avoir une taille d'écran comme sur les tablettes je ne peux le faire qu'avec un émulateur.

Meilleures salutations.
 
Last edited:
Top