AngryOwl

Увеличил количество сообщений с 20 до 30. Предложение хорошее. Сейчас количество ответов в единицу времени уже гораздо больше, чем даже год назад. Так что предложение хорошее.

Как увеличить количество последних сообщений? Это панель на форуме справа.
Фактически это текущий, основной форум, это жизнь форума. 
20 тем это мало, бывает пару дней не появишься, и пропустишь интересные темы уже навсегда. 
Хотя бы 30 надо..
Это еще людей на форуме мало, будет в раза 2-3 больше, - состав последних сообщений будет очень быстро меняться, в результате вероятность что вопрос останется без ответа увеличиться...
 
Еще вопрос как найти свои темы?
 
Зашел в настройки, там не нашел ни того ни другого..
Спасибо.

Вышло обновление до версии 1.5.0:
 - Исправлены переходы в глоссарии
 - Значительно уменьшен размер приложения
 - Настройки автоматической проверки обновлений
 - [Windows] Переработка приложения для Windows
 - [Windows] Добавлены анимации перехода
 - [Windows] Минимальные размеры окна ограничены 800 пикселями по ширине и 600 по высоте
 - [Android] Системная строка подкрашивается в "фирменный" синий во всех режимах работы приложения
 - [Android] Отключена анимация перетаскивания элементов бокового меню
 - [Android] Индикатор загрузки
 - [Android] Навигационная панель больше не перекрывает интерфейс приложения
 - [Android] Исправлена ошибка с сохранением PDF-документа
 - [Android] Увеличена скорость вывода информации и тестирования
 - [Android] Немного изменен внешний вид экрана вывода результата тестирования

Ссылка на скачивание Android-версии: https://yadi.sk/d/edIZR2VuuRFce
Ссылка на скачивание Windows-версии: https://yadi.sk/d/iIeC0OE8ukMoi

Чтобы сделать аналог TLayout в VCL, достаточно унаследоваться от TWinControl
Я так понимаю, вам нужен прозрачный компонент с возможностью держать в себе компоненты?
 
Update: добавил компонент
TLayout Win32.zip

Ой, не надо...
P.S. Ну а "по факту", где-то что-то было подобное.

Ой, не надо...
P.S. Ну а "по факту", где-то что-то было подобное.

У TBitmap есть такой метод, посмотрите его
function TBitmap.EqualsBitmap(const Bitmap: TBitmap): Boolean; var MyMap, BitmapMap: TBitmapData; I: Integer; begin if IsEmpty or Bitmap.IsEmpty then begin Result := IsEmpty and Bitmap.IsEmpty; Exit; end; Result := (Width = Bitmap.Width) and (Height = Bitmap.Height) and (PixelFormat = Bitmap.PixelFormat); if Result then begin if Map(TMapAccess.Read, MyMap) then try if Bitmap.Map(TMapAccess.Read, BitmapMap) then try for I := 0 to Height - 1 do if not CompareMem(MyMap.GetScanline(I), BitmapMap.GetScanline(I), MyMap.BytesPerLine) then begin Result := False; Exit; end; finally Bitmap.Unmap(BitmapMap); end; finally Unmap(MyMap); end; end; end;  

Да. 
constructor Create(AOwner: TComponent); override;  

Мне это видится примерно так:
Отключите автоматическое создание форм.
Сначала создайте Splash-форму (эту можно оставить в автомате). Отобразите ее.
Создайте вашу "главную" форму. В процедуре OnFormCreate сделайте Preload для стиля (тут на форуме это обсуждалось) - это позволит загрузить стиль, отрисовать все и только затем отобразит вашу форму (по крайней мере - отрисовка произойдет мгновенно, проверено на формах с сотнями компонентов).
На OnShow вашей "главной" формы сделайте Application.MainForm := ваша_"главная"_форма
и скройте Splash-форму.
 
З.Ы. И, да - лучше оперировать фреймами и создавать их и удалять только тогда, когда они нужны. На скорость это практически не влияет, даже если у вас меню будут фреймами... Это из личного опыта - все достаточно быстро!

Если не ошибаюсь, то у стандартного стиля для Panel - TRectangle - это и есть весь стиль ))) Потому и не может быть Visible=False )
Так уберите у него заливку, сделав ее прозрачной. И все.

Согласен.
Я, например, делаю либо свой стиль для нужного компонента, либо делаю копию (например от стиля Android), если хочу чтобы выглядело абсолютно одинаково везде.
Можно оставить родной стиль для TPanel, сделав свой стиль, типа panelopacitystyle (и потом задав его вашим панелям, которым требуется именно прозрачность), в котором вы можете изголяться со стилем как вашей душе будет угодно. Заполнять панели чем угодно, хоть картинками... При этом, в чем прелесть, - можно программно менять стиль из приложения при необходимости (например, - реакция на какие-либо события).

Согласен.
Я, например, делаю либо свой стиль для нужного компонента, либо делаю копию (например от стиля Android), если хочу чтобы выглядело абсолютно одинаково везде.
Можно оставить родной стиль для TPanel, сделав свой стиль, типа panelopacitystyle (и потом задав его вашим панелям, которым требуется именно прозрачность), в котором вы можете изголяться со стилем как вашей душе будет угодно. Заполнять панели чем угодно, хоть картинками... При этом, в чем прелесть, - можно программно менять стиль из приложения при необходимости (например, - реакция на какие-либо события).

