- Код: Выделить всё
]procedure InfoBox(const S:string); overload;
procedure InfoBox(const S:string; Params:array of const); overload;
procedure WarningBox(const S:string); overload;
procedure WarningBox(const S:string; Params:array of const); overload;
procedure ErrorBox(const S:string);
procedure ErrorBox(const S:string; Params:array of const);
Они отображают информацию в окнах соответствующих сообщения и пишут её в лог
Для логирования предназначена функция
- Код: Выделить всё
procedure RxDefaultWriteLog( ALogType:TEventType; const ALogMessage:string);
Процедура
- Код: Выделить всё
procedure InitRxLogs;
включает подсистему логирования
Лог по умолчанию пишется во временную папку с именем исполняемого файла и расширением log
В rxdbutils добавил процедура по формированию условия WHERE SQL запроса - добавление через AND или OR
Простейшие функции - но часто использую.
- Код: Выделить всё
procedure AddSQLExpressionAnd(var MacroStr:string; const MacroWhere:string); overload;
procedure AddSQLExpressionAnd(var MacroStr:string; const MacroWhere:string; Params:array of const); overload; inline;
procedure AddSQLExpressionOr(var MacroStr:string; const MacroWhere:string);
Добавлено спустя 4 часа 45 минут 30 секунд:
В RxAppUtils новая функция
- Код: Выделить всё
function RxGetKeyboardLayoutName:string;
Вернёт название текущей раскладки на клавиатуре
Реализовано для Windows и Linux.
