-
Постов
255 -
Зарегистрирован
-
Посещение
-
Победитель дней
13
Активность репутации
-
FREEFAR получил реакцию от Rusland в Что невозможно сделать на Delphi для Android?
Про красиво - вот наш прототип. Более менее UFriendly
-
FREEFAR получил реакцию от Alisson R Oliveira в Концепция интерфейса приложения для Андроида
Например так
uses FMX.Ani
Frame.Position.X := clientWidth;
TAnimator.AnimateFloat(Frame, 'Position.X', 0, 0.2);
ну понятно что предварительно этот фрей привести к росту/весу основных окон или вписанных областей
-
FREEFAR получил реакцию от Равиль Зарипов (ZuBy) в Что невозможно сделать на Delphi для Android?
Равиль, безмерно благодарен за ZMaterial. Они очень помогли сделать интерфейсы более красивыми.
Вот с ModernLV пока не подружился, но понимаю что без него не обойдется
-
FREEFAR отреагировална ENERGY в Как нарисовать круглый TImage
С помощью маски можно любую форму.TBitmap.CreateFromBitmapAndMask().
В результате получим изображение с прозрачностью, в данном случае звезда и прозрачный фон.
procedure TForm1.Button1Click(Sender: TObject); var ImageRes: TResourceStream; Result: TBitmap; tmpMS : TMemoryStream; begin ImageRes := TResourceStream.Create(HInstance, 'IMAGE', RT_RCDATA); try Image1.Bitmap.CreateFromStream(ImageRes); Image2.Bitmap.LoadFromFile('c:\temp\MaskedBitmap\Images\Mask.png'); Result := TBitmap.Create; Result.CreateFromBitmapAndMask(Image1.Bitmap, Image2.Bitmap); // applying alpha channel to Bitmap - workaround. If you can improve write here how tmpMS := TMemoryStream.Create; Result.SaveToStream(tmpMS); Result.LoadFromStream(tmpMS); tmpMS.Free; Image3.Bitmap.Assign(Result); finally ImageRes.Free; Result.Free; end; end;
MaskedBitmap.zip
-
FREEFAR отреагировална Равиль Зарипов (ZuBy) в Запрос через proxy
http://docwiki.embarcadero.com/RADStudio/Tokyo/en/Using_an_HTTP_Client
NetHTTPClient1.ProxySettings := TProxySettings.Create('192.168.1.1', 8080, 'MyUserName', 'MyPassword');
-
FREEFAR отреагировална Равиль Зарипов (ZuBy) в Порядковый номер динамического Image
так у тебя присвоение события (OnClick) смотри где стоит)
-
FREEFAR получил реакцию от Равиль Зарипов (ZuBy) в Загрузка в потоке возможно ли ?
Я думаю многие когда-то думали , что если разом загрузить все СтоПятьсот записей то все будет хорошо. Увы.
Я бы предложил sqllite + listview с динамической подгрузкой при проходе вниз на n-элементов. Поиск организовать выборкой из бд + перерисовка.
Такой вариант не подошёл?
-
FREEFAR отреагировална Равиль Зарипов (ZuBy) в Что невозможно сделать на Delphi для Android?
Можно делать красиво, но например со списками дела скудные. Чтобы делать красиво, пришлось внести корректировки в ЛВ, так и появился ModernLV.
Сейчас на нем делают сумасшедшие вещи,
фмх не очень хорошо работает с кешированием стиля, из-за это списки на ЛБ или на скролбоксе дикий ужас
-
FREEFAR получил реакцию от МихаилЪ чайковЪ в Что невозможно сделать на Delphi для Android?
Про красиво - вот наш прототип. Более менее UFriendly
-
FREEFAR получил реакцию от Равиль Зарипов (ZuBy) в Что невозможно сделать на Delphi для Android?
На мой взгляд самая главное преимущество натива- производительность. Отсюда же охват парка устройств выше
-
FREEFAR отреагировална ENERGY в Что невозможно сделать на Delphi для Android?
Да конечно можно сделать красиво на FMX. просто народу влом разбираться с дизайном.
Тем более Android стиль сам по себе очень упрощен - прямоугольные кнопки, плоские иконки, минимум деталей.
-
FREEFAR получил реакцию от Равиль Зарипов (ZuBy) в Что невозможно сделать на Delphi для Android?
Про красиво - вот наш прототип. Более менее UFriendly
-
FREEFAR получил реакцию от ENERGY в Что невозможно сделать на Delphi для Android?
А что на фмх нельзя сделать красиво ?
-
FREEFAR получил реакцию от x11 в Что невозможно сделать на Delphi для Android?
В андроиде нет пока вроде. На иос да
-
FREEFAR отреагировална Ingalime в Что невозможно сделать на Delphi для Android?
Если, главный модератор и разработчик, Равиль Зарипов, говорит, что у дельфи нет будущего и надо уходить с Дельфи. То это диагноз FMX на сегодняшний день. Грустно...
-
FREEFAR получил реакцию от gonzales в #13#10 Не убрать перенос строки на Android
Попробуй заменить slinebreak на нужный символ. В твоём случае на пробел вроде
-
FREEFAR получил реакцию от S_007 в Сортировка FDTable
Наличие индекса не обязательно - работает и так. А вот пробел между именем поля и "направлением" сортировки действительно надо без проблема. Ссори - не указал это
-
FREEFAR получил реакцию от S_007 в Сортировка FDTable
дополню немного
FDTable.IndexFieldNames := 'имя поля :A'; ASC
FDTable.IndexFieldNames := 'имя поля :D'; DESC
-
FREEFAR получил реакцию от МихаилЪ чайковЪ в -=ЗАКАЗ=- [Delphi Tokyo][Android] Приложение со SQlite и Сервис
"Сервис должен грамотно делать запросы к серверу как положено в Андроид приложениях. " Просто улыбнуло....)))
-
FREEFAR получил реакцию от mazayhin в -=ЗАКАЗ=- [Delphi Tokyo][Android] Приложение со SQlite и Сервис
"Сервис должен грамотно делать запросы к серверу как положено в Андроид приложениях. " Просто улыбнуло....)))
-
FREEFAR отреагировална Akad в Асинхронный NetHTTPClient
Делаем отдельный поток, в нём пул http клиентов (array of). Ну и добавляем запрос через lock, успешный запрос обрабатываем через Synchronize.
Или делаем отдельный класс-наследник TThread, опять array of и запускаем в каждом экземпляре обращение к сайту в нужный момент. Возврат значения через callback или Synchronize. Только в этом случае надо не забывать удалять ресурсы завершившихся потоков в главном.
-
FREEFAR отреагировална x11 в OrangeUI
У FMXComponents есть тоже слайдер.
http://fire-monkey.ru/topic/4666-fmxcomponents/
К сожалению OrangeUI без исходников и нет версии для Tokyo, но компонент гараздо больше.
У FMXComponents есть классный Label, который прокручивает текст/строку с разной анимацией. Ну и компонент значительно меньше, зато есть исходники и версия для Tokyo.
-
-
-
FREEFAR получил реакцию от Brovin Yaroslav в Убить поток TThread кроссплатформено
Если я не прав поправят, но я делаю так
uses Threading;
var
GetCodeTask: ITask;
GetCodeTask := TTask.Create(
procedure
begin
...
end);
if GetCodeTask <> nil then
if GetCodeTask.Status = TTaskStatus.Running then
GetCodeTask.Cancel;