-
Постов
131 -
Зарегистрирован
-
Посещение
-
Победитель дней
7
Сообщения, опубликованные Олег Киреев
-
-
20 часов назад, Rusland сказал:
Чего?
Если после insert сделать select, то что выдает?
Здравствуйте Rusland.
Я не понял Вашего вопроса. Поясните пожалуйста.
С Уважением. Олег.
-
Здравствуйте.
Да деплою. Смотрю файл и там тоже откуда деплою. Пусто. Не знаю где посмотреть. В самом приложении всё нормально. Видны данные в гриде. Я их и дополняю и удаляю из приложения. Но посмотреть как в Win в Accesse нигде не могу. Уж не знаю как быть.
С Уважением. Олег.
-
Здравствуйте Александр.
СпасиБО за ответ.
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.
Подскажите что не так.
С Уважением. Олег.
-
Здравствуйте wamaco.
СпасиБО за ответ.
Поясните пожалуйста подробнее что за commit. Мне известно только past.
С Уважением. Олег.
-
Здравствуйте уважаемые члены сообщества.
Пожалуйста подскажите ответ на такой вопрос.
Почему после процедуры Ввести приложения для ОС Андроид://Ввести 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. Все поля пусты.С Уважением. Олег.
-
СпасиБо за ответ.
Да Вы правы. Я так и сделаю.
С Уважением. Олег.
-
Витальджи. Вы меня рассмешили. СпасиБО. А если серьезно тогда прошу Вас расталкуйте мне подробно как в своем приложении на клике на кнопку появилось бы меню с выбором дисков или мест куда скачать файл а после того как пользователь указал например storage/sdcard/проекты сюда из http:........................ указанной в коде ссылке скачался файл. Какими может быть надо дополнительными пользоваться компонентами?
С Уважением. Олег. Буду ждать Вашего ответа.
-
СпасиБо за шутку.
Олег.
-
Равиль спасиБо за ответ. Я прочитал статью. Правильно ли я понимаю что для того чтобы обновить файл базы всё равно надо переустанавливать приложение хотя и не удаляя его перед этим? Тогда какой смысл переустанавливать если само приложение не изменилось а только база пополнилась? Логичнее было бы указать местонахождение приложению новоскачанный файл apk и оттуда взять файл базы или просто без apk сам файл базы? Или Андроид такого не позволяет?
С Уважением. Олег.
-
Мне надо чтобы просто файл полностью заменился. С новыми данными.
С Уважением. Олег.
-
А как же сначала скачать на устройство а потом на устройстве обновить?
Олег.
-
Сначала скачать на устройство а потом в устройстве его обновить.
Олег.
-
Здравствуйте MASMAT не знаю Вашего имени.
Ещё подскажите пожалуйста где в этом коде видно что из удалённого сервера скачивается файл базы?
// Извлекаем новый файл базы zip := TZipFile.Create; zip.Open(JStringToString(PackageName), TZipMode.zmRead); zip.Extract('assets/internal/DBGK.db', TPath.GetDocumentsPath, False); zip.Close; zip.free;
Олег.
-
Виталий.
Давайте по порядку. У меня есть файл базы "имя.db3" в нём вся база. Я этот файл ложу на удалённый сервер (есть такая бесплатная возможность) с помощью персонального компьютера. А вот что дальше? Я Вас не понимаю. Разве не надо просто скачать как то этот файл кудато на мобильное устройство? Или я совсем ничего не понимаю?
С Уважением. Олег.
-
Здравствуйте Виталий.
СпасиБо за ответ. Я начинающий в Андроиде. Пожалуйста раскройте более подробно следующие Ваши слова:"Закачиваете и выполняете этот файлик на локальном устройстве."
С Уважением. Олег.
-
-
Здравствуйте ребята. Моё имя Олег. Я из Минска.
Подскажите пожалуйста. У меня есть приложение для OS Android представляющее собой базу данных в котором задеплоин файл БД SQLite. Хотелось бы пойти дальше и изучить как обновлять этот файл базы на этом приложении из удалённого сервера простора INTERNET. Может у кого есть готовое решение или ссылка где это подробно описано?
Благодарю.
С Уважением. Олег.
-
Ребята спасиБО за ответы.
Кропоткину:-локальная сеть, 80 компов, сообщения типа "Подойди к моему столу...". Может дадите ссылку на уже реализованное решение?
Олег.
-
Здравствуйте ребята.
Может кто подскажет как реализовать в своём приложении посылку сообщений по локальной сети с ПК с OS Win XP на ПК с OS Win 7 средствами Win или по другому.
С Уважением. Олег.
-
Это БЕСПЛАТНОЕ приложение для OS Windows выполняет тягово-динамический
расчёт транспортного средства (как проверочный так и проектный)
с механической или
автоматической коробкой передач а также троллейбуса
(электробуса) с электродвигателем. Результаты в основном
показаны в виде графиков. Можно исходные данные и
результаты вывести в MSWord.
В базу данных уже введены некоторые внешние
характеристики
двигателей и характеристики коробок передач и
гидротрансформаторов.
Пользователь может вводить свои данные и хранить их.
Дополнительно можно производить некоторые
расчёты на прочность деталей подвески и сохранять их в
базе данных.Сообщите мне и я направлю Вам файлы приложения.
СпасиБО EMBARCADERO.
Автор: Олег Киреев-ведущий инженер-конструктор,
kireevoleg1966@gmail.com, +375 29 676 13 84
БЕЛАРУСЬ, г.Минск. -
Здравствуйте Андрей.
Я делал так например:
//добавл точкиprocedure TForm_Glavn.SpeedButton3Click(Sender: TObject);beginif Edit2.Text='' thenbeginShowMessage('Вы не заполнили поле Название легенды.');Abort;end;Series1.AddXY(NumberBox2.Value,sin(NumberBox3.Value),Edit2.Text,ColorComboBox1.Color);end;С Уважением.Олег. -
Подскажите пожалуйста как изменить величину и цвет текста в TreeView в Delphi 10 Seattle при разработке приложения под Android.
С Уважением. Олег.
-
Здравствуйте ZuBy.СпасиБо за ответ.Но пожалуйста "разжуйте" мне этот код. Я ещё не так хорошо разбираюсь. Как же всётаки пользователю выбрав конкретное из КомбоБокса изменить стиль всех окон приложения?С Уважением Олег.
-
Здравствуйте Добрые Люди.
Подскажите пожалуйста как програмно изменить стиль в RAD Studio 10 Seatle? Чтобы пользователь из КомбоБокса мог выбрать нужный. Пробовал по разному занося файл стиля *.fsf в Ресурсы
проекта:
//выбор цветового стиляprocedure TForm_glavn.ComboBox1Change(Sender: TObject);varStream: TResourceStream;// s:TStyleBook;beginif ComboBox1.ItemIndex=1 thenbeginStream := TResourceStream.Create(HInstance, 'Resource_1' , RT_RCDATA);//s:=TStyleBook.Create(Self);try//s.LoadFromFile(TPath.GetDocumentsPath + PathDelim + 'AquaGraphite.style');StyleBook1.Styles[1].LoadFromStream(Stream);//StyleBook1.Resource.LoadFromStream(Stream);StyleBook1.Style.Release;//StyleBook1.LoadFromStream(Stream);//StyleBook1.CurrentItemIndex := 1;//1, 2//StyleBook1.StyleName:='Android';finallyStream.Free;end;end;end;и не получается.
С Уважением. Олег
-
Здравствуйте М.Г.Дёмин. Моё имя Олег. Меня также интересует вопрос о том как сделать так чтобы установленное приложение из файла apk на мобильном телефоне увидело файл базы. Пожалуйста поделитесь со мной подробно от начала и до конца как это делается написав на мой gelo1@tut.by.
С Уважением. Олег.
Почему не видны изменения в файле базы SQLite
в SQLite
Опубликовано
Здравствуйте Крапоткин.
СпасиБО за ответ.
Я задеплоил файл базы от сюда ... \Android\Debug\Project_ZapKnijka\assets\internal\. Правильно ли я понимаю что этот файл базы должен поменяться?
Если нет. Тогда подскажите где же запрятался файл базы который меняется?
С Уважением. Олег.