Renamed WebBroker demo project for clearity

marcobreveglieri · Mar 23, 2023 · 2d788e9 · 2d788e9
1 parent 9d9312f
commit 2d788e9
Show file tree

Hide file tree

Showing 4 changed files with 11 additions and 5 deletions.
diff --git a/...r-WebBroker/Prometheus.Demo.WebBroker.dpr → ...er-WebBroker/Starter.Sample.WebBroker.dpr b/...r-WebBroker/Prometheus.Demo.WebBroker.dpr → ...er-WebBroker/Starter.Sample.WebBroker.dpr
@@ -1,4 +1,4 @@
-program Prometheus.Demo.WebBroker;
+program Starter.Sample.WebBroker;
 {$APPTYPE GUI}
 
 uses

diff --git a/...WebBroker/Prometheus.Demo.WebBroker.dproj → ...-WebBroker/Starter.Sample.WebBroker.dproj b/...WebBroker/Prometheus.Demo.WebBroker.dproj → ...-WebBroker/Starter.Sample.WebBroker.dproj
@@ -8,7 +8,7 @@
         <Platform Condition="'$(Platform)'==''">Win32</Platform>
         <TargetedPlatforms>1</TargetedPlatforms>
         <AppType>Application</AppType>
-        <MainSource>Prometheus.Demo.WebBroker.dpr</MainSource>
+        <MainSource>Starter.Sample.WebBroker.dpr</MainSource>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
         <Base>true</Base>
@@ -56,7 +56,7 @@
         <DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace)</DCC_Namespace>
         <Icon_MainIcon>$(BDS)\bin\delphi_PROJECTICON.ico</Icon_MainIcon>
         <Icns_MainIcns>$(BDS)\bin\delphi_PROJECTICNS.icns</Icns_MainIcns>
-        <SanitizedProjectName>Prometheus_Demo_WebBroker</SanitizedProjectName>
+        <SanitizedProjectName>Starter_Sample_WebBroker</SanitizedProjectName>
         <DCC_UnitSearchPath>..\Prometheus.Client;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
         <VerInfo_Locale>1040</VerInfo_Locale>
         <VerInfo_Keys>CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
@@ -133,7 +133,7 @@
         <BorlandProject>
             <Delphi.Personality>
                 <Source>
-                    <Source Name="MainSource">Prometheus.Demo.WebBroker.dpr</Source>
+                    <Source Name="MainSource">Starter.Sample.WebBroker.dpr</Source>
                 </Source>
                 <Excluded_Packages>
                     <Excluded_Packages Name="$(BDSBIN)\dcloffice2k280.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
@@ -142,6 +142,12 @@
             </Delphi.Personality>
             <Deployment Version="4">
                 <DeployFile LocalName="Win32\Debug\Prometheus.Demo.WebBroker.exe" Configuration="Debug" Class="ProjectOutput"/>
+                <DeployFile LocalName="Win32\Debug\Starter.Sample.WebBroker.exe" Configuration="Debug" Class="ProjectOutput">
+                    <Platform Name="Win32">
+                        <RemoteName>Starter_Sample_WebBroker.exe</RemoteName>
+                        <Overwrite>true</Overwrite>
+                    </Platform>
+                </DeployFile>
                 <DeployClass Name="AdditionalDebugSymbols">
                     <Platform Name="iOSSimulator">
                         <Operation>1</Operation>

diff --git a/...r-WebBroker/Prometheus.Demo.WebBroker.res → ...er-WebBroker/Starter.Sample.WebBroker.res b/...r-WebBroker/Prometheus.Demo.WebBroker.res → ...er-WebBroker/Starter.Sample.WebBroker.res
diff --git a/Samples/Starter-WebBroker/WebModules.Prom.pas b/Samples/Starter-WebBroker/WebModules.Prom.pas
@@ -102,7 +102,7 @@ procedure TPromWebModule.PromWebModuleMetricActionAction(Sender: TObject;
   UpdateLastMinuteMetrics;
   Response.ContentType := 'text/plain';
   Response.ContentStream := TMemoryStream.Create;
-  var LWriter := TTextRenderer.Create;
+  var LWriter := TTextExposer.Create;
   try
     LWriter.Render(Response.ContentStream,
       TCollectorRegistry.DefaultRegistry.Collect);