Delphi. Simple helper
Что такое хэлпер, можно прочитать здесь. Если кратко, то это класс расширяющий функциональность другого класса. Это немного похоже на наследование, но синтаксически выглядит по-другому, а
Visitor template. Simple example
Пантелеев СтаниславПростой пример шаблона визитер. Когда нужно вставить новую функциональность, почти не меняя класса.
unit uVisitor; interface uses SysUtils, System.Generics.Collections; type TElement = class private FName:
Delphi. HashMap
Пантелеев СтаниславИз проекта
uses System.SysUtils, System.Classes, System.Generics.Collections, Rtti, xsuperjson, xsuperobject, System.TypInfo, System.Generics.Defaults; {hash map for objects on TDictionary and TList<>} THashMap<K, V> = class private FDictionary:
SVN. Return to the previous state
Пантелеев СтаниславAccording to stackOverflow
svn update svn merge -r 150:140 . svn commit -m «Rolled back to r140»
Delphi. Dependency Injection With Spring
Пантелеев СтаниславЭтот пример можно найти в библиотеке Spring for Delphi, где-то примерно здесь
C:WorkDSeattlelibssglienke-spring4dSamplesIntroToDependencyInjection6-UseContainer
Как это работает? Для начала нам нужно зарегистрировать в контейнере классы
unit
Delphi. MySQL. Пишем в DECIMAL поле и читаем из него.
Пантелеев СтаниславЕсть Decimal поле для цены в одном из проектов. Есть на форме 2 spinEdit, рубли и копейки соответственно.
Чтение из базы
Получение дробной части
Delphi. Гениальная борьба с WideMemo
Пантелеев СтаниславДелаю проект на UniGUI. Соответственно, не могу воспользоваться DBGridEh
Имеется поле типа TEXT в MySQL, Delphi определяет его как WideMemo
Я просто создал кальк
Delphi. WinAPI. Получение дескриптора безопасности файла
Пантелеев СтаниславПолучение дескриптора безопасности файла
Способ №1
function ConvertSecurityDescriptorToStringSecurityDescriptor_( SecurityDescriptor: PSECURITY_DESCRIPTOR; RequestedStringSDRevision: DWORD; SecurityInformation: SECURITY_INFORMATION; StringSecurityDescriptor: PPChar; StringSecurityDescriptorLen: PCardinal ): Boolean; stdcall; external ‘ADVAPI32.DLL’ name {$IFDEF USEUNICODE}’ConvertSecurityDescriptorToStringSecurityDescriptorW'{$ELSE}
Delphi. FireDAC. Проверка на NULL и запись NULL значений в базу данных
Пантелеев СтаниславПроверка на NULL
with qSomeQuery do begin if FieldByName(‘someField’).IsNull then //do something end;
Запись NULL значений, согласно инструкции
// setting param to null … qSomeQuery.SQL.Text:= ‘INSERT INTO DATABASE.TABLE
Delphi. UniGUI. Делаем авторизацию через СМС. Часть 1 – проверка номера телефона
Пантелеев СтаниславВ одном моем проекте 99% клиентов из России, Казахстана и Украины. И вот взбрело мне в голову сделать авторизацию через смс. Нашёл шлюз, отправил пару