File tree Expand file tree Collapse file tree 4 files changed +19
-26
lines changed
Expand file tree Collapse file tree 4 files changed +19
-26
lines changed Original file line number Diff line number Diff line change @@ -172,16 +172,7 @@ $(PreBuildEvent)]]></PreBuildEvent>
172172 <Overwrite>true</Overwrite>
173173 </Platform>
174174 </DeployFile>
175- <DeployClass Name="DependencyModule">
176- <Platform Name="Win32">
177- <Operation>0</Operation>
178- <Extensions>.dll;.bpl</Extensions>
179- </Platform>
180- <Platform Name="OSX32">
181- <Operation>1</Operation>
182- <Extensions>.dylib</Extensions>
183- </Platform>
184- </DeployClass>
175+ <DeployClass Name="ProjectiOSDeviceResourceRules"/>
185176 <DeployClass Name="ProjectOSXResource">
186177 <Platform Name="OSX32">
187178 <RemoteDir>Contents\Resources</RemoteDir>
@@ -520,7 +511,16 @@ $(PreBuildEvent)]]></PreBuildEvent>
520511 <Operation>1</Operation>
521512 </Platform>
522513 </DeployClass>
523- <DeployClass Name="ProjectiOSDeviceResourceRules"/>
514+ <DeployClass Name="DependencyModule">
515+ <Platform Name="Win32">
516+ <Operation>0</Operation>
517+ <Extensions>.dll;.bpl</Extensions>
518+ </Platform>
519+ <Platform Name="OSX32">
520+ <Operation>1</Operation>
521+ <Extensions>.dylib</Extensions>
522+ </Platform>
523+ </DeployClass>
524524 <ProjectRoot Platform="Win64" Name="$(PROJECTNAME)"/>
525525 <ProjectRoot Platform="iOSDevice64" Name="$(PROJECTNAME).app"/>
526526 <ProjectRoot Platform="iOSDevice32" Name="$(PROJECTNAME).app"/>
Original file line number Diff line number Diff line change 1313 <Dependencies>Install\TelegaPiBot.dproj</Dependencies>
1414 </Projects>
1515 <Projects Include="Demo\Console\ConsoleBot.dproj">
16- <Dependencies>Install\TelegaPiBot.dproj</Dependencies >
16+ <Dependencies/ >
1717 </Projects>
1818 </ItemGroup>
1919 <ProjectExtensions>
5050 <Target Name="EchoBot:Make" DependsOnTargets="TelegaPiBot:Make">
5151 <MSBuild Projects="Demo\EchoBot\EchoBot.dproj" Targets="Make"/>
5252 </Target>
53- <Target Name="ConsoleBot" DependsOnTargets="TelegaPiBot" >
53+ <Target Name="ConsoleBot">
5454 <MSBuild Projects="Demo\Console\ConsoleBot.dproj"/>
5555 </Target>
56- <Target Name="ConsoleBot:Clean" DependsOnTargets="TelegaPiBot:Clean" >
56+ <Target Name="ConsoleBot:Clean">
5757 <MSBuild Projects="Demo\Console\ConsoleBot.dproj" Targets="Clean"/>
5858 </Target>
59- <Target Name="ConsoleBot:Make" DependsOnTargets="TelegaPiBot:Make" >
59+ <Target Name="ConsoleBot:Make">
6060 <MSBuild Projects="Demo\Console\ConsoleBot.dproj" Targets="Make"/>
6161 </Target>
6262 <Target Name="Build">
Original file line number Diff line number Diff line change 1- unit TelegAPI.Base;
1+ unit TelegAPI.Base;
22
33interface
44
@@ -14,6 +14,9 @@ TtgAbstractComponent = class(TComponent)
1414 constructor Create(AOwner: TComponent); override;
1515 published
1616 property Autor: string read FAutor;
17+ // / <summary>
18+ // / Поддерживаемая версия платформы BotAPI
19+ // / </summary>
1720 property Version: string read FVersion;
1821 end ;
1922
Original file line number Diff line number Diff line change @@ -43,7 +43,6 @@ TTelegramBot = class(TtgAbstractComponent)
4343 FOnReceiveGeneralError: TtgOnReceiveGeneralError;
4444 FOnRawData: TtgOnReceiveRawData;
4545 FParamLoader: TtgParamLoader;
46- function GetVersionAPI : string;
4746 protected
4847 // / <summary>
4948 // / Мастер-функция для запросов на сервак
@@ -1727,10 +1726,6 @@ TTelegramBot = class(TtgAbstractComponent)
17271726 // / 283107813:AAG4hEElAvIogTSHNHXI6rZtE46A7XQvIH
17281727 // / </example>
17291728 property Token: string read FToken write FToken;
1730- // / <summary>
1731- // / Поддерживаемая версия платформы BotAPI
1732- // / </summary>
1733- property VersionAPI: string read GetVersionAPI;
17341729{ $ENDREGION}
17351730{ $REGION 'События|Events'}
17361731 // / <summary>
@@ -1782,11 +1777,6 @@ destructor TTelegramBot.Destroy;
17821777 inherited ;
17831778end ;
17841779
1785- function TTelegramBot.GetVersionAPI : string;
1786- begin
1787- Result := ' 3.4.0' ;
1788- end ;
1789-
17901780function TTelegramBot.RequestAPI <T>(const Method: string; Parameters: TDictionary<string, TValue>): T;
17911781var
17921782 LTextResponse: string;
You can’t perform that action at this time.
0 commit comments