enatechno

AND ((FieldDate<=D2) OR (D2 IS NULL))

Видео (Task, Future, Parallel, WaitForAll etc.) 
и на русском

У нас тоже печать через базу данных. Отличие от описанного варианта только в том что база удаленная, а служба печати может быть установлена на любом клиентском компе с Windows, с которого и идет печать на любой принтер доступный с этого клиентского компа. При этом на клиенте служба может быть настроена для выбора только определенных заданий печати (например задания только определенного отдела или задания отправленные только с определенных терминалов).

Потому что это служебное поле, за которое объект-владелец не в ответе. Для иного вы можете использовать Image2.AddObject() - в этом случае Image2 будет знать о своих "детях" (Image2.Children в количестве Image2.ChildrenCount) и при самоубийстве покарает и детей. А в случае TagObject он проигнорирует содержащийся там объект  и возникнет утечка памяти. Воспринимайте TagObject как средство хранения ссылки на реально существующий в приложении объект, а не как место хранения самого объекта.

Ваша ошибка, что вы пытаетесь перевести текущий текст, который отображается. Нужно переводить английский (английские слова как бы являются индексом для перевода). В этом случае TransManually не нужен. Например вместо MenuItemFile.Text := TransManually(MenuItemFile.Text); нужно писать:
MenuItemFile.Text := Translate('File'); Или более простой способ, задать один раз (например в Create):
 
MenuItemFile.AutoTranslate := true;  

Похоже первый hotfix . 
 


 

Похоже первый hotfix . 
 


 

Похоже первый hotfix . 
 


 

Похоже первый hotfix . 
 


 

картинку желательно не загружать в базу а складывать в папку на сервере (и лучше всего сжать до нужных размеров) и в базу вписать лишь путь до файла
вот мануалчик на пхп
http://php.net/manual/ru/features.file-upload.post-method.php
на delphi это просто составляем POST запрос
aURL - путь до скрипта, который будет принимать файлы aFileName - полный путь до файла, который нужно отправить var aData: TMultipartFormData; aHTTP: THTTPClient; aResp: TStringStream; begin aResp := TStringStream.Create('', aEncoding); aData := TMultipartFormData.Create(); aHTTP := THTTPClient.Create; try try aData.AddFile('image', aFileName); // на php считываем по полю image aHTTP.Post(aURL, aData, aResp); Result := aResp.DataString; // тут скрипт должен что-то вернуть о успешном принятии except Result := TmyHTTPClient.ERROR_COMMON; // генерация своей ошибки, если что-то пошло не так end; finally FreeAndNil(aHTTP); FreeAndNil(aData); FreeAndNil(aResp); end;  

Ссылка: http://delphifmandroid.blogspot.ru/2017/04/onrequestpermissionsresult.html
Автор: Андрей Ефимов
Описание:

Покажите скриншот из консоли разработчика, вот как у меня, тогда будет проще понять. И файл манифеста из деплоя. Так же обратите внимание - если у вас, в консоли разработчика, в описании приложения, не загружен скриншот для планшетных ПК, то гугль может все планшеты отнести к не поддерживаемым устройствам.

Побуду в роли кэп'а ещё немного...
 
Кто-то плохо изучил матчасть :http://docwiki.embarcadero.com/RADStudio/Berlin/en/Preparing_an_Android_Application_for_Deployment#Customizing_Your_AndroidManifest.xml_File (Ваш кэп)
 
Вот вам данные по приложению, которое не требует ни одного разрешения но запиленное под версию Андроида 4.1 или более поздняя:
Поддерживаемые устройства: 12439 Неподдерживаемые устройства: 2752  
Проверяйте манифест, возможно там что-то лишнее есть... Сделайте Clean проекта и проверьте, как будут обстоять дела со списком устройств на маркете. Попробуйте запостить пустое приложение и посмотрите как там обстоят дела.
Наблюдал в своих проектах и экспериментах, чем больше особенных разрешений (типа "связь", "GPS" и т.п.) требуется, тем меньше будет поддерживаемых устройств, что вполне логично...
Но с необъяснимым ростом неподдерживаемых устройств не сталкивался. Нельзя исключать и глюк в Гугл плее.
 
АП. Нашёл ссылку, которую хотел изначально дать: https://developer.android.com/google/play/filters.html?hl=ru
p.s. Удачи в поисках проблемы

Unix то да, только до сих пор это были java приложения для виртуальной машины, теперь можно создавать исполняемые ELF файлы консольных приложений и библиотеки под unix.
 
выше было видео, создание Apache dynamic link module, вот здесь c 45 минуты:
 

думаю, подойдет
a:=lst1.ItemByPoint(10,0);
b:=lst1.ItemByPoint(10,lst1.height);
 

