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

Delpher-X

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

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

  • Посещение

Весь контент Delpher-X

  1. Итак, как добавить в приложение проверку наличия соединения с Интернетом? Я всегда пользовался кодом: var NetControl : DWORD; begin NetControl := INTERNET_CONNECTION_MODEM + INTERNET_CONNECTION_LAN + INTERNET_CONNECTION_PROXY; Result := InternetGetConnectedState(@NetControl, 0); end; Однако здесь он явно не подходит, так как предназначен для Windows, а меня интересует Android. Я пробовал использовать компонент IdIPWatch, но он все время верещал о том что Интернета нет, несмотря на то что смартфон был вполне подключен к сети.
  2. Любопытно. А будет ли все это работать в Android?
  3. Не, не работает. Приложение все равно отображается в панели задач.
  4. Речь не о том, чтобы убрать главную форму. Речь о том, чтобы ее скрыть, сделать невидимой.
  5. Вопрос: как спрятать главную форму приложения в FMX? В VCL это делается просто - Project>View Source>вписываешь в открывшемся окне Application.ShowMainForm := False, однако в FMX такой фокус не прокатывает, там просто свойства такого нет - ShowMainForm. Как же быть?
  6. Хорошо, а паспортные данные этот самый Google Play требует?
  7. Да, сработало. Благодарю. Не таки уж и азы. Кэп Очевидность напоминает, что "У меня все работает" - говно, а не аргумент.
  8. Извините, но эта конструкция тоже ничего не значит. IDE подчеркивает красным ftBinary после знака := и естественно, программа вылетает при попытке компиляции.
  9. Пытаюсь программно добавить в своем проекте компонент IdFTP: FTPBot : TIdFTP; FTPBot := TIdFTP.Create(); FTPBot.Name := 'FTPGhost'; FTPBot.Passive := True; FTPBot.Host := ''; FTPBot.Username := ''; FTPBot.Password := ''; Код компилируется нормально. Однако, когда я пытаюсь обратиться к свойству TransferType полученного объекта: FTPBot.TransferType.ftBinary; Программа при компиляции вылетает с ошибкой, утверждает что нельзя так писать. В чем дело?
  10. И да, все эти магазины приложений - они требуют от разработчика его паспортные данные? В том числе, Google Play?
  11. Тупой-тупой-тупая, ти-ля-ля-лю-лю!
  12. Как я полагаю, здесь присутствуют люди, которые неоднократно разрабатывали свои приложения для Android и публиковали их в специализированных магазинах приложений. Меня интересует сам процесс - каковы подводные камни? В частности, мне не нравится идея, что я должен покупать у Google аккаунт разработчика - однако, быть может у других магазинов приложений условия подемократичнее? Какой из них вы посоветуете? И да - вроде как у Huawei есть свой магазин приложений и там публикуются все те же Android-приложения, кто что может сказать о нем?
  13. Посмотрел. Там нет никакого StyleObject. а тем более, SourceLookup или SourceLink
  14. Save Project As в ту же папку, где и скопированный проект?
  15. У меня такая проблема. Когда я делаю копию исходного проекта Delphi (Save Project As), то эта копия оказывается связана некой квантово-механической запутанностью, с оригиналом. И все изменения внесенные в одну копию проекта, автоматически оказываются внесены и в другую. Вопрос: как оторвать эти копии друг от друга?
  16. А можно отвечать по существу и не оффтопить?
  17. Я обратил внимание, что если в VCL цвет формы, а также некоторых других компонентов можно менять, то в FMX это сделать нельзя - доступен только дефолтно-серый, во всяком случае, при компиляции под Android. Есть ли какие-то способы это поправить?
  18. Ну data - строковые значения, целочисленные. вещественные.
  19. Это не важно. У меня такая ситуация, что я не могу отсылать TStream'ы. Data могу, а Stream - не проходит.
  20. Тут вот какое дело: я хочу разрезать stream для передачи его по кусочку в формате data. А потом, в точке доставки, снова склеить и перегнать в stream.
  21. Нет, мне нужно именно из потока. А потом, чтобы снова загрузить в поток. Ну, любой файл, это ведь строки бинарного кода, не так ли?
  22. У меня есть следующий код, который передает данные из потока в объект типа TStrings: var F : TMemoryStream; S : TStrings; begin F := TMemoryStream.Create; S := TStringList.Create; F.LoadFromFile('C:/File.jpg'); S.LoadFromStream(F); Из TMemoryStream в TStrings все передается нормально. Однако - как обратно? Как снова преобразовать объект TString в поток данных, дабы снова можно было бы сохранить его в полноценный файл?
  23. Итак, у меня проблема следующего характера. Нужно программно узнать имя диска, на котором находится программа. Допустим, программа лежит по адресу D:/MyFolder/FolderName/Program.exe. Как получить вот эту букву диска - D? Поиск по Интернету, результатов не дал, там только лишь способ сосчитать список доступных дисков в системе, а мне нужно другое - узнать корневое имя диска, на котором собственно нахожусь.
×
×
  • Создать...