Перейти к содержанию
Fire Monkey от А до Я

Roman V

Пользователи
  • Постов

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

  • Посещение

Активность репутации

  1. Like
    Roman V отреагировална mazayhin в Программа не запускается под Android   
    За это отвечает Deployment.
    Добавьте нужные файлы, укажите путь и все.
    Подробнее смотрите http://docwiki.embarcadero.com/RADStudio/Berlin/en/Deployment_Manager и http://docwiki.embarcadero.com/RADStudio/Berlin/en/Creating_an_Android_App#Loading_and_Deploying_Files
    Так же есть статья в блоге Андрея Ефимова http://delphifmandroid.blogspot.ru/2014/02/deployment-manager.html
  2. Like
    Roman V отреагировална Kitty в Программа не запускается под Android   
    #include <System.IniFiles.hpp> #include <System.IOUtils.hpp> #include <memory> //**** #ifdef __ANDROID__ String path = System::Ioutils::TPath::Combine(System::Ioutils::TPath::GetSharedDownloadsPath(), L"options.ini"); #elif _Windows String path = System::Ioutils::TPath::Combine(ExtractFilePath(ParamStr(0)), L"options.ini"); #endif if(FileExists(path)) { std::unique_ptr<TIniFile> FileINI(new TIniFile(path)); String ip = FileINI->ReadString(L"HOST", L"ip", L"127.0.0.1"); //**** 1. std::unique_ptr используется чтобы избавиться от delete. std::unique_ptr все делает сам.
    2. Файл ini для Андроида надо сохранить в UTF-8.
  3. Like
    Roman V получил реакцию от Anatoliy в Программа не запускается под Android   
    По сути весь основной код уже сверху написан
    #ifdef __ANDROID__ String path = System::Ioutils::TPath::Combine (System::Ioutils::TPath::GetSharedDownloadsPath(), L"options.ini"); #elif _Windows String path = System::Ioutils::TPath::Combine(ExtractFilePath(ParamStr(0)), L"options.ini"); #endif if (FileExists(path)) { std::unique_ptr <TIniFile> Ini(new TIniFile(path)); String ip = Ini->ReadString(L"HOST", L"ip", L"127.0.0.1"); } int butId; // номер вопроса Далее идет код, который передает данные с ini на кнопки. 
    void __fastcall TForm1::FormShow(TObject *Sender) { Form1->Updated(); Form1->Updating(); Button1->Text = Ini->ReadString(butId, "Ответ1", "Def"); Button2->Text = Ini->ReadString(butId, "Ответ2", "Def"); Button3->Text = Ini->ReadString(butId, "Ответ3", "Def"); Button4->Text = Ini->ReadString(butId, "Ответ4", "Def"); right = StrToInt(Ini->ReadString(butId, "right", "0")); Image1->Bitmap->LoadFromFile("img\\" + IntToStr(butId) + ".jpg"); Label1->Text = butId; } Ну и еще там по мелочи. Все писать не буду. Т.к. в остальном ini не фигурирует.
×
×
  • Создать...