Kitty

А вот на телефоне иконки у всех приложений с кругленными краями, значит углы у них прозрачные. Как это сделано? Спасибо.

В опциях проекта добавлены png прозрачные. Однако на телефоне они в черном квадрате. В андроиде таких проблем нет. Что надо iOS-у для показа прозрачности иконки приложения? Спасибо.

Вопрос решился... В главном модуле формы была функция: bool __fastcall OpenURL(const String &AURL) Внутри модуля другой формы была функция с таким же именем. Переименовала и ошибка пропала...

В процессе работы над проектом возникла ошибка при компиляции, с которой не понятно как бороться. Может кто знает? [ld Error] ld: 1 duplicate symbol for architecture armv7

Интервал таймера по дефолту 1 секунда. Вроде все работает. Вижу диалоговое окно. Слышу аудио файл без искажений... Но если честно, все это похоже, как пишут на форумах, на костыль...

ZuBy, у меня нашлось такое решение, прошу подтвердить или оно правильное или делать как Вы рекомендовали: void __fastcall TForm1::FormShow(TObject *Sender) { TimerStart->Enabled = true; } //таймер 1 секунда void __fastcall TForm1::TimerStartTimer(TObject *Sender) { TimerStart->Enabled = false; TDateTime DataInLogTable = Now(); String FormatDATA = FormatDateTime("dd-mm-yyyy", DataInLogTable); String MES = L"Для Вас " + FormatDATA + L" АКЦИЯ! Жми :)"; CreateMyDialog(MES); }

