Лидеры

Название: Слесарное дело Платформа: Android, Windows, macOS Устройство: ПК, смартфон, планшет Разрешение экрана: любое Ссылки на скачивание Windows-версии: https://yadi.sk/d/iIeC0OE8ukMoi Ссылка на скачивание macOS-версии: https://yadi.sk/d/wBpoFcKe3LgiKx Google Play: https://play.google.com/store/apps/details?id=com.sinukeapps.locksmithery Описание: Приложение представляет собой электронный конспект по слесарному делу, с помощью которого можно самостоятельно подготовится к занятиям. В него включены 16 тем, поделённые на блоки. Для каждой темы разработаны тесты для самоконтроля. В приложении имеется глоссарий для быстрого поиска по основным понятиям, а также возможность экспорта материалов в текстовый PDF-формат для дальнейшей печати.

Здравствуйте. Есть один вариант с использованием TBitmapListAnimation: Кидаем обычный TImage на форму. Под TImage создаём TBitmapListAnimation. Структура должна выглядеть так: В свойствах TBitmapListAnimation: AnimationBitmap - загружаем ленту картинок. Например: Для коротких Gif -ок можно использовать онлайн конверторы: http://ezgif.com/split - разделение Gif на отдельные фреймы (картинки) http://www.photojoiner.net/merge-photos/editor/# - соединение нескольких картинок в одну (соединяет до 8 штук) AnimationCount - сколько раздельных картинок в нашей объеденённой по горизонтали (в нашем слечае 8) AnimationRowCount - сколько рядов в нашей картинке (в нашем случае 1) Enabled = True Duration - указываем промежуток времени, которое должна занимать гифка (в секундах). PropertyName - прописываем Bitmap

Type TSomeClass = Class Private Class Var back_pressed:int64; public Procedure onBackPressed();Override; End; TSomeClass.onBackPressed(); Begin if (TSomeClass.back_pressed + 2000) > System.currentTimeMillis then Begin super.onBackPressed(); End else Begin Toast.makeText(getBaseContext(), 'Нажмите еще раз для выхода', Toast.LENGTH_SHORT).show(); End; TSomeClass.back_pressed := System.currentTimeMillis(); End; Ну если чисто синтаксически - то как то так ----------- О, уже ответили, сорян, не видел

что то типа глобальная back_pressed = 0; //uses DateUtils if (back_pressed + 2000) > MilliSecondOfTheDay(now) then Close else ShowMessage('Нажмите еще раз для выхода'); back_pressed := MilliSecondOfTheDay(now);

if backPressedTime=0 then begin backPressedTime := now(); end else if (secondSpan(now, backpressedTime)<3) then begin doExit(); end else backPressedTime:=0; в общих чертах как-то так

http://delphihtmlcomponents.com/

У них сейчас еще одна замечательная акция - Delphi 10.1 Berlin Professional Обновление Named (Upgrade) + Bonus Pack + Mobile Add-on Pack в подарок до 15.09.2016 Я воспользовался. Хватит уже сидеть на XE8, вливаюсь в ряды берлинщиков :-) Бонус пак кстати приятный - Konopka Signature VCL Controls, Radiant Shapes, VCL & FireMonkey Premium Styles и Marco Cantu’s Object Pascal handbook. Не знаю пригодится ли Konopka и Radiant, но книгу как раз в отпуске на море буду читать.

За то, можно получить доступ к сообществу. Terms and Conditions: Offer valid from August 22nd 2016 to September 9th 2016 Only one license per order Only one license per email address / account This offer does not include any upgrade subscription We reserve the right to change this offer at any time Offer void where prohibited by law

лучше сделать основную форму с мультивью а остальные либо должны являться простым "как бы модальным" диалогом, либо фреймом. при выборе в меню выводим этот фрейм в поле основной формы

У меня тоже почему то combobox не выпадает при нажатии на него курсором мыши. Колесиком перелистывает, а список не выпадает. Причем не работает только тогда когда подключаешь сторонние стили через StyleBook(Например из 30491_firemonkey_premium_styles_pack для Rad Studio Berlin 10.1). Проект создавал MultiDevices, а не VLC. Запись видео с экрана