Поиск сообщества
Показаны результаты для тегов 'не видны изменения в файле базы'.
Найдено: 1 результат
-
Здравствуйте уважаемые члены сообщества. Пожалуйста подскажите ответ на такой вопрос. Почему после процедуры Ввести приложения для ОС Андроид: //Ввести procedure TForm_Glavn_ZapKnijka.Button_Vvod_ParolClick(Sender: TObject); begin try Query_Parol.Insert; Query_Parol.FieldByName(‘Parol’).AsString:=Edit_Parol.Text; Query_Parol.Post; Query_Parol.Refresh; Query_Zabyl.Insert; Query_Zabyl.FieldByName(‘Vopros’).AsString:=ComboBox_Vopros.Items.Text; Query_Zabyl.FieldByName(‘Otvet’).AsString:=Edit_Otvet.Text; Query_Zabyl.Post; Query_Zabyl.Refresh; Showmessage(‘Введено.’); Label1.Text:=Query_Parol.FieldByName(‘Parol’).AsString; except on e: Exception do begin Showmessage(‘Ошибка ввода. Попробуйте ещё раз.: ‘+e.Message); end; end; end; В Label1 появляется нужный текст а в самой базе DB.db3 пусто? Хотя подключение к файлу базы без ошибок. Проверяю в обоих файлах в папке проекта и в папке \assets\internal. Все поля пусты. С Уважением. Олег.