Вроде бы нашлась проблема и TMediaPlayer вроде не причем.. Мне надо при старте приложения сразу показать диалоговое окно и поэтому код выглядит так: void CreateMyDialog(String MES) { if(FormDialog == NULL) { FormDialog = new TFormDialog(0); FormDialog->Text1->Text = MES; FormDialog->ShowModal(); if(FormDialog != NULL) { delete FormDialog; FormDialog = NULL; } } } void __fastcall TForm1::FormShow(TObject *Sender) { //показать другую форму-диалог которая имитирует уведомление //если закомментировать этот код, то приложение стартует нормально TDateTime DataInLogTable = Now(); String FormatDATA = FormatDateTime("dd-mm-yyyy", DataInLogTable); String MES = L"Для Вас " + FormatDATA + L" діє АКЦІЯ! Жми :)"; CreateMyDialog(MES); } Т.е. из FormShow основного окна я пытаюсь показать окно-диалог и все умирает. Таким образом мне при старте программы нужно сразу показать окно-диалог. Как правильно? Получается мой вопрос трансформируется в следующее: Как при старте программы iOS показать окно-диалог и с проигрыванием звука?

Хорошо бы. Спасибо.

После добавления TMediaPlayer приложение iOS iPhone 5 стало замирать при старте на заставке. Удалила TMediaPlayer проблема осталась... Может кто сталкивался?

Через интенты не удалось отправить письмо c вложением: #include <FMX.Helpers.Android.hpp> void __fastcall TFormServis::Button3Click(TObject *Sender) { Button3->Enabled = false; Application->ProcessMessages(); _di_JIntent intent; //intent = new TJIntent; // <-- erorr no viable overloaded '=' intent = TJIntent::JavaClass->init(); intent->setAction(TJIntent::JavaClass->ACTION_SENDTO); intent->setData(StrToJURI(L"mailto:" + String("lenailicheva@yandex.ru"))); // or: intent = TJIntent::JavaClass->init(TJIntent::JavaClass->ACTION_SENDTO, StrToJURI(L"mailto:" + address)); intent->setFlags(TJIntent::JavaClass->FLAG_ACTIVITY_NEW_TASK); intent->putExtra(TJIntent::JavaClass->EXTRA_SUBJECT, StringToJString(L"Тест")); intent->setType(StringToJString(L"message/rfc822")); String path = System::Ioutils::TPath::Combine(System::Ioutils::TPath::GetDocumentsPath(), L"mikros.s3db"); if(FileExists(path)) { _di_JFile AttachmentFile = TJFile::JavaClass->init(StringToJString(path)); _di_Jnet_Uri Uri = TJnet_Uri::JavaClass->fromFile(AttachmentFile); intent->putExtra(TJIntent::JavaClass->EXTRA_STREAM, TJParcelable::Wrap(((_di_ILocalObject)Uri)->GetObjectID())); } SharedActivity()->startActivity(intent); Button3->Enabled = true; } ERROR: android.content.ActivityNotFoundExcrption: No Activity found to handle Intent {act=abdroid.intent.action.SendTO typ=message/rfc822 flg=0x10000000(has extras)}.

Удалось победить. 1. Привела внешний вид формы iOS как у ZuBy: http://fire-monkey.ru/topic/2669-диалоговое-окно-на-андроид/#comment-15282 2. Перевела в опциях проекта форму диалог в Available forms. 3. И вызов: void CreateMyDialog(String MES) { if(FormDialog == NULL) { FormDialog = new TFormDialog(0); FormDialog->Text1->Text = MES; FormDialog->ShowModal(); if(FormDialog != NULL) { delete FormDialog; FormDialog = NULL; } } } //вход в зону маячка void __fastcall TForm1::Beacon1BeaconEnter(TObject * const Sender, IBeacon * const ABeacon, const TBeaconList CurrentBeaconList) { Word Major = ABeacon->GetMajor(); Word Minor = ABeacon->GetMinor(); if(Major != 10 || Minor != 1) { return; } String MES = L"fire-monkey.ru"; CreateMyDialog(MES); } Теперь закрывается одним щелчком...

Выяснилось, что если вызвать форму диалога из события нажатия кнопки, то форма диалога затем нормально закрывается - одним щелчком. Если вызвать создание формы в событии Beacon1BeaconEnter, то чтобы закрыть затем эту форму диалога надо щелкать два раза. С чем это может быть связано?

Как в iOS при показе своего диалога-окна проиграть звук в момент появления этого окна? Можно ли вызвать стандартный звук уведомления? Спасибо.

Создала свое диалоговое окно из прозрачной формы. Посередине лайаут с ректенглом и на нем две кнопки. Вызываю этот окно-диалог из главной формы: //показать форму диалог в событии TForm1::Beacon1BeaconEnter FormDialog = new TFormDialog(this); FormDialog->Label1->Text = L"fire-monkey.ru"; FormDialog->Show(); В коде формы диалога: void __fastcall TFormDialog::FormShow(TObject *Sender) { Button1->SetFocus(); } //--------------------------------------------------------------------------- void __fastcall TFormDialog::Button2Click(TObject *Sender) { Close(); } Так вот чтобы сработало событие закрытие формы при нажатии Button2 надо нажать на кнопку дважды. При первом нажатии форма оживает и при втором нажатии на кнопку уже срабатывает закрытие формы. Как сделать чтобы после показа формы достаточно было закрыть ее одним щелчком по кнопке, а не двумя?

Прошу прощения все работает.

А до апдейте не пробовала, поэтому не знаю.

Удалила, перегрузила. Теперь как на картинке. Не помогло.

Тестировалось с помощью стандартного примера: C:\Users\Public\Documents\Embarcadero\Studio\18.0\Samples\CPP\Multi-Device Samples\Device Sensors and Services\Bluetooth\Beacons\Simple Beacon Demo События не происходят.

Деплой работает.

TBeacon не работает в iOS. События входа-выхода в зону Beacon1BeaconEnter-Beacon1BeaconExit не происходят. Технологию Beacon придумала apple, вроде как родное. В студии не работает этот функционал...

Не поняла о каких проблемах идет речь? Установила, работает. Функционал стандартных примеров не работает.

Здравствуйте. Попробовала Ваш пример. При нажатии на кнопку приложение упало. Стенд: Windows 7 RAD Berlin Up1 -> MacBook Pro OS XEI Capitan 10.11.6 -> iPhone 5 Вот, что я вижу в опциях SDK. Может тут что-то не так?

У меня iPhone 5 (10.0.2). Падает при использовании камеры и при попытке открыть галерею. Весь код из стандартных примеров. У меня Берлин с апдейт 1.

Забыла добавить - у меня iPhone 5 (10.0.2). Берлин апдейт 1.

Ура! Извините за восторг, просто думала что это С++ виноват. Теперь мы все в одной лодке под названием Титаник. P.S. Или Вы не паскаль тестировали?