gelo1

Пользователи
  • Публикации

    39
  • Зарегистрирован

  • Посещение

О gelo1

  • Звание
    Продвинутый пользователь
  • День рождения 07.02.1966

Информация

  • Пол
    Мужчина
  • Город
    Минск

Посетители профиля

283 просмотра профиля
  1. Решение: Делать в своём приложении скрытыми компонентами отслеживание изменения в базе. Олег.
  2. Здравствуйте Белов. Замечание принимаю. Прошу прощения. Оказалось просто моя невнимательность. Не на тот Query повесил запрос. Отличий Виндовса от Андроида здесь нет. С Уважением. Олег.
  3. СпасиБО всем. Разобрался. Тему закрываем. С Уважением. Олег.
  4. Всем спасиБо. Разобрался. Тему можно закрывать. С Уважением. Олег.
  5. Здравствуйте уважаемые члены сообщества. Пожалуйста подскажите почему не отфильтровываются данные (вообще не реагирует) в Гриде при наборе текста в Едите. Код на процедуру изменения Едита такой: //Найти запись procedure TForm_Tabl_Knijka.Edit_Poisk_ZapisChange(Sender: TObject); begin Query_Tab_Zapisy_Poisk.Active:=False; Query_Tab_Zapisy_Poisk.SQL.Clear; Query_Tab_Zapisy_Poisk.SQL.Add('SELECT * FROM Tab_Zapisy where Soderjanie like '+#39+Edit_Poisk_Zapis.Text+'%'+ #39+' ORDER BY Soderjanie' ); Query_Tab_Zapisy_Poisk.Active:=True; end; В приложении для Виндовс всё отлично реагирует. А в телефоне под Андроид ноль внимания и даже когда нажимаю кнопочку с кривой стрелочкой. С Уважением. Олег.
  6. СпасиБо Крапоткин. А можно еще вопрос по фильтрации данных в на телефоне в Андроиде. На процедуру изменения Едита пишу так: //Найти запись procedure TForm_Tabl_Knijka.Edit_Poisk_ZapisChange(Sender: TObject); begin Query_Tab_Zapisy_Poisk.Active:=False; Query_Tab_Zapisy_Poisk.SQL.Clear; Query_Tab_Zapisy_Poisk.SQL.Add('SELECT * FROM Tab_Zapisy where Soderjanie like '+#39+Edit_Poisk_Zapis.Text+'%'+ #39+' ORDER BY Soderjanie' ); Query_Tab_Zapisy_Poisk.Active:=True; end; В Видовсе всё отлично работает сразу при наборе отфильтровывает. На телефоне ноль внимания и даже когда нажимаю кривую стрелку. Что у меня не так? С Уважением. Олег.
  7. Да Крапоткин. СпасиБО. Я раньше столкнулся с тем чтобы обновить базу приходилось полностью удалять приложение с телефона и устанавливать снова. (Я служил под Екатеринбургом возле посёлка Белоярского в 1988/89гг. Интересно как там всё изменилось?) С Уважением. Олег.
  8. Александр спасиБО. Интуитивно я об этом догадывался но проверил по Вашему совету. Так оно и есть. С Уважением. Олег.
  9. Здравствуйте Крапоткин. СпасиБО за ответ. Я задеплоил файл базы от сюда ... \Android\Debug\Project_ZapKnijka\assets\internal\. Правильно ли я понимаю что этот файл базы должен поменяться? Если нет. Тогда подскажите где же запрятался файл базы который меняется? С Уважением. Олег.
  10. Здравствуйте Rusland. Я не понял Вашего вопроса. Поясните пожалуйста. С Уважением. Олег.
  11. Здравствуйте. Да деплою. Смотрю файл и там тоже откуда деплою. Пусто. Не знаю где посмотреть. В самом приложении всё нормально. Видны данные в гриде. Я их и дополняю и удаляю из приложения. Но посмотреть как в Win в Accesse нигде не могу. Уж не знаю как быть. С Уважением. Олег.
  12. Здравствуйте Александр. СпасиБО за ответ. Query_Parol это не видимый компонент TFDQuery. Я уже так пробовал заносить: Query_Parol.SQL.Text := 'INSERT INTO Tab_Parol (Parol) VALUES (:P)'; Query_Parol.ParamByName('P').Value := Edit_Parol.Text; Query_Parol.ExecSQL; Query_Parol.Transaction.Commit; Query_Parol.Refresh; и так: Query_Parol.Insert; Query_Parol.FieldByName('Parol').AsString:=Edit_Parol.Text; Query_Parol.Post; Query_Parol.Refresh; ничего не вижу в файле базы архива apk. Подскажите что не так. С Уважением. Олег.
  13. Здравствуйте wamaco. СпасиБО за ответ. Поясните пожалуйста подробнее что за commit. Мне известно только past. С Уважением. Олег.
  14. Здравствуйте уважаемые члены сообщества. Пожалуйста подскажите ответ на такой вопрос. Почему после процедуры Ввести приложения для ОС Андроид: //Ввести 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. Все поля пусты. С Уважением. Олег.