PTyTb/ttw_fmx_v10
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

починил обработку событий

Browse Source
This commit is contained in:
PC1\PTyTb
2025-08-17 10:01:38 +03:00
parent 597c49f67c
commit fc5a835b1f
3 changed files with 76 additions and 65 deletions
Download Patch File Download Diff File Expand all files Collapse all files
frames/fOBS.pas
+4
View File
@@ -806,6 +806,7 @@ begin
EventWebServers[i].WebServerChat.AddMessage(ws.se);
end;
end;
TTW_Bot.frEvents1.OnTTVEvent(aEvent.event.user_name);
end;
procedure TfrOBS.toEventWebServer(aEvent: TSubEvent);
@@ -823,6 +824,7 @@ begin
EventWebServers[i] := ws;
EventWebServers[i].WebServerChat.AddMessage(EventWebServers[i].se);
end;
TTW_Bot.frEvents1.OnTTVEvent(aEvent.event.user_name);
end;
procedure TfrOBS.toEventWebServer(aEvent: TRaidEvent);
@@ -842,6 +844,7 @@ begin
EventWebServers[i] := ws;
EventWebServers[i].WebServerChat.AddMessage(EventWebServers[i].se);
end;
TTW_Bot.frEvents1.OnTTVEvent(aEvent.event.from_broadcaster_user_name);
end;
procedure TfrOBS.toEventWebServer(aEvent: TGiftEvent);
@@ -859,6 +862,7 @@ begin
EventWebServers[i] := ws;
EventWebServers[i].WebServerChat.AddMessage(EventWebServers[i].se);
end;
TTW_Bot.frEvents1.OnTTVEvent(aEvent.event.user_name);
end;
procedure TfrOBS.toEventWebServer(aNick, aSum, aText: string);