rareMax

Столкнулся с проблемой, которую вовсе не ожидал. Нужно от вектора нарисовать штриховку как на графике ниже. На канве в VCL это можно было сделать так: Canvas.Brush.Style := bsBDiagonal; Canvas.Polygon([Point(30, 30), Point(100, 30), Point(200, 250), Point(30, 250)]); А вот в FMX я заблудился. Не могу найти где можно выставить заливку по диагонали. Если кто знает где теперь это выставляется - помогите. Ну или другой способ как можно нарисовать штриховку. Спасибо.

Спасибо, уже так и сделал. Кому нужно - вот код GitHub. Данные почти точные(получение данных идет стандартным таймером, который не так уж и точный). Чуть позже сделаю более точный вывод значения FPS.

Привет. Как можно узнать сколько кадров в секунду рисует мой компонент? Пытался сделать так: procedure TCoordinatePlane.Paint; var aBM: TStopwatch; begin aBM := TStopwatch.Create; try aBM.Start; inherited Paint; FCells.DrawShape(Self); PaintXY; PaintAllShapes; PaintDebugInfo; aBM.Stop; Canvas.TextOut(0, 20, (1 / aBM.Elapsed.TotalSeconds).ToString); finally // aBM.Free; end; end; Выдает значения довольно разные(В зависимости от масштаба) от 30 .. >1000. Как то не доверяю этим значениям. Можете подсказать как правильно сделать замер FPS?

На данный момент есть только платные решения

Попробуй не нативный TEdit использовать. Твоя проблемма в том - что ос сама заменяет знаки на смайлы "Эмоджи"

Думаю єто не баг, а фича: http://fire-monkey.ru/topic/38-android-ne-poluchaetsia-uvelichit-vysotu-tprogressbar/?hl=progress#entry101

Start RAD Studio with administrator rights to install the library

смотри

Не понятно только чем именно не подошел TArray<SmallInt>. Если вы надеялись воспользоваться связкой Generics и Helpers, то у меня для вас плохие новости

Ничего править не нужно

Привет. Можно ли создать для массива TArray хелперы? Что то типа такого хотелось бы TArrayHelper<T> = record helper for TArray<T> function CountChar(AValue: Char): Integer; end;

UP. Опишите что нужно сделать - что бы можно было подменять контролы редактора.

У меня от этого нереально бомбит! Никакие классы не видит

Заинтриговала паста о том что халявы не будет... Разработчик с СНГ уже несколько версий подряд ломает делфи. И даже если ему станет лень - в любом случае китайцы ломанут...

Нужно получить список вложенных компонентов. Для теста набросал 3 компонента в TGroupBox. Далее вывожу список в TMemo, но почему то присутствует один лишний элемент. Сам вывод идет так: procedure TForm1.Button1Click(Sender: TObject); var i: Integer; begin for i := 0 to GroupBox1.ControlsCount - 1 do Memo1.Lines.Add(i.ToString + ' - ' + GroupBox1.Controls.Items[i].Name) end; Собственно интересно, почему в 0-позиции приходит пустое имя?

Вот вам задачка для самых маленьких. Как думаете - что будет записано в aT, если передать, например, строку: "рОль, в которой винни-пух был на высоте" после этого кода: procedure TvicDBv1.FindAnswer(const Question: string); var I: Integer; aQ, aA, aT: String; begin aT := LowerCase(Question); for I := 0 to fFile.Count - 1 do Begin ...... End; end; Лично я думал что будет записано "роль, в которой винни-пух был на высоте". Но ехидная RAD X выдает следующее: Что за чудеса?

Если ярослав даст адресс RSS для ответов - то будет

для всего есть))

https://telegram.me/FireMonkeyBOT Открываете ссылку. Если не установлен телеграмм - жмите "Get Telegram" Если установлен - жмите "Send Message". После этого откроется телеграмм с ботом форума. Нажмите внизу Start и после этого вам будут приходить новые темы с форума.

Как в результат функции установить значение? Ниже набросок функции которая возвращает массив значений с типом переданным пользователем: function TArrayHelper<T>.Generate(const Count: Integer): TArray<T>; var Info: PTypeInfo; I: Integer; AI: TArray<Integer>; begin Info := System.TypeInfo(T); SetLength(Result, Count); // Для дробных if Info.Kind = TTypeKind.tkFloat then for I := Low(Result) to High(Result) do Result[I] := Random; // Для целых if Info.Kind = TTypeKind.tkInteger then for I := Low(Result) to High(Result) do Result[I] := Random(100); end; Вообще такое можно сделать? Или лучше будет(хотя не мне это не очень то и нравится) сделать что бы возвращала функция массив вариантов: function TArrayHelper<T>.Generate(const Count: Integer): TArray<TValue>; Надеюсь суть вопроса понятна.

Для тех у кого есть телеграмм - бот будет присылать уведомления о новых статьях/темах на форуме Бот: @FireMonkeyBOT Ссылка: https://telegram.me/FireMonkeyBOT

Новый функционал добавится. Может и хтмл просмотр будет сделан))

Cобственно далеко ходить не нужно: http://fire-monkey.ru/topic/270-est-li-vozmozhnost-podkliuchit-gotovye-biblio

Для всех не надо, достаточно последних 50. И есть ли для последних ответов?