Skip to content

Commit 5da71d5

Browse files
committed
Some fixes.
Added: Build info
1 parent 7d332fb commit 5da71d5

3 files changed

Lines changed: 17 additions & 3 deletions

File tree

shellthread.pas

Lines changed: 7 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -446,8 +446,13 @@ procedure TShellThread.Execute;
446446
OutputStd;
447447
while not Terminated do
448448
begin
449-
FBot.getUpdatesEx(0, FLPTimeout);
450-
OutputStd;
449+
try
450+
FBot.getUpdatesEx(0, FLPTimeout);
451+
OutputStd;
452+
except
453+
on E: Exception do
454+
Logger.Error(E.ClassName+': '+E.Message);
455+
end;
451456
end;
452457
except
453458
on E: Exception do

tgshd.lpi

Lines changed: 8 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -13,6 +13,13 @@
1313
<UseAppBundle Value="False"/>
1414
<ResourceType Value="res"/>
1515
</General>
16+
<VersionInfo>
17+
<UseVersionInfo Value="True"/>
18+
<AutoIncrementBuild Value="True"/>
19+
<MajorVersionNr Value="1"/>
20+
<MinorVersionNr Value="1"/>
21+
<BuildNr Value="2"/>
22+
</VersionInfo>
1623
<BuildModes Count="4">
1724
<Item1 Name="Default" Default="True"/>
1825
<Item2 Name="Debug">
@@ -134,7 +141,7 @@
134141
<RequiredPackages Count="4">
135142
<Item1>
136143
<PackageName Value="fptelegram"/>
137-
<MinVersion Build="20" Valid="True"/>
144+
<MinVersion Release="1" Valid="True"/>
138145
</Item1>
139146
<Item2>
140147
<PackageName Value="lazdaemon"/>

tgshd.lpr

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -9,6 +9,8 @@
99
// ,tgsynapsehttpclientbroker
1010
;
1111

12+
{$R *.res}
13+
1214
begin
1315
Application.Title:='Telegram shell daemon';
1416
Application.Initialize;

0 commit comments

Comments
 (0)