Цитирую С.Рощина: "Как сказано в статье всплывающие формы идут отдельным списком, не бывают активными и поэтому не получают сообщения от клавиатуры". 
Как вариант, могу предложить:
1). использовать обычную форму с расположенным на нем TPopup
или
2). Использовать TRectangle разместив его на главной форме, сделав полупрозрачным и Align=Contents. Второй TRectangle - непрозрачный, поместить на первый, Align=Center. На последний поместить TEdit. Делать такую "модальную форму" видимой меняя Visibile первого TRectangle и помещать выше всех .BringToFront. 

1). Задайте для GridPanelLayout выравнивание Top.
2). Для всех строк TGridPanelLayout.TRowItem, добавляемых в RowCollection, задайте свойство SizeStyle - Absolute и значение Value отличное от 0.

Я это делаю на windows и mac, поэтому не знаю как себя поведет скрипт, но думаю ему без разницы. На стороне сервера я делаю php скрипт 
<?php $pdo = new PDO('mysql:dbname=имя базы данных;host=localhost','имя юзера', 'пароль'); $pdo->exec("SET NAMES 'cp1251'"); // твоя кодировка, чтобы сервер тебя  правильно понял $stmt = $pdo->prepare(" SELECT max(id) as id FROM grls_status WHERE type = 'main' "); $stmt->execute(); // возвращает boolean - удалось ли выполнить запрос  $allRows = $stmt->fetchAll(); // ассоциативный массив (см. документацию,  если нужны другие варианты)  foreach ($allRows as $row) {print ",$row[id], ";} php?> В проекте делаю post запрос (хотя можно и get):
 sql_param:=TStringList.Create; // это параметры, которые можно передать. если ничего не надо передавать, то можно оставить пустую.
  form1.memo1.Lines.Add( form1.IdHTTP1.post( 'http://'+my_web+'/scri2/script.php', sql_param )); //my_web - это имя сервера
Знаю, что на мобильных не рекомендуется использовать indy, используй nethttp
 

Хорошая идея. Я бы еще дополнительно изменил яркость/контрастность основной картинки с помощью TGloomEffect (или TBloomEffect).
Есть неплохое демо, в котором можно поэкспериментировать с настройками эффектов:

C:\Users\Public\Documents\Embarcadero\Studio\<версия>\Samples\Object Pascal\Multi-Device Samples\User Interface\ShaderFilters

Я так понимаю, Вы имели ввиду FindAndCloneStyleResource? Этот метод не возвращает копию стиля. Он возвращает копию объекта(элемента) стиля.
Например,  если Вы хотите напрямую изменить элемент стиля (например цвет фона кнопки), то делаете:
 
AObject := Button1.FindStyleResource('background'); if (AObject is TRectangle) then TRectangle(AObject).Fill.Color := TAlphaColorRec.Aqua; И Button1 изменит цвет.
Но, если после этого сделать Layout1.AddObject(AObject); то кнопка Button1  не будет больше иметь элемент 'background', родителем этого объекта станет Layout1. 

 Что касается
AObject := Button1.FindStyleResource('background', True); if AObject <> nil then Layout1.AddObject(AObject); или
if Button1.FindAndCloneStyleResource('background', AObject) then Layout1.AddObject(AObject); то вы просто создаете новый объект AObject типа TRectangle со всеми свойствами как у стилевого элемента 'background', за исключением StyleName (у вновь созданного AObject будет  StyleName = ''). В нашем примере этот новый объект (TRectangle) будет помещен на Layout1. При этом 'background' кнопки не изменится.
 

Проблема в стиле. Если его удалить, или загрузить другой то все работает.
Загрузите любой стиль например c:\Users\Public\Documents\Embarcadero\Studio\18.0\Styles\Win10Modern.Style и используйте его или если нужен свой, то посмотрите как там делается menuitemstyle.
Там TLayout - со Stylename = glyph  и на нем лежит TGlyph с Stylename - glyphstyle.
 

Во-первых RoschinSpb попросит передать горячий и пламенный привет в QC.
Во-вторых, если Вы создаете свой собственный стиль, то лучше бы соблюдать стандартную структуру стилевых объектов FGlyphObject это, как не сложно догадаться, стилевой элемент 'glyph'. Он содержит галочку и картинку. Возможно также что картинка будет располагаться не поверх галочки (как в Windows), а рядом с галочкой как в Mac. В этом случае glyphstyle будет расположена не внутри glyph, а рядом.

В-третьих, если Вам просто требуется использовать ImageList, то нет смысла создавать свой стиль. Если Вы тренируетесь в создании стилей, то надо изучать соответствующий раздел и, скорее всего, исходники тоже.