krapotkin

про 4 вычисления параллельно вот тут можно почитать

http://www.proghouse.ru/programming/36-delphi-xe7-ppl

http://docwiki.embarcadero.com/Libraries/Sydney/en/System.Classes.TThread.Suspend

тут читали про Suspend ?? логично же да?

а что за конструкция while true do suspend там вообще?? 

и раз упомянута разрядность, неплохо бы и в типу переменных вникнуть

Специально для этого придумали отдельные потоки. Даже сделали несколько реализаций, которые позволяют не заводить под них отдельный класс, а описывать прямо в коде процедуры, как в javascript

Создайте поток, в нем через Synchronize() изменяйте компоненты, и все заработает

Да скока ж можно отвечать одно и то же

Никакой симулятор не подойдет. это нерабочее решение.

У большинства тут нет реального андроид 11. Но есть инструкции, что и где править, чтобы запускалось.

https://www.google.com/search?client=opera&q=смонтировать+образ+iso+в+windows+10&sourceid=opera&ie=UTF-8&oe=UTF-8

ну. явно установка не удалась. совсем

вот ссылки на образ
ftp://ftpd.embarcadero.com/download/radstudio/10.2/delphicbuilder10_2.iso
http://altd.embarcadero.com/download/radstudio/10.2/delphicbuilder10_2.iso

win 10 позволяет по правой кнопке смонтировать образ как диск. далее все как обычно

ессн сначала зачистить все что вы написали выше. вроде еще в AppData что-то валяется.

поддержу, но в данном случае как раз проблема не в том. лицензия-то есть. и к политике не имеет отношения. она бессрочная.

а это интернет-инсталлер? может, из ISO-шечки попробовать?

кроме того сообщение на скрине не говорит, что не установлены платформы, а лишь - нет того, что ожидает установки

попробуйте чистый проект запустить. Если там появятся нужные платформы, нужно всего лишь поправить руками .dproj

тогда у меня только один выход - самый простой ))

но может кто-то еще откликнется

возможно поможет, если как следует зачистить комп от предыдущих попыток установки

Если чесн, это прямой вопрос в техподдержку. Они очень быстро отвечают, если отвечают.

В свое время я один раз при проблемах с установкой лицензированной версии дождался ответа от ТП, а другой - эммм, как это сказать... не стал )))

опять же насколько я помню, инсталлер спрашивает, есть ли у вас лицензия или слип

и в этот момент его обычно и предъявляют

а просто установить с тем же слипом без копирования папок она что, не дает?

Просто никто на FMX не начинает новые проекты. Сообщество схлопнулось. Все либо сидят на легаси VCL либо мигрировали на другие платформы.

последнее - банально перезагрузить девайс. если не помогло, то и компьютер

не понял, а в чем вопрос-то? смотрим код TCircle и аналогично рисуем TBezier

проблема будет с интерфейсом выбора положения опорных и управляющих точек, но тут можно фантазировать только если знать сам сценарий использования компонента.

я бы лично не стал убиваться и просто использовал готовый компонент TPath

<AndroidSDK>\Tools\monitor.bat

все было хорошо.

пробовал на 10.4.2 и Honor 10X Lite

надо смотреть в логи которые в logCat

в кб текстовые итемы и listBoxItems хранятся раздельно

и видимо, прямая связь - создание итемов по тексту - осталась, а обратная - потерялась в какой то переделке)

ыыыы. углубленное тестирование принесло еще более интересные результаты.

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 тоже появляются.

Общая идея, короче - не переусложнять! ))

10.4.2

клики b1, b2, b1, b2

9 часов назад, gonzales сказал:

не работает(((

точно работает. проверил

это само по себе вредно что-либо без кода делать

когда это перестанет вдруг работать, даже сделать ничего нельзя

эмм
вот вполне рабочий вариант

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;

Вот класс TStream есть и он описан, и я понимаю, о чем речь. Что такое ваша Data - никто не знает кроме вас. А вы не рассказываете