1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61
| for (unsigned int i=0; i < listItems.size() && !erreur; i++)
{
try
{
// pour chaque fichier, on récupère les paramètres saisis depuis l'interface
// on ne change pas le nom du fichier (qui est déjà conservé en chemin absolu dans listItems[i])
ToDouble(value, StringGrid1->Cells[1][i+1], 0.0f);
listItems[i].energy = value;
if ( listItems[i].energy>100)
{
TForm_MsgStandard::GetModuleForm(this, GetTraduction("Impossible d'appliquer une modulation supérieure à 100%."),listItems[i].fichier)->Show();
return;
}
ToDouble(value, StringGrid1->Cells[2][i+1], 0.0f);
listItems[i].velocity = StringGrid1->Cells[2][i+1];
if ( RoundTo(value,-6) ==0)
{
TForm_MsgStandard::GetModuleForm(this, GetTraduction("Impossible d'appliquer une vitesse nulle."),listItems[i].fichier)->Show();
return;
}
else if ( RoundTo(value,-6) > VITESSE_PLATINE_MAX)
{
TForm_MsgStandard::GetModuleForm(this, GetTraduction("Impossible d'appliquer une vitesse supérieure à ")+(AnsiString)VITESSE_PLATINE_MAX + " mm/s.",listItems[i].fichier)->Show();
return;
}
ToDouble(value, StringGrid1->Cells[3][i+1], 0.0f);
listItems[i].offsetX = value;
if ( RoundTo(value,-6) >OFFSET_MAX)
{
TForm_MsgStandard::GetModuleForm(this, GetTraduction("Impossible d'appliquer un offset sur X supérieur à ")+(AnsiString)OFFSET_MAX + " mm.",listItems[i].fichier)->Show();
return;
}
else if ( RoundTo(value,-6)<(OFFSET_MAX*-1))
{
TForm_MsgStandard::GetModuleForm(this, GetTraduction("Impossible d'appliquer un offset sur X inférieur à ")+(AnsiString)(OFFSET_MAX*(-1))+ " mm.",listItems[i].fichier)->Show();
return;
}
ToDouble(value, StringGrid1->Cells[4][i+1], 0.0f);
listItems[i].offsetY = value;
if ( RoundTo(value,-6) >OFFSET_MAX)
{
TForm_MsgStandard::GetModuleForm(this, GetTraduction("Impossible d'appliquer un offset sur Y supérieur à ")+(AnsiString)OFFSET_MAX+ " mm.",listItems[i].fichier)->Show();
return;
}
else if ( RoundTo(value,-6)<(OFFSET_MAX*-1))
{
TForm_MsgStandard::GetModuleForm(this, GetTraduction("Impossible d'appliquer un offset sur Y inférieur à ")+(AnsiString)(OFFSET_MAX*(-1))+ " mm.",listItems[i].fichier)->Show();
return;
}
}
catch (...)
{
erreur = true;
}
} |
Partager