Steepe_Hare

Хорошо, спасибо

Извините, у меня с английским плохо((

Походил с компа по смартфону и обратил внимание, что мои Android-приложения создают свои подпапки в папках Android\data и Android\obb (без моего ведома). Подпапки носят названия: com.embarcadero.[Название проекта в Delphi] и ничего не содержат. В папке Android\data создается внутри com.embarcadero.[Название проекта в Delphi] еще одна подпапка под названием files (тоже пустая). Зачем они и как изменить их названия (com.embarcadero)? И еще такой вопрос. Через Project/Delployment добавил mp3-файл (в RemotePath стоит .\). mp3-файл в Винде лежал в одной папке с проектом. Куда он скопировался при установке на Android и почему я из программы не могу его проиграть таким кодом: if (MediaPlayer1.State = TMediaState.Playing) then MediaPlayer1.Stop else begin FName := TPath.GetDocumentsPath + PathDelim + '1.mp3'; MediaPlayer1.FileName := FName; MediaPlayer1.Play; end; И наконец такой вопрос: если настройки приложения хранить в ini-файлах, то куда они (ini-файлы) по умолчанию сохраняются?

Да, про Андроид. Заметил странное поведение компонента TLocationSensor. Вот код: LocationSensor1.Active := True; Lat := LocationSensor1.Sensor.Latitude; Long := LocationSensor1.Sensor.Longitude; Memo1.Lines.Add('Longitude ' + FloatToStr(Long) + ', Latitude ' + FloatToStr(Lat)); При первом нажатии кнопки показывается NAN и NAN. После второго показываются корректные значения. Как лечить?

Здравствуйте, господа! Как узнать средствами Delphi Longitude и Latitude места, где находишься? Нужно ли подключать специальные сервисы для этого (google, yandex)?

Скажите, как реализовать на TImage эффект падающего снега (Firemonkey)? Спасибо заранее.

Но всё равно - как сделать персонажа, который появлялся бы и давал советы (и текст был бы как balloon)

Скажите, пожалуйста, есть ли такой компонент для Firemonkey типа Скрепки-помощника в MS Offce? Персонаж бы появлялся и давал юзеру советы.

Подскажите, а есть ли графическая библиотека для Firemonkey наподобие GLScene для VCL? Спасибо заранее.

Здравствуйте! Стоит задача проиграть мелодию из ресурса (на андроиде). На просторах Инета нашел такое решение http://codeverge.com/embarcadero.delphi.firemonkey/tmediaplayer-and-resource-files/1059748 Надо создать класс от TMedia и реализовать там методы (а также класс, производный от TCustomMediaCodec, но до этого я еще не дошел). Я споткнулся на реализации: type TMyResourceMedia = class(TMedia) private FPlayer: JMediaPlayer; JMediaPlayer сидит в модуле Androidapi.JNI.Media.pas, но Delphi его не находит. Надо ли указывать в настройках путь до "C:\Program Files\Embarcadero\Studio\18.0\source\rtl\android\Androidapi.JNI.Media.pas" или до "C:\Program Files\Embarcadero\Studio\18.0\lib\android\release\Androidapi.JNI.Media.dcu" ? Что-то боязно за генофонд Delphi

Много ли кушает памяти Android-приложение, у которого TabControl с множеством вкладок, на которых много контролей, но TabPosition = None и пользователю видна только одна вкладка?

Посоветуйте, пожалуйста, простой пример, как из Android-программы отослать определенные данные на сервер, а там, на сервере (PHP?), добавить их в базу и обновить список.

Еще был бы пример... Никогда подобным не занимался

Сохранения в avi там нет(

Скажите, а почему нельзя передать TBitmap объектам TJPEGImage и TgifImage? Frame := gif.Add(Bitmap1); JPEGImage.Assign(Bitmap1); Получаю ошибки Project Project1.exe raised exception class GIFException with message 'Object type not supported for operation'. Project Project1.exe raised exception class EConvertError with message 'Cannot assign a TBitmap to a TJPEGImage'. Можно как-то конвертнуть? Спасибо заранее.

менеджер событий - это один таймер на все события? но Interval же у всех разный

Скажите, пожалуйста, а возможно ли создать avi или видео в другом формате из bmp-картинок и как? Помню, что для VCL был компонент TAviWriter

Я и пытаюсь так Разве MyBitmap.BoundsF и MyRect := TRectF.Create(TPointF.Create(100, 100), TPointF.Create(100 + MyBitmap.Width, 100 + MyBitmap.Height)) имеют разные размеры?

Я справку не покидаю в последнее время, если честно. Мне хотелось бы, чтобы DrawBitmap вывел на канвасе картинку такой, какая она есть, без scale и без вытягивания. Это возможно?

Спасибо за ответ. А почему картинка с голубем получается вытянутой по высоте? procedure TForm1.Button1Click(Sender: TObject); var MyBitmap: TBitmap; MyRect: TRectF; begin if OpenDialog1.Execute then begin MyBitmap := TBitmap.CreateFromFile(OpenDialog1.Files[0]); MyRect := TRectF.Create(TPointF.Create(100, 100), TPointF.Create(100 + MyBitmap.Width, 100 + MyBitmap.Height)); Image1.Bitmap.Canvas.BeginScene; Image1.Bitmap.Canvas.DrawBitmap(MyBitmap, MyBitmap.BoundsF, MyRect, 1); Image1.Bitmap.Canvas.EndScene; MyBitmap.Free; end; end;

Вот. Спасибо заранее 03.zip

Так теперь у меня Image1.Bitmap не пустой, в него загружена в дизайн-тайме картинка (фон). Но DrawBitmap не рисует голубя из bmp-файла, то есть рисует, но некорректно

Вот он, 70 на 70 (в zip-файле) if OpenDialog1.Execute then begin // Image1.Bitmap.SetSize(Round(Image1.Width), Round(Image1.Height)); MyBitmap := TBitmap.CreateFromFile(OpenDialog1.Files[0]); MyRect := TRectF.Create(50, 30, 120, 100); Image1.Bitmap.Canvas.BeginScene; Image1.Bitmap.Canvas.DrawBitmap(MyBitmap, MyRect, MyRect, 1); Image1.Bitmap.Canvas.EndScene; MyBitmap.Free; end; golub.zip

Не помогло. Такое ощущение, что MyBitmap не все bmp-файлы принимает

Но выбранный bmp-файл корректен и просматривается в Проводнике