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

krapotkin

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

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

  • Посещение

  • Победитель дней

    209

Весь контент krapotkin

  1. про 4 вычисления параллельно вот тут можно почитать http://www.proghouse.ru/programming/36-delphi-xe7-ppl
  2. http://docwiki.embarcadero.com/Libraries/Sydney/en/System.Classes.TThread.Suspend тут читали про Suspend ?? логично же да?
  3. а что за конструкция while true do suspend там вообще?? и раз упомянута разрядность, неплохо бы и в типу переменных вникнуть
  4. Специально для этого придумали отдельные потоки. Даже сделали несколько реализаций, которые позволяют не заводить под них отдельный класс, а описывать прямо в коде процедуры, как в javascript Создайте поток, в нем через Synchronize() изменяйте компоненты, и все заработает
  5. Да скока ж можно отвечать одно и то же Никакой симулятор не подойдет. это нерабочее решение. У большинства тут нет реального андроид 11. Но есть инструкции, что и где править, чтобы запускалось.
  6. https://www.google.com/search?client=opera&q=смонтировать+образ+iso+в+windows+10&sourceid=opera&ie=UTF-8&oe=UTF-8
  7. ну. явно установка не удалась. совсем вот ссылки на образ ftp://ftpd.embarcadero.com/download/radstudio/10.2/delphicbuilder10_2.isohttp://altd.embarcadero.com/download/radstudio/10.2/delphicbuilder10_2.iso win 10 позволяет по правой кнопке смонтировать образ как диск. далее все как обычно ессн сначала зачистить все что вы написали выше. вроде еще в AppData что-то валяется.
  8. поддержу, но в данном случае как раз проблема не в том. лицензия-то есть. и к политике не имеет отношения. она бессрочная. а это интернет-инсталлер? может, из ISO-шечки попробовать? кроме того сообщение на скрине не говорит, что не установлены платформы, а лишь - нет того, что ожидает установки попробуйте чистый проект запустить. Если там появятся нужные платформы, нужно всего лишь поправить руками .dproj
  9. тогда у меня только один выход - самый простой )) но может кто-то еще откликнется
  10. возможно поможет, если как следует зачистить комп от предыдущих попыток установки
  11. Если чесн, это прямой вопрос в техподдержку. Они очень быстро отвечают, если отвечают. В свое время я один раз при проблемах с установкой лицензированной версии дождался ответа от ТП, а другой - эммм, как это сказать... не стал )))
  12. опять же насколько я помню, инсталлер спрашивает, есть ли у вас лицензия или слип и в этот момент его обычно и предъявляют
  13. а просто установить с тем же слипом без копирования папок она что, не дает?
  14. Просто никто на FMX не начинает новые проекты. Сообщество схлопнулось. Все либо сидят на легаси VCL либо мигрировали на другие платформы.
  15. последнее - банально перезагрузить девайс. если не помогло, то и компьютер
  16. не понял, а в чем вопрос-то? смотрим код TCircle и аналогично рисуем TBezier проблема будет с интерфейсом выбора положения опорных и управляющих точек, но тут можно фантазировать только если знать сам сценарий использования компонента. я бы лично не стал убиваться и просто использовал готовый компонент TPath
  17. все было хорошо. пробовал на 10.4.2 и Honor 10X Lite надо смотреть в логи которые в logCat
  18. в кб текстовые итемы и listBoxItems хранятся раздельно и видимо, прямая связь - создание итемов по тексту - осталась, а обратная - потерялась в какой то переделке)
  19. ыыыы. углубленное тестирование принесло еще более интересные результаты. b1 - открыть кб - b2 : в выпадающем списке действительно нет 3 и 4 но если просто в кб стрелками вверх-вниз, то 3 и 4 появляются! )) короче, все решаем просто. как в родном VCL procedure TForm1.b2Click(Sender: TObject); var i: integer; begin for i := 3 to 4 do begin cbb1.items.add(inttostr(i)); end; end; кстати, после этого и "скрытые" 1 2 тоже появляются. Общая идея, короче - не переусложнять! ))
  20. 10.4.2 клики b1, b2, b1, b2
  21. точно работает. проверил
  22. это само по себе вредно что-либо без кода делать когда это перестанет вдруг работать, даже сделать ничего нельзя
  23. эмм вот вполне рабочий вариант procedure TForm1.b1Click(Sender: TObject); var item: tlistboxitem; i: integer; begin for i := 1 to 2 do begin item := tlistboxitem.Create(nil); item.Text := inttostr(i); cbb1.ListBox.AddObject(item); end; end; procedure TForm1.b2Click(Sender: TObject); var item: tlistboxitem; i: integer; begin for i := 3 to 4 do begin item := tlistboxitem.Create(nil); item.Text := inttostr(i); cbb1.ListBox.AddObject(item); end; end;
  24. Вот класс TStream есть и он описан, и я понимаю, о чем речь. Что такое ваша Data - никто не знает кроме вас. А вы не рассказываете
×
×
  • Создать...