
https://youtu.be/hdOmqhATKIY
(Это уже тест на реальном устройстве под управлением ОС Андроид )
Неплохо, но скорость все равно не очень радует, так что нужно будет пробовать сделать "OpenGL версию".
Модератор: Модераторы

можешь дальше исправлять и получить выхлоп в этих местах в два а то и более раза.
1. Разумеется, я прекрасно понимаю, что причина выравнивания в оптимизации, но текущий код я пока вообще не оптимизировал (возможно, об этом позаботились его изначальные авторы (основу брал в примере из Hiasm, хотя, возможно, что это была далеко не первая его реализация), но сейчас я особо снова в этот код не вникал), к тому же вычисления с плавающей точкой требуют оптимизаций, отличных от целочисленных ухищрений.Seenkao писал(а): 05.07.2026 14:41:49можешь дальше исправлять и получить выхлоп в этих местах в два а то и более раза.
Почитать можешь здесь, при чём всю тему. Полезное пишут.
У меня работает только laz4android 2.0.12...Seenkao писал(а): 05.07.2026 21:02:10 Tools -> [LAMW] Android Module Wizard -> Build Released Signed...
А вообще, создавая новый проект, он вроде без отладки идёт.
Идет то может быть без отладки но apk собирает только такие......создавая новый проект, он вроде без отладки идёт.
Упс! Действительно есть такое. Спасибо! ПопробуюTools -> [LAMW] Android Module Wizard -> Build Released Signed...

Я уже кидал тебе ссылку. Дополнительно в файле androidwidget найди строчку (функцию) procedure TAndroidWidget.SetBounds(NewLeft, NewTop, NewWidth, NewHeight: integer); и замени её код:
Код: Выделить всё
procedure TAndroidWidget.SetBounds(NewLeft, NewTop, NewWidth, NewHeight: integer);
begin
// 18/06/2026: Lazarus 4.x up bug fix
// In Lazarus 4.0 and above, if we add a component by double clicking,
// it doesn't appear because it has a width=0, height=0 size.
if (csDesigning in ComponentState) then
begin
if NewWidth=0 then NewWidth:=100;
if NewHeight=0 then NewHeight:=40;
end;
if (Left=NewLeft) and (Top=NewTop) and (Width=NewWidth) and (Height=NewHeight) then Exit;
FLeft:=NewLeft;
FTop:=NewTop;
FWidth:=NewWidth;
FHeight:=NewHeight;
if (csDesigning in ComponentState) then
if Assigned(Parent) then
Parent.Invalidate
end;Спасибо я попробовал но что-то у меня пошло сильно не так пошло ( пришлось открывается к архивной копии впрочем возможно это жара так повлияла ( пару раз успел заметить заметил что монитор ресурсов показывал резкий разгон и скачек температуры встроенной видеокарты (читай ядра CPU) выше 100 градусов после чего система разумеется моментально влетала в перегрузку ( похоже эмулятор кривой))Seenkao писал(а): 05.07.2026 21:32:02 Я уже кидал тебе ссылку. Дополнительно в файле androidwidget найди строчку (функцию) procedure TAndroidWidget.SetBounds(NewLeft, NewTop, NewWidth, NewHeight: integer); и замени её код: