Bonjour Tlem,
Et merci encore de votre patience .
Je suis contient d'un manque de donnée de départ sur ce format ,
mais je ne pensais pas alors que le manque des 2 derniers champs nous poserais
un problème sur le reste du fichier car effectivement , boucle fonctionne pour
un format d'entrée tel que la deuxième ligne .
En fait je ne souhaite garder que 'type radar' et vitesse .
radarF.csv peut contenir ceci:
1.90817, 48.52327, "RD007" ; RD = ???
2.41893, 48.76256, "RF0052-030km/h-F" ;RF = radar fixe
4.31530, 48.96238, "RF1282-050km/h-R"
-0.70400, 44.74477, "RPL001-130km/h-F" ;RPL = radar poids lourd
Le numéro ne m'intéresse pas mais il a soit 3 ou 4 caractères .
Pour rester simple , le traitement final doit aboutir au même type de format que pour AlertGps.com ,
soit :
48.52327,1.90817,"RADAR_FIXE_0"
48.76256,2.41893,"RADAR_FIXE_030"
48.96238,4.31530,"RADAR_FIXE_050"
44.74477,-0.70400,"RADAR_FIXE_130"
radarM.csv peut contenir cela:
-4.55262, 48.44663, "RM00001-090km/h"
-4.51332, 48.41050, "RM00002-050km/h"
Ici le numéro a toujours 5 caractères .
De même , le traitement final donnera ici:
48.44663,-4.55262,"RADAR_MOBILE_090"
48.41050,-4.51332,"RADAR_MOBILE_050"
Pour radarM cela me semble plus facile car le format est toujours le même
sauf qu'il est encore différent de radarF .
Je pense que la boucle doit tester si le contenu est bien celui de radar fixe pour radarF.csv ,( test sur RD,RF,RPL)
et que le contenu de radarM.csv est bien des radars mobiles , (test sur RM) .
Mon idée est donc de créer une fonction _DoIt2RM et de l'associer uniquement à:
Code : Tout sélectionner
If IsArray($aRM2) Then
$aRM2 = [color=#FF0000]_DoIt2RM[/color]($aRM2, "RADAR_MOBILE", $Unites2, $Maxhdg2, $Minhdg2, $Distance2)
$sRM2 = _ArrayToString($aRM2, @CRLF)
EndIf
et de garder votre premiere boucle _DoIt2 mais à adapter pour :
Code : Tout sélectionner
If IsArray($aRF2) Then
$aRF2 = [color=#FF0000]_DoIt2[/color]($aRF2, "RADAR_FIXE", $Unites2, $Maxhdg2, $Minhdg2, $Distance2)
$sRF2 = _ArrayToString($aRF2, @CRLF)
EndIf
Hoo , ça commence à chauffer !!
J'aurais voulu rajouter un test sur le contenu du fichier RF et RM par exemple afin d'interdire
le traitement d'un fichier RF dans la box RM et inversement , du genre :
MsgBox(64, "Fichier incompatible !!!", "Choisissez uniquement" & @CRLF & "un fichier radarsF.csv") , mais je ne vois pas bien où la placer !
L'idéal serait dés le FileOpenDialog .
Merci encore pour votre aide
Pierre