Найдено 55 результатов

mike
29.10.2025 17:09:08
Форум: Lazarus
Тема: Просто TClientSocket
Ответы: 31
Просмотры: 9517

Re: Просто TClientSocket

На гитхаб пока нет, могу сюда прикрепить.
На 100% не тестировал, но у меня выполняет все задачи и под Win и под Lin.
mike
01.09.2025 13:23:56
Форум: Lazarus
Тема: Ошибки нет в одной версии Lazarus, но есть в другой.
Ответы: 1
Просмотры: 2842

Re: Ошибки нет в одной версии Lazarus, но есть в другой.

Скорее всего в 2.2.6 или срабатывает какой-то лишний $IFDEF, или наоборот, не срабатывает нужный, в результате компилируется код, предназначенный для другой версии (или для Delphi).
mike
27.08.2025 14:25:43
Форум: Lazarus
Тема: class procedure в качестве TNotifyEvent
Ответы: 7
Просмотры: 2794

Re: class procedure в качестве TNotifyEvent

чтобы это работало надо по разному формировать ссылку на метод и это случайно не получится
Вот из исходников самого Лазаруса фрагмент, файл colortty.pas:

type
TColorTTY = class
class procedure DoLazLoggerDebugLnEx({%H-}Sender: TObject; var LogTxt, {%H-}LogIndent: string;
var {%H-}Handled ...
mike
27.08.2025 12:24:12
Форум: Lazarus
Тема: class procedure в качестве TNotifyEvent
Ответы: 7
Просмотры: 2794

Re: class procedure в качестве TNotifyEvent

Ну, в моем случае @TClass.Proc и Addr(TClass.Proc) дают один результат -- ошибку в одном событии и нормальную работу в другом. Что уже крайне подозрительно. Я потом попробую создать минималистичное приложение с этой проблемой.
А вот TNotifyEvent(@TClass.Proc) нормально работает в обоих событиях.
mike
27.08.2025 00:34:07
Форум: Lazarus
Тема: class procedure в качестве TNotifyEvent
Ответы: 7
Просмотры: 2794

Re: class procedure в качестве TNotifyEvent

procedure of object означает, что в процедуру первым неявным параметром передается Self - указатель на экземпляр класса, а затем остальные (в данном случае Sender).
В class procedure такой параметр отсутствует, потому что такие процедуры вызываются без создания экземпляра.
В class procedure (без ...
mike
26.08.2025 19:12:22
Форум: Lazarus
Тема: LazWeb: автоматический старт модуля
Ответы: 4
Просмотры: 1688

Re: LazWeb: автоматический старт модуля

Да, я уже переделал.
На TFPWebModule оставил то, что должно существовать только в контексте соответствующего web-сервиса, и может быть высвобождено в любой момент.
Все остальное перенес в отдельный обычный TDataModule, который создается классическим методом Application.CreateForm(TDM, DM) и ...
mike
26.08.2025 15:19:56
Форум: Lazarus
Тема: class procedure в качестве TNotifyEvent
Ответы: 7
Просмотры: 2794

class procedure в качестве TNotifyEvent

Столкнулся со странным поведением FPC, которого никогда не наблюдал в аналогичных ситуациях в Delphi.

Есть некий объект App с событием OnEvent: TNotifyEvent, есть класс-заглушка со статичным методом вида class procedure TClass.Proc(Sender: TObject); .
Если сделать так:
App.OnEvent := @TClass.Proc ...
mike
26.08.2025 14:50:31
Форум: Lazarus
Тема: LazWeb: автоматический старт модуля
Ответы: 4
Просмотры: 1688

Re: LazWeb: автоматический старт модуля

Это нужно для того, чтобы приложение начинало выполнять свою работу вне зависимости от того, что там будет (и будет ли) с клиентскими запросами.
Раз TFPWebModule -- наследник TDataModule, то я и использовал его как дата-модуль, разместив на нем всю "фоновую" логику для работы с БД, которая по идее ...
mike
25.08.2025 17:46:00
Форум: Lazarus
Тема: LazWeb: автоматический старт модуля
Ответы: 4
Просмотры: 1688

LazWeb: автоматический старт модуля

Существует ли культурный способ сделать так, чтобы мой экземпляр TFPWebModule создавался сразу на старте приложения, а не после прилета первого запроса от клиента?
Пока вижу только адский костыль в виде ручного вызова HandleRequest при первом срабатывании OnIdle.

Добавлено спустя 2 часа 37 минут ...
mike
20.08.2025 14:24:01
Форум: Lazarus
Тема: Форма с TChart в консольном приложении
Ответы: 7
Просмотры: 2397

Re: Форма с TChart в консольном приложении

mike а в каком виде нужно получать графики и что с ними нужно делать дальше?
В виде растровых картинок и отдавать по HTTP в ответ на <img src=

Добавлено спустя 11 минут 18 секунд:
делаете гуевое приложение которое позволяет настраивать чарт (смутно припоминаю что его можно настраивать в ...
mike
15.08.2025 13:53:43
Форум: Lazarus
Тема: Форма с TChart в консольном приложении
Ответы: 7
Просмотры: 2397

Re: Форма с TChart в консольном приложении

чтото похожее
https://forum.lazarus.freepascal.org/index.php?topic=56262.0
Да, ситуация в точности та же, и предлагаемое решение работает.
Но, блин, настраивать чарт в рантайме -- это же адская боль! Один из самых сложных компонентов в истории...
Я для того и использовал форму, чтобы не ...
mike
14.08.2025 18:57:41
Форум: Lazarus
Тема: Форма с TChart в консольном приложении
Ответы: 7
Просмотры: 2397

Форма с TChart в консольном приложении

Всем привет.

Возникла необходимость постройки графиков в консольном приложении (fpWeb), для чего была добавлена невидимая форма с чартами, некоторые модули в uses, и все прекрасно работает под Win.
Однако после сборки под Linux возникла проблема с тулкитом визуализации. При запуске требует GUI ...
mike
01.08.2025 14:24:15
Форум: Lazarus
Тема: Просто TClientSocket
Ответы: 31
Просмотры: 9517

Re: Просто TClientSocket

Спасибо всем ответившим. Сделал свою обертку над сокет API. Как по мне, получилось даже удобнее делфового клиент-сокета.

И хотя серверный сокет мне в этом проекте не нужен и не планировался, но базовый класс клиентского сокета так хорошо лег под задачи серверного воркера, что решил сделать еще ...
mike
30.07.2025 00:26:56
Форум: Lazarus
Тема: Просто TClientSocket
Ответы: 31
Просмотры: 9517

Re: Просто TClientSocket

А чем вам Synapse не угодил ?
А что общего он имеет с сабжем?
Прием данных не по принципу " прилетел пакет, можешь забрать сейчас, можешь заниматься своими делами до следующего пакета и забрать все вместе ", а по принципу " говори, сколько тебе надо, и виси до таймаута если столько еще нет, а ...
mike
29.07.2025 20:24:07
Форум: Lazarus
Тема: Просто TClientSocket
Ответы: 31
Просмотры: 9517

Просто TClientSocket

Всем привет.

Возникла необходимость переноса простецкой делфовой утилиты на Linux, но вместо работы сижу и офигеваю.

Под FPC/Lazarus есть что-то, хоть немного напоминающее по простоте использования стандартный делфовый клиентский TCP-сокет?
Мне от него почти ничего не надо: просто создать ...