White_Bambie

try
except

вопрос закрыт!

date = datetime.strptime(ui.dt_birth.text(), '%d.%m.%Y').date()

MySqlDataReader sdr = cmd.ExecuteReader();

if (sdr.HasRows)
{
while (sdr.Read())
{
f_btn.DropDown.Items.Add(sdr["Name"].ToString());
}
}

Сделал вот так:

MySqlConnection con = new MySqlConnection(AppSetting.ConnectonString());
            MySqlCommand cmd;
            cmd = con.CreateCommand();
            cmd.CommandText = "SELECT * FROM patients WHERE id='"+ MyListBox.SelectedValue + "';";

            try
            {
                con.Open();

                MySqlDataReader sdr = cmd.ExecuteReader();
                
                string[] sAdditional = new string[] { };
                char[] mychars = { ',' };

                // Чистим чекбоксы
                while (cl_Additional.CheckedItems.Count > 0)
                {
                    cl_Additional.SetItemChecked(cl_Additional.CheckedIndices[0], false);
                }

                // Загружаем данные
                while (sdr.Read())
                {           
                    sAdditional = sdr.GetString("Additional").Split(mychars);
                }

                // Заполняем список чекбоксов
                int length = sAdditional.Length;
                for (int i = 0; i < length - 1; i++)
                {
                    string fetr = sAdditional[i];
                    for (int j = 0; j <= cl_Additional.Items.Count - 1; j++)
                    {
                        if (cl_Additional.Items[j].ToString() == sAdditional[i])
                        {
                            cl_Additional.SetItemChecked(j, true);
                            break;
                        }
                    }
                }

                con.Close();
            }
            catch (Exception)
            {
                MessageBox.Show("Подключение к серверу отсутствует");
            }

cmd.CommandText = "SELECT * FROM patients WHERE LastName='"+ MyListBox.Text +"';";
            try
            {
                con.Open();
                MySqlDataReader sdr = cmd.ExecuteReader();

                // Загружаем данные
                while (sdr.Read())
                {
                    string sLastName = sdr.GetString("LastName");
                    txt_LastName.Text = sLastName;
                }

                // Закрываем соединение
                con.Close();
            }
            catch (Exception)
            {
                MessageBox.Show("Ошибка");
            }

В Delphi 10.1 такая же проблема...