if ((ComboBox1->ItemIndex== -1) || (ComboBox2->ItemIndex== -1) || (ComboBox3->ItemIndex== -1))
   {
        MessageDlg("Выберите все три условия", mtInformation, TMsgDlgButtons() << mbOK, 0);
        condition=false;
        }
        else {
   if ((ComboBox1->ItemIndex==0) && (ComboBox2->ItemIndex==0) && (ComboBox3->ItemIndex==0) && (condition=true))
        {
          Edit1->Text=FloatToStr(speed);
          if (speed>74){
          up=speed-74;
          MessageDlg("Снизьте скорость на " + AnsiString(up) +" ,переключите передачу на 4" ,mtInformation, TMsgDlgButtons() << mbOK, 0);

          }
                else if (speed<74){
                up=74-speed;
                MessageDlg("Повысьте скорость на " + AnsiString(up) + " ,переключите передачу на 4",mtInformation, TMsgDlgButtons() << mbOK, 0);
                }
                        else if(speed=74)
                        MessageDlg("Придерживайтесь данного скоростного режима",mtInformation, TMsgDlgButtons() << mbOK, 0);
        }
   if ((ComboBox1->ItemIndex==1) && (ComboBox2->ItemIndex==0) && (ComboBox3->ItemIndex==0) && (condition=true))
   {
      Edit1->Text=FloatToStr(speed);
      if (speed>66)
      MessageDlg("Снизьте скорость, переключите передачу на 4",mtInformation, TMsgDlgButtons() << mbOK, 0);
        else if(speed<66)
        MessageDlg("Повысьте скорость , переключите передачу на 4",mtInformation, TMsgDlgButtons() << mbOK, 0);
                else if(speed=66)
                MessageDlg("Придерживайтесь данного скоростного режима",mtInformation, TMsgDlgButtons() << mbOK, 0);

   }
   if ((ComboBox1->ItemIndex==1) && (ComboBox2->ItemIndex==1) && (ComboBox3->ItemIndex==0) && (condition=true))
    {
      Edit1->Text=FloatToStr(speed);
      if (speed>64)
      MessageDlg("Снизьте скорость, переключите передачу на 4",mtInformation, TMsgDlgButtons() << mbOK, 0);
        else if(speed<64)
        MessageDlg("Повысьте скорость, переключите передачу на 4",mtInformation, TMsgDlgButtons() << mbOK, 0);
                else if(speed=64)
                MessageDlg("Придерживайтесь данного скоростного режима",mtInformation, TMsgDlgButtons() << mbOK, 0);

    }
                 }