commit 602122858d7f616fa937c67f6a5c643900dda8eb Author: alex_q <914269@qq.com> Date: Fri Jun 12 23:30:42 2026 +0800 Initial commit diff --git a/PNGButton.dcu b/PNGButton.dcu new file mode 100644 index 0000000..c1fbedb Binary files /dev/null and b/PNGButton.dcu differ diff --git a/PNGButton.hpp b/PNGButton.hpp new file mode 100644 index 0000000..97da7f4 --- /dev/null +++ b/PNGButton.hpp @@ -0,0 +1,100 @@ +// CodeGear C++Builder +// Copyright (c) 1995, 2024 by Embarcadero Technologies, Inc. +// All rights reserved + +// (DO NOT EDIT: machine generated header) 'PNGButton.pas' rev: 36.00 (Windows) + +#ifndef PNGButtonHPP +#define PNGButtonHPP + +#pragma delphiheader begin +#pragma option push +#if defined(__BORLANDC__) && !defined(__clang__) +#pragma option -w- // All warnings off +#pragma option -Vx // Zero-length empty class member +#endif +#pragma pack(push,8) +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include + +//-- user supplied ----------------------------------------------------------- + +namespace Pngbutton +{ +//-- forward type declarations ----------------------------------------------- +class DELPHICLASS TPNGButton; +//-- type declarations ------------------------------------------------------- +class PASCALIMPLEMENTATION TPNGButton : public Vcl::Controls::TGraphicControl +{ + typedef Vcl::Controls::TGraphicControl inherited; + +private: + System::Classes::TNotifyEvent FOnMouseEnter; + System::Classes::TNotifyEvent FOnMouseLeave; + System::Uitypes::TModalResult FModalResult; + +protected: + int EtatBtn; + bool FDown; + int FStateCount; + Vcl::Imaging::Pngimage::TPngImage* FPngImg; + bool FVisible; + DYNAMIC void __fastcall MouseDown(System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y); + DYNAMIC void __fastcall MouseUp(System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y); + MESSAGE void __fastcall MouseEnter(Winapi::Messages::TMessage &Msg); + MESSAGE void __fastcall MouseLeave(Winapi::Messages::TMessage &Msg); + virtual void __fastcall SetEnabled(bool Value); + +public: + __fastcall virtual TPNGButton(System::Classes::TComponent* AOwner); + __fastcall virtual ~TPNGButton(); + void __fastcall SetStateCount(int value); + void __fastcall SetPngImg(Vcl::Imaging::Pngimage::TPngImage* value); + void __fastcall SetDown(bool value); + virtual void __fastcall Paint(); + DYNAMIC void __fastcall Click(); + +__published: + __property Action; + __property Anchors = {default=3}; + __property bool Down = {read=FDown, write=SetDown, default=0}; + __property Enabled = {default=1}; + __property int ImgStates = {read=FStateCount, write=SetStateCount, default=4}; + __property System::Uitypes::TModalResult ModalResult = {read=FModalResult, write=FModalResult, default=0}; + __property ParentShowHint = {default=1}; + __property Vcl::Imaging::Pngimage::TPngImage* PngImg = {read=FPngImg, write=SetPngImg}; + __property PopupMenu; + __property ShowHint; + __property Visible = {default=1}; + __property OnClick; + __property OnContextPopup; + __property OnMouseDown; + __property OnMouseUp; + __property OnMouseMove; + __property System::Classes::TNotifyEvent OnMouseEnter = {read=FOnMouseEnter, write=FOnMouseEnter}; + __property System::Classes::TNotifyEvent OnMouseLeave = {read=FOnMouseLeave, write=FOnMouseLeave}; +}; + + +//-- var, const, procedure --------------------------------------------------- +extern DELPHI_PACKAGE void __fastcall Register(); +} /* namespace Pngbutton */ +#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_PNGBUTTON) +using namespace Pngbutton; +#endif +#pragma pack(pop) +#pragma option pop + +#pragma delphiheader end. +//-- end unit ---------------------------------------------------------------- +#endif // PNGButtonHPP diff --git a/PNGButton.pas b/PNGButton.pas new file mode 100644 index 0000000..8876ae1 --- /dev/null +++ b/PNGButton.pas @@ -0,0 +1,286 @@ +unit PNGButton; + +interface + +uses + System.SysUtils, WinApi.Messages, System.Classes, System.Types, + Vcl.Forms, Vcl.Graphics, Vcl.Controls, Vcl.imaging.pngImage; + +type + TPNGButton = class(TGraphicControl) + private + FOnMouseEnter:TNotifyEvent;//on mouse enter notify event + FOnMouseLeave:TNotifyEvent;//on mouse leave notify event + FModalResult: TModalResult; + //this events are triggered and it will execute a user procedure if is assigned + protected + EtatBtn: Integer; // 0=Normal 1=Mouse entered 2=Pressed 3=Disabled + FDown: Boolean; // value to know if we painting mouse down + FUp: Boolean; // value to know if we painting mouse up + FStateCount: Integer; // state number + FPngImg : TPngImage; //our 4 states image + FVisible: Boolean; + + procedure MouseDown(Button:TMouseButton; Shift:TShiftState; X, Y :integer); override; + procedure MouseUp(Button:TMouseButton; Shift:TShiftState; X, Y :integer); override; + procedure MouseEnter(var Msg:TMessage); message CM_MOUSEENTER; // to know when mouse is entered + procedure MouseLeave(var Msg:TMessage); message CM_MOUSELEAVE; // to know when mouse is leaved + procedure SetEnabled(Value:Boolean); override; + public + Constructor Create(AOwner:TComponent); override; // creation of the component + Destructor Destroy; override; // destruction of the component + procedure SetStateCount(value: Integer); // set the state number + procedure SetPngImg(value:TPngImage); // we set the png image + procedure SetDown(value:boolean); // to know if mouse is down or not + procedure SetUp(value:boolean); // to know if mouse is up or not + procedure Paint; override; // we override the painting of the component + procedure Click; override; + published + property Action; + property Anchors; + property Down:Boolean read FDown write SetDown default False; + property Up:Boolean read FUp write SetUp default False; + property Enabled; + property ImgStates:Integer read FStateCount write SetStateCount default 4; + property ModalResult: TModalResult read FModalResult write FModalResult default 0; + property ParentShowHint; + property PngImg:TPngImage read FPngImg write SetPngImg; + property PopupMenu; + property ShowHint; + property Visible; + property OnClick; + property OnContextPopup; + property OnMouseDown; + property OnMouseUp; + property OnMouseMove; + property OnMouseEnter:TNotifyEvent read FOnMouseEnter write FOnMouseEnter; + property OnMouseLeave:TNotifyEvent read FOnMouseLeave write FOnMouseLeave; + end; + +procedure Register; + +implementation + +procedure Register; +begin + RegisterComponents('Samples', [TPNGButton]); +end; + +//------ Creation of the component ------ +Constructor TPNGButton.Create(AOwner:TComponent); +begin + Inherited Create(AOwner); + Height:=25; //a default Height + Width:=75; //a default Width + FStateCount:=4; //default state count + FPngImg:=TPngImage.Create; //we create our png + FDown:=False; + FVisible:=True; +end; + +//-- Destruction of the component -- +Destructor TPNGButton.Destroy; +begin + FPngImg.Free; //destroy our png + Inherited Destroy; +end; + +//------ Function used to set the number of state +procedure TPNGButton.SetStateCount(value: Integer); +begin + if value>4 then value := 4; + if value<2 then value := 2; + + FStateCount := value; +end; + +//------ Function unsed to set the PNG image to draw +Procedure TPNGButton.SetPngImg(value:TPngImage); +begin + FPngImg.Assign(value); + {Now we are setting the component width and height} + {by the png image used} + Height:=FPngImg.Height; + Width:=FPngImg.Width div FStateCount; + With Constraints do begin + MaxHeight:=Height; + MinHeight:=Height; + MaxWidth:=Width; + MinWidth:=Width; + end; + EtatBtn:=0; {we reset the component state to normal} +end; + +//------ Function to set the component state: mouse down ------ +procedure TPNGButton.SetDown(value:boolean); +begin + if FDown<>value then begin + if FStateCount<3 then + value := FALSE; + + FDown:=value; + if FDown=False then + EtatBtn:=0; {is the mouse down is false then we reset the component state to normal} + + paint; + Refresh; //we repaint the componet) + end; +end; + +//------ Function to set the component state: mouse up ------ +procedure TPNGButton.SetUp(value:boolean); +begin + if FUp<>value then begin + if FStateCount<3 then + value := FALSE; + + FUp:=value; + if FUp=False then + EtatBtn:=0; {is the mouse up is false then we reset the component state to normal} + + paint; + Refresh; //we repaint the componet) + end; +end; + +//------ Our paint component procedure +Procedure TPNGButton.Paint; +begin + If csDesigning In ComponentState then + begin + If FPngImg<>nil then begin + With Constraints do begin + MaxHeight:=FPngImg.Height; + MinHeight:=FPngImg.Height; + MaxWidth:=FPngImg.Width div FStateCount; + MinWidth:=FPngImg.Width div FStateCount; + end; + end; + {get component state: down, enabled/disabled} + If (FPngImg<>nil) and (Enabled) then + FPngImg.Draw(Canvas,Rect(0, 0, FStateCount*Width, Height)); // Normal + If (FPngImg<>nil) and (Enabled) and (FUp) then + FPngImg.Draw(Canvas,Rect(-(Width), 0, (FStateCount-1)*Width, Height)); // the component is pressed + If (FPngImg<>nil) and (Enabled) and (FDown) then + FPngImg.Draw(Canvas,Rect(-(Width*2), 0, (FStateCount-2)*Width, Height)); // the component is pressed + If (FPngImg<>nil) and not(Enabled) then + FPngImg.Draw(Canvas,Rect(-(Width*3), 0, (FStateCount-3)*Width, Height)); // Disabled + {we design a rectangle for our component} + {this can be removed to achieve cool rounded buttons} + // Canvas.Pen.Style:=psDot; + // Canvas.Brush.Style:=bsClear; + // Canvas.Rectangle(0,0,Width,Height); + end + else + begin + if Visible then + begin + if (FUp=True) then + EtatBtn:=1; + if (FDown=True) then + EtatBtn:=2; + if not(Enabled) then + EtatBtn:=3; + if FPngImg<>nil then + Case EtatBtn of + 0: FPngImg.Draw(Canvas,Rect(0,0,FStateCount*Width,Height)); // Normal + 1: FPngImg.Draw(Canvas,Rect(-Width,0,(FStateCount-1)*Width,Height)); // Mouse Entered + 2: FPngImg.Draw(Canvas,Rect(-(Width*2),0,(FStateCount-2)*Width,Height)); // Pressed + 3: FPngImg.Draw(Canvas,Rect(-(Width*3),0,(FStateCount-3)*Width,Height)); // Disabled + end; + end; + end; +end; + +//Set components state: enabled/disabled +procedure TPNGButton.SetEnabled(Value:Boolean); +begin + if Enabled<>Value then + begin + if FStateCount<4 then //can't be disable + Value := TRUE; + + Inherited SetEnabled(Value); + + If (Enabled) then + EtatBtn:=0 + else + EtatBtn:=3; + + paint; + Refresh; //we repaint the componet) + end; +end; + +//---- Used to know when mouse entered on the our component area---- +procedure TPNGButton.MouseDown(Button:TMouseButton; Shift:TShiftState; X,Y:integer); +var + Form: TCustomForm; + pt: TPoint; + msg: Integer; +begin + Inherited MouseDown(Button,Shift,X,Y); + + if (Button = mbLeft) and (Enabled) and (FStateCount>2) then + begin + EtatBtn:=2; // press¨¦ + paint; + Refresh; //permet d'¨¦ffacer le canvas et de redessiner dessus (pour g¨¦rer la transparence) + end; +end; + +//---- Used to know when user clicked on the our component area---- +procedure TPNGButton.MouseUp(Button:TMouseButton; Shift:TShiftState; X,Y:integer); +begin + Inherited MouseUp(Button,Shift,X,Y); + + if (Button = mbLeft) and (Enabled) then + begin + If (X in [0..Width]) and (Y in [0..Height]) then + EtatBtn:=1 {Mouse Entered} + else + EtatBtn:=0;{normal} + + paint; + Refresh; //we repaint our component + end; +end; + +//---- Used to know when mouse entered on the our component area---- +procedure TPNGButton.MouseEnter(var Msg: TMessage); +begin + if Enabled and not(csDesigning In ComponentState) then + begin + EtatBtn:=1; // Mouse Entered + paint; + Refresh; //repainting the component + end; + + if Assigned(FOnMouseEnter) + then FOnMouseEnter(Self); //if user set a mouse enter procedure then we execute it +end; + +// To know when user exit the component area +procedure TPNGButton.MouseLeave(var Msg: TMessage); +begin + if Enabled and not(csDesigning In ComponentState) then + begin + EtatBtn:=0; //Normal + paint; + Refresh; //repainting the component + end; + + if Assigned(FOnMouseLeave) then + FOnMouseLeave(Self); //if user set a mouse leave procedure then we execute it +end; + +procedure TPNGButton.Click; +var + Form: TCustomForm; +begin + Form := GetParentForm(Self); + if Form <> nil then Form.ModalResult := ModalResult; + inherited Click; +end; + +end. diff --git a/TPNGButton.cbproj b/TPNGButton.cbproj new file mode 100644 index 0000000..1ac6be8 --- /dev/null +++ b/TPNGButton.cbproj @@ -0,0 +1,1125 @@ + + + {783AF9ED-C3A6-4C1C-936F-9FBD95456EF7} + 20.2 + VCL + TPNGButton.cpp + True + Release + Win32 + 1048577 + Package + TPNGButton + + + true + + + true + Base + true + + + true + Base + true + + + true + Base + true + + + true + Base + true + + + true + Cfg_1 + true + true + + + true + Base + true + + + true + Cfg_2 + true + true + + + TPNGButton + CppPackage + true + System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace) + <_TCHARMapping>char + E:\Ac_Project\Ac_Windows\PngButton;$(DCC_UnitSearchPath) + JPHNE + true + .\$(Platform)\$(Config) + false + true + true + $(BDSLIB)\$(PLATFORM)\release\$(LANGDIR);$(ILINK_TranslatedLibraryPath) + true + 2052 + CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName);FileDescription=$(MSBuildProjectName);ProductName=$(MSBuildProjectName) + .\$(Platform)\$(Config);$(ILINK_LibraryPath) + true + + + CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName);FileDescription=$(MSBuildProjectName);ProductName=$(MSBuildProjectName) + Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) + 1033 + true + $(BDSINCLUDE)\windows\vcl;$(IncludePath) + adortl;bcbie;bindcomp;bindcompdbx;bindcompfmx;bindcompvcl;bindengine;CloudService;CustomIPTransport;dbexpress;dbrtl;dbxcds;DbxClientDriver;DbxCommonDriver;DBXInterBaseDriver;DBXMySQLDriver;DBXSqliteDriver;dsnap;dsnapcon;dsnapxml;emsclient;IndyCore;IndyIPClient;IndyIPCommon;IndyIPServer;IndyProtocols;IndySystem;inet;inetdb;inetdbxpress;MetropolisUILiveTile;RESTBackendComponents;RESTComponents;rtl;soapmidas;soaprtl;soapserver;svn;TCapButton;TCKBox;TComboBoxComponent;tethering;TGeneralDialogPanel;TLineEdit;TRadioBtn;TSkinTrackBar;TTextButton;vcl;vclactnband;vcldb;vcldsnap;vclie;vclimg;VCLRESTComponents;vclribbon;VclSmp;vcltouch;vclx;xmlrtl;$(PackageImports) + + + adortl;bindcomp;bindcompdbx;bindcompfmx;bindcompvcl;bindengine;CloudService;CustomIPTransport;dbexpress;dbrtl;dbxcds;DbxClientDriver;DbxCommonDriver;DBXInterBaseDriver;DBXMySQLDriver;DBXSqliteDriver;dsnap;dsnapcon;dsnapxml;emsclient;IndyCore;IndyIPClient;IndyIPCommon;IndyIPServer;IndyProtocols;IndySystem;inet;inetdb;inetdbxpress;MetropolisUILiveTile;RESTBackendComponents;RESTComponents;rtl;soapmidas;soaprtl;soapserver;tethering;vcl;vclactnband;vcldb;vcldsnap;vclie;vclimg;VCLRESTComponents;vclribbon;VclSmp;vcltouch;vclx;xmlrtl;$(PackageImports) + $(BDSINCLUDE)\windows\vcl;$(IncludePath) + TPNGButtonPCH1.h + + + Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace) + Debug + true + CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments= + 1033 + true + + + false + true + false + true + _DEBUG;$(Defines) + false + None + DEBUG + true + true + true + true + Full + true + true + true + true + true + $(BDSLIB)\$(PLATFORM)\debug;$(ILINK_LibraryPath) + $(BDSLIB)\$(PLATFORM)\debug\$(LANGDIR);$(ILINK_TranslatedLibraryPath) + 2052 + CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName);FileDescription=$(MSBuildProjectName);ProductName=$(MSBuildProjectName) + + + true + true + 1033 + $(BDSLIB)\$(PLATFORM)$(CC_SUFFIX)\debug;$(ILINK_LibraryPath) + + + NDEBUG;$(Defines) + None + false + false + false + + + true + 1033 + + + + 10 + + + 8 + + + 1 + + + 0 + + + 2 + true + + + 5 + + + 6 + + + 7 + + + 8 + + + Base + + + Cfg_1 + Base + + + Cfg_2 + Base + + + + CPlusPlusBuilder.Personality.12 + CppPackage + + + + False + True + True + False + + + TPNGButton.cpp + + + Embarcadero C++Builder Office 2000 Servers Package + Embarcadero C++Builder Office XP Servers Package + Microsoft Office 2000 Sample Automation Server Wrapper Components + Microsoft Office XP Sample Automation Server Wrapper Components + + + + + + true + + + + + true + + + + + true + + + + + + + + + + + true + + + + + true + + + + + true + + + + + + + + + + + true + + + + + true + + + + + true + + + + + true + + + + + + + 1 + + + 0 + + + + + res\xml + 1 + + + res\xml + 1 + + + + + library\lib\armeabi + 1 + + + library\lib\armeabi + 1 + + + + + library\lib\armeabi-v7a + 1 + + + + + library\lib\mips + 1 + + + library\lib\mips + 1 + + + + + library\lib\armeabi-v7a + 1 + + + library\lib\arm64-v8a + 1 + + + + + library\lib\armeabi-v7a + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable-anydpi-v21 + 1 + + + res\drawable-anydpi-v21 + 1 + + + + + res\values + 1 + + + res\values + 1 + + + + + res\values-v21 + 1 + + + res\values-v21 + 1 + + + + + res\values-v31 + 1 + + + res\values-v31 + 1 + + + + + res\drawable-anydpi-v26 + 1 + + + res\drawable-anydpi-v26 + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable-anydpi-v33 + 1 + + + res\drawable-anydpi-v33 + 1 + + + + + res\values + 1 + + + res\values + 1 + + + + + res\values-night-v21 + 1 + + + res\values-night-v21 + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable-xxhdpi + 1 + + + res\drawable-xxhdpi + 1 + + + + + res\drawable-xxxhdpi + 1 + + + res\drawable-xxxhdpi + 1 + + + + + res\drawable-ldpi + 1 + + + res\drawable-ldpi + 1 + + + + + res\drawable-mdpi + 1 + + + res\drawable-mdpi + 1 + + + + + res\drawable-hdpi + 1 + + + res\drawable-hdpi + 1 + + + + + res\drawable-xhdpi + 1 + + + res\drawable-xhdpi + 1 + + + + + res\drawable-mdpi + 1 + + + res\drawable-mdpi + 1 + + + + + res\drawable-hdpi + 1 + + + res\drawable-hdpi + 1 + + + + + res\drawable-xhdpi + 1 + + + res\drawable-xhdpi + 1 + + + + + res\drawable-xxhdpi + 1 + + + res\drawable-xxhdpi + 1 + + + + + res\drawable-xxxhdpi + 1 + + + res\drawable-xxxhdpi + 1 + + + + + res\drawable-small + 1 + + + res\drawable-small + 1 + + + + + res\drawable-normal + 1 + + + res\drawable-normal + 1 + + + + + res\drawable-large + 1 + + + res\drawable-large + 1 + + + + + res\drawable-xlarge + 1 + + + res\drawable-xlarge + 1 + + + + + res\values + 1 + + + res\values + 1 + + + + + res\drawable-anydpi-v24 + 1 + + + res\drawable-anydpi-v24 + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable-night-anydpi-v21 + 1 + + + res\drawable-night-anydpi-v21 + 1 + + + + + res\drawable-anydpi-v31 + 1 + + + res\drawable-anydpi-v31 + 1 + + + + + res\drawable-night-anydpi-v31 + 1 + + + res\drawable-night-anydpi-v31 + 1 + + + + + 1 + + + 1 + + + 0 + + + + + 1 + .framework + + + 1 + .framework + + + 1 + .framework + + + 0 + + + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + 0 + .dll;.bpl + + + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + 0 + .bpl + + + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + + + 1 + + + 1 + + + + + + + + Contents\Resources + 1 + + + Contents\Resources + 1 + + + Contents\Resources + 1 + + + + + library\lib\armeabi-v7a + 1 + + + library\lib\arm64-v8a + 1 + + + 1 + + + 1 + + + 1 + + + 1 + + + 1 + + + 1 + + + 1 + + + 0 + + + + + library\lib\armeabi-v7a + 1 + + + + + 1 + + + 1 + + + 1 + + + + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF + 1 + + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF + 1 + + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF + 1 + + + + + + + + 1 + + + 1 + + + 1 + + + + + Assets + 1 + + + Assets + 1 + + + Assets + 1 + + + + + Assets + 1 + + + Assets + 1 + + + Assets + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + + + + + + + + + + + + + + True + False + True + + + 12 + + + + + diff --git a/TPNGButton.cpp b/TPNGButton.cpp new file mode 100644 index 0000000..c2815fb --- /dev/null +++ b/TPNGButton.cpp @@ -0,0 +1,17 @@ +//--------------------------------------------------------------------------- + +#include +#pragma hdrstop +#pragma package(smart_init) +//--------------------------------------------------------------------------- + +// Package source. +//--------------------------------------------------------------------------- + + +#pragma argsused +extern "C" int _libmain(unsigned long reason) +{ + return 1; +} +//--------------------------------------------------------------------------- diff --git a/TPNGButton.dpk b/TPNGButton.dpk new file mode 100644 index 0000000..7846724 --- /dev/null +++ b/TPNGButton.dpk @@ -0,0 +1,41 @@ +package TPNGButton; + +{$R *.res} +{$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} +{$ALIGN 8} +{$ASSERTIONS ON} +{$BOOLEVAL OFF} +{$DEBUGINFO OFF} +{$EXTENDEDSYNTAX ON} +{$IMPORTEDDATA ON} +{$IOCHECKS ON} +{$LOCALSYMBOLS OFF} +{$LONGSTRINGS ON} +{$OPENSTRINGS ON} +{$OPTIMIZATION ON} +{$OVERFLOWCHECKS OFF} +{$RANGECHECKS OFF} +{$REFERENCEINFO OFF} +{$SAFEDIVIDE OFF} +{$STACKFRAMES OFF} +{$TYPEDADDRESS OFF} +{$VARSTRINGCHECKS ON} +{$WRITEABLECONST OFF} +{$MINENUMSIZE 1} +{$IMAGEBASE $400000} +{$DEFINE RELEASE} +{$ENDIF IMPLICITBUILDING} +{$IMPLICITBUILD ON} + +requires + rtl, + designide, + vcl, + vclactnband, + vclx, + xmlrtl; + +contains + PNGButton in 'PNGButton.pas'; + +end. diff --git a/TPNGButton.dproj b/TPNGButton.dproj new file mode 100644 index 0000000..76fb2e2 --- /dev/null +++ b/TPNGButton.dproj @@ -0,0 +1,1033 @@ + + + {D475A10E-6FA9-4BF9-B789-A168C54EB9F5} + TPNGButton.dpk + 20.4 + VCL + True + Release + Win32 + 1 + Package + TPNGButton + + + true + + + true + Base + true + + + true + Base + true + + + true + Base + true + + + true + Base + true + + + true + Cfg_1 + true + true + + + true + Base + true + + + true + Cfg_2 + true + true + + + TPNGButton + System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace) + E:\Ac_Project\Ac_Windows\PngButton;$(DCC_UnitSearchPath) + true + bpl + All + true + .\$(Platform)\$(Config) + .\$(Platform)\$(Config) + false + false + false + false + false + true + 2052 + CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName);FileDescription=$(MSBuildProjectName);ProductName=$(MSBuildProjectName) + .\$(Platform)\$(Config) + + + Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) + 1033 + true + CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName);FileDescription=$(MSBuildProjectName);ProductName=$(MSBuildProjectName) + vcl;rtl;xmlrtl;vclactnband;vclx;$(DCC_UsePackage) + + + Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace) + Debug + true + CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments= + 1033 + vcl;rtl;xmlrtl;vclactnband;vclx;$(DCC_UsePackage) + + + Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace) + Debug + true + CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments= + 1033 + + + DEBUG;$(DCC_Define) + true + false + true + true + true + + + false + + + false + RELEASE;$(DCC_Define) + 0 + 0 + + + true + 1033 + + + + MainSource + + + + + + + + + + Base + + + Cfg_1 + Base + + + Cfg_2 + Base + + + + Delphi.Personality.12 + Package + + + + TPNGButton.dpk + + + Embarcadero C++Builder Office 2000 Servers Package + Embarcadero C++Builder Office XP Servers Package + Microsoft Office 2000 Sample Automation Server Wrapper Components + Microsoft Office XP Sample Automation Server Wrapper Components + + + + + + + 1 + + + 0 + + + + + res\xml + 1 + + + res\xml + 1 + + + + + library\lib\armeabi + 1 + + + library\lib\armeabi + 1 + + + + + library\lib\armeabi-v7a + 1 + + + + + library\lib\mips + 1 + + + library\lib\mips + 1 + + + + + library\lib\armeabi-v7a + 1 + + + library\lib\arm64-v8a + 1 + + + + + library\lib\armeabi-v7a + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable-anydpi-v21 + 1 + + + res\drawable-anydpi-v21 + 1 + + + + + res\values + 1 + + + res\values + 1 + + + + + res\values-v21 + 1 + + + res\values-v21 + 1 + + + + + res\values-v31 + 1 + + + res\values-v31 + 1 + + + + + res\values-v35 + 1 + + + res\values-v35 + 1 + + + + + res\drawable-anydpi-v26 + 1 + + + res\drawable-anydpi-v26 + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable-anydpi-v33 + 1 + + + res\drawable-anydpi-v33 + 1 + + + + + res\values + 1 + + + res\values + 1 + + + + + res\values-night-v21 + 1 + + + res\values-night-v21 + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable-xxhdpi + 1 + + + res\drawable-xxhdpi + 1 + + + + + res\drawable-xxxhdpi + 1 + + + res\drawable-xxxhdpi + 1 + + + + + res\drawable-ldpi + 1 + + + res\drawable-ldpi + 1 + + + + + res\drawable-mdpi + 1 + + + res\drawable-mdpi + 1 + + + + + res\drawable-hdpi + 1 + + + res\drawable-hdpi + 1 + + + + + res\drawable-xhdpi + 1 + + + res\drawable-xhdpi + 1 + + + + + res\drawable-mdpi + 1 + + + res\drawable-mdpi + 1 + + + + + res\drawable-hdpi + 1 + + + res\drawable-hdpi + 1 + + + + + res\drawable-xhdpi + 1 + + + res\drawable-xhdpi + 1 + + + + + res\drawable-xxhdpi + 1 + + + res\drawable-xxhdpi + 1 + + + + + res\drawable-xxxhdpi + 1 + + + res\drawable-xxxhdpi + 1 + + + + + res\drawable-small + 1 + + + res\drawable-small + 1 + + + + + res\drawable-normal + 1 + + + res\drawable-normal + 1 + + + + + res\drawable-large + 1 + + + res\drawable-large + 1 + + + + + res\drawable-xlarge + 1 + + + res\drawable-xlarge + 1 + + + + + res\values + 1 + + + res\values + 1 + + + + + res\drawable-anydpi-v24 + 1 + + + res\drawable-anydpi-v24 + 1 + + + + + res\drawable + 1 + + + res\drawable + 1 + + + + + res\drawable-night-anydpi-v21 + 1 + + + res\drawable-night-anydpi-v21 + 1 + + + + + res\drawable-anydpi-v31 + 1 + + + res\drawable-anydpi-v31 + 1 + + + + + res\drawable-night-anydpi-v31 + 1 + + + res\drawable-night-anydpi-v31 + 1 + + + + + 1 + + + 1 + + + 0 + + + + + 1 + .framework + + + 1 + .framework + + + 1 + .framework + + + 0 + + + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + 0 + .dll;.bpl + + + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + 0 + .bpl + + + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + + + 1 + + + 1 + + + + + + + + Contents\Resources + 1 + + + Contents\Resources + 1 + + + Contents\Resources + 1 + + + + + library\lib\armeabi-v7a + 1 + + + library\lib\arm64-v8a + 1 + + + 1 + + + 1 + + + 1 + + + 1 + + + 1 + + + 1 + + + 1 + + + 0 + + + + + library\lib\armeabi-v7a + 1 + + + + + 1 + + + 1 + + + 1 + + + 1 + + + + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF + 1 + + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF + 1 + + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF + 1 + + + + + + + + 1 + + + 1 + + + 1 + + + + + Assets + 1 + + + Assets + 1 + + + Assets + 1 + + + + + Assets + 1 + + + Assets + 1 + + + Assets + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + ..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset + 1 + + + + + + + + + + + + + + + + + + + True + False + False + + + 12 + + + + + diff --git a/TPNGButton.dsk b/TPNGButton.dsk new file mode 100644 index 0000000..13ae07c --- /dev/null +++ b/TPNGButton.dsk @@ -0,0 +1,667 @@ +[Closed Files] +File_0=TSourceModule,'d:\program file\embarcadero\studio\23.0\include\dinkumware\xlocnum',0,1,1586,20,1618,0,0,, +File_1=TSourceModule,'E:\Ac_Project\Ac_Windows\PngButton\TPNGButtonPCH1.h',0,1,1,1,1,0,0,, +File_2=TSourceModule,'d:\program file\embarcadero\studio\23.0\include\windows\crtl\typeinfo.h',0,1,122,2,154,0,0,, +File_3=TSourceModule,'E:\BCB_Project\Apps\UKeyApps\SLPChecker\SLPChecker.cpp',0,1,1,99,594,0,0,, +File_4=TSourceModule,'E:\BCB_Project\Apps\UKeyApps\SLPrint\PrintThread.cpp',0,1,1,1,1,0,0,, +File_5=TSourceModule,'E:\BCB_Project\Apps\UKeyApps\SLPChecker\Common.cpp',0,1,34,63,66,0,0,, +File_6=TSourceModule,'E:\BCB_Project\Apps\UKeyApps\SLPChecker\SLPChecker.vrc',0,1,1,1,2,0,0,, +File_7=TSourceModule,'E:\BCB_Project\Apps\Global\GlobalUnit.cpp',0,1,1,1,1,0,0,, +File_8=TSourceModule,'E:\BCB_Project\Apps\TotalGoals\Datas.cpp',0,1,1834,55,1847,0,0,, +File_9=TSourceModule,'E:\BCB_Project\Apps\TotalGoals\TGsMain.cpp',0,1,1378,115,1406,0,0,, +File_10=TSourceModule,'E:\BCB_Project\Apps\SportteryHedge\SLHdgMain.cpp',0,1,1,1,1,0,0,, +File_11=TSourceModule,'E:\BCB_Project\Apps\TotalGoals\HGPanelUnit.cpp',0,1,145,75,169,0,0,, +File_12=TSourceModule,'E:\BCB_Project\Apps\TotalGoals\BDPanelUnit.cpp',0,1,134,57,79,0,0,, +File_13=TSourceModule,'E:\BCB_Project\Apps\TotalGoals\SLPanelUnit.cpp',0,1,9,56,26,0,0,, +File_14=TSourceModule,'E:\BCB_Project\Apps\TotalGoals\ChromePanelUnit.cpp',0,1,241,29,272,0,0,, + +[Modules] +Module0=E:\Ac_Project\Ac_Windows\PngButton\PNGButton.pas +Count=1 +EditWindowCount=1 + +[E:\Ac_Project\Ac_Windows\PngButton\PNGButton.pas] +ModuleType=TSourceModule + +[EditWindow0] +ViewCount=1 +CurrentEditView=E:\Ac_Project\Ac_Windows\PngButton\PNGButton.pas +View0=0 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=9938 +Height=9454 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=9938 +ClientHeight=9454 +TBDockHeight=4476 +LRDockWidth=3621 +Dockable=1 +StayOnTop=0 +DockedToMainForm=1 +BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 +TopPanelSize=0 +LeftPanelSize=1883 +LeftPanelClients=PropertyInspector,DockSite3 +LeftPanelData=000008000101000000009210000000000000015B0700000000000001000000005A0E000009000000446F636B53697465330100000000761D00001100000050726F7065727479496E73706563746F72FFFFFFFF +RightPanelSize=1996 +RightPanelClients=DockSite2,DockSite4 +RightPanelData=00000800010100000000921000000000000001CC0700000000000001000000004912000009000000446F636B53697465320100000000761D000009000000446F636B5369746534FFFFFFFF +BottomPanelSize=1542 +BottomPanelClients=DockSite1,MessageView +BottomPanelData=0000080001020100000009000000446F636B536974653103450000000000000206060000000000000100000000034500000F0000004D65737361676556696577466F726DFFFFFFFF +BottomMiddlePanelSize=0 +BottomMiddlePanelClients=DockSite0,GraphDrawingModel +BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779F1D00000000000002F206000000000000FFFFFFFF + +[View0] +CustomEditViewType=TEditView +Module=E:\Ac_Project\Ac_Windows\PngButton\PNGButton.pas +CursorX=82 +CursorY=200 +TopLine=181 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=E:\Ac_Project\Ac_Windows\PngButton\PNGButton.pas + +[Watches] +Count=0 + +[WatchWindow] +WatchColumnWidth=120 +WatchShowColumnHeaders=1 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3824 +Height=1221 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3824 +ClientHeight=1221 +TBDockHeight=216 +LRDockWidth=13602 +Dockable=1 +StayOnTop=0 + +[Breakpoints] +Count=0 + +[EmbarcaderoWin32Debugger_AddressBreakpoints] +Count=0 + +[EmbarcaderoWin64Debugger_AddressBreakpoints] +Count=0 + +[EmbarcaderoWin64LLDBDebugger_AddressBreakpoints] +Count=0 + +[Main Window] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=0 +State=2 +Left=145 +Top=273 +Width=8930 +Height=8520 +MaxLeft=-4 +MaxTop=-7 +MaxWidth=8930 +MaxHeight=8520 +ClientWidth=10000 +ClientHeight=10057 +BottomPanelSize=9139 +BottomPanelClients=EditWindow0 +BottomPanelData=0000080000000000000000000000000000000000000000000000000100000000000000000C0000004564697457696E646F775F30FFFFFFFF + +[ProjectManager] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1996 +Height=4382 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1996 +ClientHeight=4382 +TBDockHeight=5898 +LRDockWidth=2348 +Dockable=1 +StayOnTop=0 + +[MessageView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=28 +Width=9938 +Height=1394 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=9938 +ClientHeight=1394 +TBDockHeight=1394 +LRDockWidth=2770 +Dockable=1 +StayOnTop=0 + +[ToolForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1996 +Height=2759 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1996 +ClientHeight=2759 +TBDockHeight=7155 +LRDockWidth=1996 +Dockable=1 +StayOnTop=0 + +[PropertyInspector] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=557 +Width=1883 +Height=3800 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1883 +ClientHeight=3800 +PixelsPerInch=96 +MonitorNum=0 +TBDockHeight=7205 +LRDockWidth=1883 +Dockable=1 +StayOnTop=0 +SplitPos=110 + +[frmDesignPreview] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1996 +Height=7004 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1996 +ClientHeight=7004 +TBDockHeight=5955 +LRDockWidth=2512 +Dockable=1 +StayOnTop=0 + +[TemplateView] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=-2296 +Top=398 +Width=273 +Height=359 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=273 +ClientHeight=359 +TBDockHeight=359 +LRDockWidth=273 +Dockable=1 +StayOnTop=0 +Name=120 +Description=334 +filter=1 + +[DebugLogView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3824 +Height=1221 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3824 +ClientHeight=1221 +TBDockHeight=409 +LRDockWidth=4949 +Dockable=1 +StayOnTop=0 + +[ThreadStatusWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3824 +Height=1221 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3824 +ClientHeight=1221 +TBDockHeight=216 +LRDockWidth=7406 +Dockable=1 +StayOnTop=0 +Column0Width=145 +Column1Width=100 +Column2Width=115 +Column3Width=619 + +[LocalVarsWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3824 +Height=1221 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3824 +ClientHeight=1221 +TBDockHeight=1537 +LRDockWidth=3484 +Dockable=1 +StayOnTop=0 + +[CallStackWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3824 +Height=1221 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3824 +ClientHeight=1221 +TBDockHeight=2062 +LRDockWidth=3484 +Dockable=1 +StayOnTop=0 + +[PatchForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2340 +Height=1279 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2340 +ClientHeight=1279 +TBDockHeight=2500 +LRDockWidth=3398 +Dockable=1 +StayOnTop=0 + +[FindReferencsForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2340 +Height=1042 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2340 +ClientHeight=1042 +TBDockHeight=2320 +LRDockWidth=2824 +Dockable=1 +StayOnTop=0 + +[RefactoringForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2340 +Height=1279 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2340 +ClientHeight=1279 +TBDockHeight=3211 +LRDockWidth=2824 +Dockable=1 +StayOnTop=0 + +[ToDo List] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2340 +Height=1279 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2340 +ClientHeight=1279 +TBDockHeight=1157 +LRDockWidth=3676 +Dockable=1 +StayOnTop=0 +Column0Width=314 +Column1Width=30 +Column2Width=150 +Column3Width=172 +Column4Width=129 +SortOrder=4 +ShowHints=1 +ShowChecked=1 + +[DataExplorerContainer] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1996 +Height=7004 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1996 +ClientHeight=7004 +TBDockHeight=4885 +LRDockWidth=7148 +Dockable=1 +StayOnTop=0 + +[GraphDrawingModel] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=501 +Top=1099 +Width=2855 +Height=3211 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2855 +ClientHeight=3211 +TBDockHeight=3211 +LRDockWidth=2855 +Dockable=1 +StayOnTop=0 + +[BreakpointWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3824 +Height=1221 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3824 +ClientHeight=1221 +TBDockHeight=1545 +LRDockWidth=8742 +Dockable=1 +StayOnTop=0 +Column0Width=200 +Column1Width=75 +Column2Width=200 +Column3Width=200 +Column4Width=200 +Column5Width=75 +Column6Width=75 + +[StructureView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1883 +Height=3542 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1883 +ClientHeight=3542 +TBDockHeight=3678 +LRDockWidth=1895 +Dockable=1 +StayOnTop=0 + +[ParnassusBookmarksForm] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=0 +State=0 +Left=0 +Top=0 +Width=2227 +Height=2364 +MaxLeft=-4 +MaxTop=-7 +ClientWidth=2164 +ClientHeight=2083 +TBDockHeight=2364 +LRDockWidth=2227 +Dockable=1 +StayOnTop=0 + +[BorlandEditorCodeExplorer@EditWindow0] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=0 +State=0 +Left=0 +Top=0 +Width=1824 +Height=6171 +MaxLeft=-4 +MaxTop=-7 +ClientWidth=1762 +ClientHeight=5891 +TBDockHeight=6171 +LRDockWidth=1824 +Dockable=1 +StayOnTop=0 + +[DockHosts] +DockHostCount=5 + +[DockSite0] +HostDockSite=DockBottomCenterPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=8 +Top=8 +Width=2340 +Height=1480 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2340 +ClientHeight=1480 +PixelsPerInch=96 +MonitorNum=0 +TBDockHeight=1480 +LRDockWidth=2340 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=RefactoringForm +TabDockClients=RefactoringForm,PatchForm,FindReferencsForm,ToDo List + +[DockSite1] +HostDockSite=DockBottomPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=0 +Top=28 +Width=3824 +Height=1422 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3824 +ClientHeight=1422 +PixelsPerInch=96 +MonitorNum=0 +TBDockHeight=1422 +LRDockWidth=3824 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=DebugLogView +TabDockClients=DebugLogView,BreakpointWindow,ThreadStatusWindow,CallStackWindow,WatchWindow,LocalVarsWindow + +[DockSite2] +HostDockSite=DockRightPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=28 +Width=1996 +Height=4583 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1996 +ClientHeight=4583 +PixelsPerInch=96 +MonitorNum=0 +TBDockHeight=7205 +LRDockWidth=1996 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=ProjectManager +TabDockClients=ProjectManager,DataExplorerContainer,frmDesignPreview + +[DockSite3] +HostDockSite=DockLeftPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=28 +Width=1883 +Height=3542 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1883 +ClientHeight=3542 +PixelsPerInch=96 +MonitorNum=0 +TBDockHeight=7205 +LRDockWidth=1883 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=StructureView +TabDockClients=StructureView + +[DockSite4] +HostDockSite=DockRightPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=702 +Width=1996 +Height=2759 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1996 +ClientHeight=2759 +PixelsPerInch=96 +MonitorNum=0 +TBDockHeight=7205 +LRDockWidth=1996 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=ToolForm +TabDockClients=ToolForm,TemplateView + diff --git a/TPNGButton.dsv b/TPNGButton.dsv new file mode 100644 index 0000000..6a62d74 --- /dev/null +++ b/TPNGButton.dsv @@ -0,0 +1,70 @@ +[ClosedView_RTpcQWNfUHJvamVjdFxBY19XaW5kb3dzXFBuZ0J1dHRvblxQTkdCdXR0b24ucGFz] +Module=E:\Ac_Project\Ac_Windows\PngButton\PNGButton.pas +CursorX=43 +CursorY=95 +TopLine=181 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=E:\Ac_Project\Ac_Windows\PngButton\PNGButton.pas +[ClosedView_ZDpccHJvZ3JhbSBmaWxlXGVtYmFyY2FkZXJvXHN0dWRpb1wyMy4wXGluY2x1ZGVcd2luZG93c1xj +cnRsXHR5cGVpbmZvLmg=] +Module=d:\program file\embarcadero\studio\23.0\include\windows\crtl\typeinfo.h +CursorX=2 +CursorY=154 +TopLine=122 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName= + +[ClosedView_RTpcQWNfUHJvamVjdFxBY19XaW5kb3dzXFBuZ0J1dHRvblxUUE5HQnV0dG9uLmNwcA==] +Module=E:\Ac_Project\Ac_Windows\PngButton\TPNGButton.cpp +CursorX=1 +CursorY=1 +TopLine=1 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=E:\Ac_Project\Ac_Windows\PngButton\TPNGButton.cpp + +[ClosedView_RTpcQWNfUHJvamVjdFxBY19XaW5kb3dzXFBuZ0J1dHRvblxUUE5HQnV0dG9uUENIMS5o] +Module=E:\Ac_Project\Ac_Windows\PngButton\TPNGButtonPCH1.h +CursorX=1 +CursorY=1 +TopLine=1 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName= +[ClosedView_ZDpccHJvZ3JhbSBmaWxlXGVtYmFyY2FkZXJvXHN0dWRpb1wyMy4wXGluY2x1ZGVcZGlua3Vtd2Fy +ZVx4bG9jbnVt] +Module=d:\program file\embarcadero\studio\23.0\include\dinkumware\xlocnum +CursorX=20 +CursorY=1618 +TopLine=1586 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=d:\program file\embarcadero\studio\23.0\include\dinkumware\xlocnum +[ClosedView_ZDpccHJvZ3JhbSBmaWxlXGVtYmFyY2FkZXJvXHN0dWRpb1wyMy4wXGluY2x1ZGVcZGlua3Vtd2Fy +ZVx4bG9jbnVt] +Module=d:\program file\embarcadero\studio\23.0\include\dinkumware\xlocnum +CursorX=20 +CursorY=1618 +TopLine=1586 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=d:\program file\embarcadero\studio\23.0\include\dinkumware\xlocnum + +[ClosedView_RTpcQWNfUHJvamVjdFxBY19XaW5kb3dzXEFjY29tcGFueUN1YmVcUE5HQnV0dG9uLmhwcA==] +Module=E:\Ac_Project\Ac_Windows\AccompanyCube\PNGButton.hpp +CursorX=85 +CursorY=67 +TopLine=34 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=E:\Ac_Project\Ac_Windows\AccompanyCube\PNGButton.hpp + diff --git a/TPNGButton.identcache b/TPNGButton.identcache new file mode 100644 index 0000000..7c30472 Binary files /dev/null and b/TPNGButton.identcache differ diff --git a/TPNGButton.res b/TPNGButton.res new file mode 100644 index 0000000..4bd1f2c Binary files /dev/null and b/TPNGButton.res differ diff --git a/TPNGButtonPCH1.h b/TPNGButtonPCH1.h new file mode 100644 index 0000000..dfe6b62 --- /dev/null +++ b/TPNGButtonPCH1.h @@ -0,0 +1,4 @@ +#ifdef _WIN32 +#include +#endif +