Полностью согласен. panelstyle - это и есть только один TRectangle. StyleEditor не позволяет его сделать Visible=false. Но можно менять Opacity. Если нужна невидимая панель, то лучше использовать обычный TLayout, который вообще не использует стиль.
Работа с background в TGroupbox зависит от платформы. Посмотрите в редакторе стилей на дефолтный groupboxstyle:
- для платформы Windows: текст, используемый для заголовка группы, расположен на объекте background. Если Вы будете менять видимость или прозрачность background, то текст тоже будет невидимым/прозрачным.
- для платформы Android: текст расположен на отдельном layout. В этом случае изменение видимости/прозрачности background не влияет на отображение текста заголовка.

Если не ошибаюсь, то у стандартного стиля для Panel - TRectangle - это и есть весь стиль ))) Потому и не может быть Visible=False )
Так уберите у него заливку, сделав ее прозрачной. И все.

Это решается редактированием стиля. 
Например так:
1). Размещаете TGroupbox на форме
2). ПКМ на нем
3). в контекстном меню выбираете Edit Custom Style (или Edit Default style)
4). в открывшемся редакторе стиля указываете платформу (Android)
5). выбираете объект background (по умолчанию он белый).
6). задаете ему свойство Visible=false

в FMX все делается с помощью стилей, нужно отредактировать стиль TGroupbox

Прямая ссылка в блог: Автоматическая смена названия приложения в зависимости от языка системы
Ссылка на форуме(Раздел "Статьи"): [Статья][Android] Автоматическая смена названия приложения в зависимости от языка системы
и ещё есть обычные темы по этому вопросу, но прикладывать не буду.
 
p.s. Народ совсем обленился, сложно поиском воспользоваться...

procedure LoadBitmapFromURL(const aURL: string; aBitmap: TBitmap; const aSuccess: TThreadProcedure = nil; const aError: TThreadProcedure = nil); var thread: TThread; begin thread := TThread.CreateAnonymousThread( procedure var HTTP: THTTPClient; Result: TMemoryStream; begin Result := TMemoryStream.Create; HTTP := THTTPClient.Create; try try HTTP.Get(aURL, Result); TThread.Synchronize(TThread.CurrentThread, procedure var aSourceBmp: TBitmap; begin aSourceBmp := TBitmap.Create; try aSourceBmp.LoadFromStream(Result); if not aSourceBmp.IsEmpty then begin aBitmap.SetSize(aSourceBmp.Width, aSourceBmp.Height); aBitmap.CopyFromBitmap(aSourceBmp); if Assigned(aSuccess) then aSuccess; end; finally FreeAndNil(aSourceBmp); end; end); except TThread.Synchronize(TThread.CurrentThread, procedure begin if Assigned(aError) then aError; end); end; finally FreeAndNil(Result); FreeAndNil(HTTP); end; end); thread.FreeOnTerminate := true; thread.start; end; в последнее время пользуюсь такой конструкцией

само скачивание картинки HTTPClient.Get должен быть в потоке, а при успешном скачивании нужно делать синхронизацию с главным потоком и "вставлять" картинку в нужное место

Доработал компонент. Добавлено:
Поддержка Tint эффекта - TfgRatingBar.TintColor Автоматический размер - TfgRatingBar.AutoSize Режим только отображения - TfgRatingBar.ReadOnly Событие окончательного изменения рейтинга (отжатие пальца от экрана или кнопки мышки) - TfgRatingBar.OnChange Событие в процессе изменения рейтинга - TfgRatingBar.OnChanging

Создал 2 тестовых проекта (один VCL, другой FMX). В обоих только форма с кнопкой.
Компилировал из 10 Seattle и 10 Berlin (конфигурация Debug).
Запускал на win 7 и 10.
Задержки в 1-2 сек не наблюдал. На глаз оба проекта запускаются с одинаковой скоростью.
Конфигурация компьютера аналогична Вашей.
https://www.youtube.com/watch?v=5q8ZKiYEWko

Какой стиль используется в XE3 и в 6-10 ?
Если свой не подгружаете, то, думаю, - по умолчанию. Какой объем бинарника получается при компиляции Release в XE3, и какой в 10?
Думаю дело может быть в ресурсах, используемых приложением.

"Пустая и чистая" форма - вовсе не "пустая". В FMX приложении есть ресурсы. Откройте приложение в редакторе ресурсов (например Restorator 2007 или любой другой) и вы увидите содержимое бинарника. Так-что "пустая/чистая форма" - это в VCL, в FMX иначе.

На мобильных это делается с помощью TAniCalculations, в ModernLV есть метод getAniCalc
if ListView1.getAniCalc <> nil then ListView1.getAniCalc.Animation := false; в момент вызова этого кода скроллинг остановится

Мне это видится примерно так:
Отключите автоматическое создание форм.
Сначала создайте Splash-форму (эту можно оставить в автомате). Отобразите ее.
Создайте вашу "главную" форму. В процедуре OnFormCreate сделайте Preload для стиля (тут на форуме это обсуждалось) - это позволит загрузить стиль, отрисовать все и только затем отобразит вашу форму (по крайней мере - отрисовка произойдет мгновенно, проверено на формах с сотнями компонентов).
На OnShow вашей "главной" формы сделайте Application.MainForm := ваша_"главная"_форма
и скройте Splash-форму.
 
З.Ы. И, да - лучше оперировать фреймами и создавать их и удалять только тогда, когда они нужны. На скорость это практически не влияет, даже если у вас меню будут фреймами... Это из личного опыта - все достаточно быстро!