FAN

Файлы устанавливаются tools-getit-iblite http://blog.marcocantu.com/blog/2018-july-iblite-package-with-license-file.html

У startcomca. проблемы, китайский владелец выдал несколько левых сертификатов и его поймали. Зато с сегодняшнего дня можно получить сертификаты бесплатно и персональный, и бизнес.

Очень нравится timagelist, большое спасибо! Но хотелось бы иметь возможность выбрать несколько destination images и отредактировать их свойства Также хотелось бы добавлять destination images не по одиночке а группами с заданными свойствами

procedure TDM1.FDConnection1BeforeConnect(Sender: TObject); begin {$IFDEF DCC} {$IFDEF MSWINDOWS} FDConnection1.Params.Values['ColumnMetadataSupported'] := 'False'; FDConnection1.Params.Values['Database'] := TPath.Combine(TPath.GetDirectoryName(ParamStr(0)), 'baza.sqlite'); FDConnection1.Params.Add('SharedCache=False'); FDConnection1.Params.Add('LockingMode=Normal'); // FDConnection1.Params.Values['Password'] := '52V11aP7_bYnl_VHDXfN|U]F<*^{4,S}1]m5>Ss5a2|!vOhp(o-CW^7=5\DHW4S'; // FDConnection1.Params.Values['NewPassword'] := '52V11aP7_bYnl_VHDXfN|U]F<*^{4,S}1]m5>Ss5a2|!vOhp(o-CW^7=5\DHW4S'; // FDConnection1.Params.Values['Password'] := ''; // ShowMessage(TPath.Combine(TPath.GetDirectoryName(ParamStr(0)), 'baza.sqlite')); {$ENDIF} {$IFDEF ANDROID} FDConnection1.Params.Values['ColumnMetadataSupported'] := 'False'; FDConnection1.Params.Values['Database'] := TPath.Combine(TPath.GetDocumentsPath, 'baza.sqlite'); FDConnection1.Params.Add('SharedCache=False'); FDConnection1.Params.Add('LockingMode=Normal'); // FDConnection1.Params.Values['Password'] := '52V11aP7_bYnl_VHDXfN|U]F<*^{4,S}1]m5>Ss5a2|!vOhp(o-CW^7=5\DHW4S'; {$ENDIF} {$IFDEF MACOS} {$IFDEF IOS} FDConnection1.Params.Values['ColumnMetadataSupported'] := 'False'; FDConnection1.Params.Values['Database'] := TPath.Combine(TPath.GetDocumentsPath, 'baza.sqlite'); FDConnection1.Params.Add('SharedCache=False'); FDConnection1.Params.Add('LockingMode=Normal'); // FDConnection1.Params.Values['Password'] := '52V11aP7_bYnl_VHDXfN|U]F<*^{4,S}1]m5>Ss5a2|!vOhp(o-CW^7=5\DHW4S'; {$ELSE} FDConnection1.Params.Values['ColumnMetadataSupported'] := 'False'; FDConnection1.Params.Values['Database'] := TPath.Combine(TPath.GetDocumentsPath, 'baza.sqlite'); FDConnection1.Params.Add('SharedCache=False'); FDConnection1.Params.Add('LockingMode=Normal'); // FDConnection1.Params.Values['Password'] := '52V11aP7_bYnl_VHDXfN|U]F<*^{4,S}1]m5>Ss5a2|!vOhp(o-CW^7=5\DHW4S'; {$ENDIF} {$ENDIF} {$IFDEF LINUX} {$ENDIF} {$ENDIF} {$IFDEF FPC} {$ENDIF} end; Пароль на sqlite устанавливается так NewPassword Specifies a new password for a database and performs an encryption operation: To encrypt an unencrypted database, specify the non-empty NewPassword and empty Password; To decrypt an encrypted database, specify the empty NewPassword and non-empty Password; To change an encrypted database password, specify the non-empty NewPassword and non-empty Password.

Есть другой подход к проблеме. Добавить к базе таблицу версия и в ней будет храниться одно значение - версия базы. Изначально версия программы и базы 1 Если разработана версия программы 2 и база для нее изменилась, то при запуске проверяем versionCode программы и версию базы. Если отличаются, то через fdConnection изменяем базу с помощью скрипта, и изменяем значение в таблице версия базы. Пользовательские данные сохраняются.

http://delphi.org/2014/01/custom-android-adb-usb/ Если устройство поддерживается, то должно после редактирования подключиться без проблем

GetSharedDocumentsPath не работает GetDocumentsPath работает FDConnection1.Params.Values['Database'] := TPath.Combine(TPath.GetDocumentsPath, 'lbase.db');

Добрый день Посоветуйте как узнать координаты углов экрана на TMapView.

Видео - Amazon Web Services Programming Статья: Один год бесплатного облачного хостинга https://klen.github.io/aws.html

QuarkCube: https://www.youtube.com/user/QuarkCube Embarcadero US: https://www.youtube.com/user/EmbarcaderoTechNet Embarcadero Germany: https://www.youtube.com/user/EmbarcaderoGermany Embarcadero Brazil: https://www.youtube.com/user/embarcaderodobrasil Также Embarcadero Russia: https://www.youtube.com/channel/UCtqzKKPLL1uoI7yyCBmKP1w Было бы неплохо, если Embarcadero Russia делали не только свои видио, а субтиры к ресурсам выше

Условно имеется listview, соединенный с таблицей. В таблице имя, фамилия, пол. Listview отображает мистер Иван Иванов при помощи LinkListControlToField1.FillExpressions Expression.CustomFormat = "Мистер " + %s Все работает хорошо, но хочется добавить немецкий язык, и ListView должен показывать уже не "Мистер" а "Герр". Добавил переменную на форму - FTitle, но добраться до нее из Expression.CustomFormat не могу. Пробовал Self.FTitle, Owner.FTitle, Owner.Owner.FTitle and тд и тп. Получаю 0 вместо "Герр". Можно ли из LiveBindings получить доступ к переменным???

Около 10% от того, что сэкономит заказчик.

На http://www.ginne.ru/ имеется бесплатный StyleEditor

С переходом на Х возникла точно такая же проблема. База называлась ххх.db У меня rooted устройство, поэтому зашел в директорию программы и увидел, что размер ххх.db - 0 байт. Переименовал для андроида ххх.db в xxx.sqlite, изменил connection и deployment settings, и все заработало.

Добрый день Можно ли скрыть/показать ряд в FMX TStringgrid используя код???