FreePascal.ru

Alex2013 писал(а):Проверить TypeOf(P^) = TypeOf(TTest)

Так оно не компилится.

У меня немного странная задача: я отдельно сохраняю значение указателей памяти на некие объекты типа TTest. Нужно при получении указателя убедиться что он указывает на корректный объект моего типа и уже с ним работать. У меня сделано

Function GetTTestFromP(P:Pointer):TTest;
begin
try
if ...

alexs писал(а):Application.UpdateFormatSettings:=false;

А вот это помогло. Спасибо!

у TFloatSpinEdit разве нет своего управления разделителями? нет, нету. Он чудесно реагирует на смену стандартного.

Похоже, что меняется где-то в недрах lcl, т.к. в консоли все норм. Минимальный код для графического приложения:

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils ...

Каждый раз перед преобразованием строк
Да, вот сейчас изыскиваю по старому проекту все преобразования. Но без DefaultFormatSettings элементы на форме типа TFloatSpinEdit тоже начинают показывать через запятую.

gluhow , а вы где инициализируете? У меня вставлено в секции инициализации всех ...

Мне для моей программы удобно выставить в качестве разделителя точку вместо запятой, которая используется для русской локали по-умолчанию. Для этого я просто при инициализации программы прописывал DefaultFormatSettings.DecimalSeparator:='.';
Но как оказалось, если при работающей ...

Плат у меня их небольшой зоопарк (Элкус, ISPDAS в основном) и есть готовый объект который умеет работать со всеми. Не хотел бы его ковырять. Да и задача с библиотекой не в первый раз всплывает. До этого как раз решил клиент-серверным приложением.

Хотел с помощью библиотеки реализовать доступ нескольких приложений к одной плате, доступ к которой открывается в монопольном режиме, но у меня каждое приложение похоже создаёт свою копию. Упрощенно, задачу можно свести к передаче переменной
Библиотека

library DynLibProject;

{$mode objfpc}{$H ...

На https://www.freepascal.org/ от 19 июня 2020 новость о выходе 3.2.0
Список изменений: https://wiki.freepascal.org/User_Changes_3.2.0

Как я понял, инспектор сначала смотрит в список зарегистрированных для этого типа редакторов, если ничего подходящего не находит, то проверяет TypeKind и для tkEnumeration берет реализацию, которая прописана во внутренней константе. Так что общего решения не нашел, сейчас выискиваю все перечисления ...

Использую TTIPropertyGrid. Понадобилось мне поменять слегка в своём проекте стандартные PropertyEditor-ы на свои. Выглядело это так:

TMyStringProperty=class(TStringProperty)
end;
...
RegisterPropertyEditor(TypeInfo(String), TPersistent, '', TMyStringProperty);

И так для всех ...

Спасибо, буду читать WebSockets

Дело в том что при
HistoryAction:=TAction.Create(ActMain);
ActMain становится владельцем HistoryAction, это значит что ActMain отвечает за очистку памяти HistoryAction. Но при этом HistoryAction не появляется в списке ActMain, так что корректный вариант будет таким

HistoryAction&#58 ...

Пытаюсь написать REST приложение с помощью FastCGI.
Я хочу выдать пользователю поток данных, который бы он мог сохранить у себя на компе. Данные я сам генерю, причем не очень быстро.
Попробовал изобразить что-то типа:

procedure TFPWebModule1.DataModuleRequest(Sender: TObject; ARequest&#58 ...

Вызвать внешнюю программу можно с помощью TProcess

Procedure Compile;
var AProcess:TProcess; S:TStringList;
begin
AProcess := TProcess.Create(nil);
AProcess.Executable:='fpc';
AProcess.Parameters.AddStrings(['-MObjFPC', '-B', '-O1', '-Fuaddfile'&#93 ...