AS
Ну, просмотр, вывод списком, редактирование определенных записей (конкретно услуг) клиентами компании. Приложение дельфи десктоп. ТАким образом масштабируют
похоже на REST
Size: a a a
2020 October 06
RS
ну привязывайте, что мешает? берите бесплатную библиотеку TelegraPi, и встраивайте в дельфи-приложение.
Я уже писал выше, что
1) Они встраивать в свое приложение не будут
2) Буду писать я и, конечно, на Lazarus
3) Им сподручнее так, так как неожиданно оказалось, что они уже юзали мою либу fp-telegram.
4) Они бы переписали все в Лазарус, но приложение слишком громоздкое и на данном этапе снопом это невозможно, как сказали они
1) Они встраивать в свое приложение не будут
2) Буду писать я и, конечно, на Lazarus
3) Им сподручнее так, так как неожиданно оказалось, что они уже юзали мою либу fp-telegram.
4) Они бы переписали все в Лазарус, но приложение слишком громоздкое и на данном этапе снопом это невозможно, как сказали они
Д
во нашёл свой кусок:
procedure Send(Msg: String);
begin
SimpleIPCClient := TSimpleIPCClient.Create(nil);
try
SimpleIPCClient.ServerID := IPCChanelName;
try
SimpleIPCClient.Connect;
except
on E: Exception do begin
MessageBox(0, PWideChar('Ошибка: ' + E.Message), 'Ошибка', MB_OK);
Exit;
end;
end;
try
SimpleIPCClient.SendStringMessage(Msg);
finally
SimpleIPCClient.Disconnect;
end;
finally
SimpleIPCClient.Free;
end;
end;
procedure Send(Msg: String);
begin
SimpleIPCClient := TSimpleIPCClient.Create(nil);
try
SimpleIPCClient.ServerID := IPCChanelName;
try
SimpleIPCClient.Connect;
except
on E: Exception do begin
MessageBox(0, PWideChar('Ошибка: ' + E.Message), 'Ошибка', MB_OK);
Exit;
end;
end;
try
SimpleIPCClient.SendStringMessage(Msg);
finally
SimpleIPCClient.Disconnect;
end;
finally
SimpleIPCClient.Free;
end;
end;
RS
похоже на REST
РЕСТ, но попроще. Без лишних правил. Просто JSON-RPC
AS
Дмитрий
В IPC всё через Windows.SendMessage
IPC - это Inter Process Communication... абсолютно не привязанное к винде понятие
Д
IPC - это Inter Process Communication... абсолютно не привязанное к винде понятие
А кто утверждает обратное ?
KB
Я уже писал выше, что
1) Они встраивать в свое приложение не будут
2) Буду писать я и, конечно, на Lazarus
3) Им сподручнее так, так как неожиданно оказалось, что они уже юзали мою либу fp-telegram.
4) Они бы переписали все в Лазарус, но приложение слишком громоздкое и на данном этапе снопом это невозможно, как сказали они
1) Они встраивать в свое приложение не будут
2) Буду писать я и, конечно, на Lazarus
3) Им сподручнее так, так как неожиданно оказалось, что они уже юзали мою либу fp-telegram.
4) Они бы переписали все в Лазарус, но приложение слишком громоздкое и на данном этапе снопом это невозможно, как сказали они
если встраивать не будут, то тогда как вы собираете вообще привязывать бота к приложению?
Y
Ну и он работает между приложениями, разработанные на одном языке, либо хаки как приведенные выше (ну как я понял. Опыта с IPC совсем нет). По мне конечно правильнее сделать клиент-сервер тупо
Там ещё какие-то траблы были если одно приложение из под админа а второе нет. Я про IPC.
Д
В Lazarus просто есть:
TSimpleIPCServer = class;
TSimpleIPCClient = class;
TSimpleIPCServer = class;
TSimpleIPCClient = class;
RS
если встраивать не будут, то тогда как вы собираете вообще привязывать бота к приложению?
:) как бы это и предмет обсуждения. Привязать непроблема. Я бы сделал через HTTP -клиент-сервер (REST, json-rpc etc). Они предлагают IPC. Но компонент правда работает только для Дельфи. Я им предлагаю SimpleIPC Lib, так как это работает с любым приложением практически на многих языках
KB
Я уже писал выше, что
1) Они встраивать в свое приложение не будут
2) Буду писать я и, конечно, на Lazarus
3) Им сподручнее так, так как неожиданно оказалось, что они уже юзали мою либу fp-telegram.
4) Они бы переписали все в Лазарус, но приложение слишком громоздкое и на данном этапе снопом это невозможно, как сказали они
1) Они встраивать в свое приложение не будут
2) Буду писать я и, конечно, на Lazarus
3) Им сподручнее так, так как неожиданно оказалось, что они уже юзали мою либу fp-telegram.
4) Они бы переписали все в Лазарус, но приложение слишком громоздкое и на данном этапе снопом это невозможно, как сказали они
в общем, пусть главное дельфи-приложение что-то пишет в базу, создает в таблице записи, а ФП-приложение, которое будет управлять ботом, будет читать из базы эти записи и отправлять их тудой-сюдой, у меня так сделано, только у меня 2 дельфи-приложения
Д
Продам код самописного юнита unit SimpleIPC 🤣🤣🤣🤣🤣
RS
YuS
Там ещё какие-то траблы были если одно приложение из под админа а второе нет. Я про IPC.
Вот я и боюсь этих ньюансов. Особенно, если никогда не реализовал. Хочется узнать про все такие нюансы и у кого какой свой опыт с этим
RS
Дмитрий
Продам код самописного юнита unit SimpleIPC 🤣🤣🤣🤣🤣
Д
не не не, это много каких-то юнитов там )))) я же говорю про один )))))
RS
Дмитрий
В Lazarus просто есть:
TSimpleIPCServer = class;
TSimpleIPCClient = class;
TSimpleIPCServer = class;
TSimpleIPCClient = class;
Оно само по себе будет работать между Лазарус приложениями только. Нужна либа, к примеру, вот https://github.com/z505/SimpleIPC-lib
AS
в общем, пусть главное дельфи-приложение что-то пишет в базу, создает в таблице записи, а ФП-приложение, которое будет управлять ботом, будет читать из базы эти записи и отправлять их тудой-сюдой, у меня так сделано, только у меня 2 дельфи-приложения
вот плохое решение... ходить в БД напрямую...
от бедности сделать можно... но оно плохое
от бедности сделать можно... но оно плохое
I
я, когда юзал пайпы, столкнулся с невозможностью связать приложение, работающее под WINE, с нативным линуксовым
так что теперь только сеть
так что теперь только сеть
Д
Igor
я, когда юзал пайпы, столкнулся с невозможностью связать приложение, работающее под WINE, с нативным линуксовым
так что теперь только сеть
так что теперь только сеть
+
KB
вот плохое решение... ходить в БД напрямую...
от бедности сделать можно... но оно плохое
от бедности сделать можно... но оно плохое
а как ходить? не понимаю....