Серьезного криминала не вижу, возможно ошибка при работе с типами данных. Дайте описание типов всех переменных которые используются в procedure TForm1.Button2Click(Sender: TObject);
А еще лучше выполните свой код пошагово и точно установите место которое порождает ошибку.
|