From 2d788e96238668c09f7f9e5c02993bd6f6d04032 Mon Sep 17 00:00:00 2001
From: Marco Breveglieri <brevve@gmail.com>
Date: Thu, 23 Mar 2023 12:11:31 +0100
Subject: [PATCH] Renamed WebBroker demo project for clearity

---
 ...roker.dpr => Starter.Sample.WebBroker.dpr} |   2 +-
 ...r.dproj => Starter.Sample.WebBroker.dproj} |  12 +++++++++---
 ...roker.res => Starter.Sample.WebBroker.res} | Bin 112416 -> 112416 bytes
 Samples/Starter-WebBroker/WebModules.Prom.pas |   2 +-
 4 files changed, 11 insertions(+), 5 deletions(-)
 rename Samples/Starter-WebBroker/{Prometheus.Demo.WebBroker.dpr => Starter.Sample.WebBroker.dpr} (89%)
 rename Samples/Starter-WebBroker/{Prometheus.Demo.WebBroker.dproj => Starter.Sample.WebBroker.dproj} (97%)
 rename Samples/Starter-WebBroker/{Prometheus.Demo.WebBroker.res => Starter.Sample.WebBroker.res} (99%)

diff --git a/Samples/Starter-WebBroker/Prometheus.Demo.WebBroker.dpr b/Samples/Starter-WebBroker/Starter.Sample.WebBroker.dpr
similarity index 89%
rename from Samples/Starter-WebBroker/Prometheus.Demo.WebBroker.dpr
rename to Samples/Starter-WebBroker/Starter.Sample.WebBroker.dpr
index 1155a4b..3731dea 100644
--- a/Samples/Starter-WebBroker/Prometheus.Demo.WebBroker.dpr
+++ b/Samples/Starter-WebBroker/Starter.Sample.WebBroker.dpr
@@ -1,4 +1,4 @@
-program Prometheus.Demo.WebBroker;
+program Starter.Sample.WebBroker;
 {$APPTYPE GUI}
 
 uses
diff --git a/Samples/Starter-WebBroker/Prometheus.Demo.WebBroker.dproj b/Samples/Starter-WebBroker/Starter.Sample.WebBroker.dproj
similarity index 97%
rename from Samples/Starter-WebBroker/Prometheus.Demo.WebBroker.dproj
rename to Samples/Starter-WebBroker/Starter.Sample.WebBroker.dproj
index fb0c12d..502cbda 100644
--- a/Samples/Starter-WebBroker/Prometheus.Demo.WebBroker.dproj
+++ b/Samples/Starter-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/Samples/Starter-WebBroker/Prometheus.Demo.WebBroker.res b/Samples/Starter-WebBroker/Starter.Sample.WebBroker.res
similarity index 99%
rename from Samples/Starter-WebBroker/Prometheus.Demo.WebBroker.res
rename to Samples/Starter-WebBroker/Starter.Sample.WebBroker.res
index 474962056eef1c4529e6e224f0e5e60d78e0db36..5d5071195290cf8bf8a2c5711026bea24885a69d 100644
GIT binary patch
delta 142
zcmZ4Rj%~p^wh1?wqZlM7-d2?kW+-7uWGDiXsX$VXAsEQZWhh|CVMv`U$Rs}5h|!2S
jk3n;CI-?~awX6&bK@5_UuQSRLQrWD=v|Wvf@z)jr=ushd

delta 146
zcmZ4Rj%~p^wh1?wV;H0+-d2?jU?^h9XUJtpWhi0D0FtE)#SD53E<jc;L;hrbCh^H8
lj0VgF3|f=Z87&E`W)5MHntYv6maxiZ4W{iHOpHIa004@sBE0|r

diff --git a/Samples/Starter-WebBroker/WebModules.Prom.pas b/Samples/Starter-WebBroker/WebModules.Prom.pas
index 6a30750..24ae654 100644
--- 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);