diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..fe50c4d
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,8 @@
+*.o
+*.ppu
+*.obj
+*.exe
+*.dll
+*.compiled
+*.bak
+*.lps
diff --git a/Chameleon.dof b/Chameleon.dof
deleted file mode 100644
index 9d48bcd..0000000
--- a/Chameleon.dof
+++ /dev/null
@@ -1,87 +0,0 @@
-[FileVersion]
-Version=6.0
-[Compiler]
-A=8
-B=0
-C=1
-D=1
-E=0
-F=0
-G=1
-H=1
-I=1
-J=0
-K=0
-L=1
-M=0
-N=1
-O=1
-P=1
-Q=0
-R=0
-S=0
-T=0
-U=0
-V=1
-W=0
-X=1
-Y=1
-Z=1
-ShowHints=1
-ShowWarnings=1
-UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
-[Linker]
-MapFile=0
-OutputObjs=0
-ConsoleApp=1
-DebugInfo=0
-RemoteSymbols=0
-MinStackSize=16384
-MaxStackSize=1048576
-ImageBase=4194304
-ExeDescription=
-[Directories]
-OutputDir=
-UnitOutputDir=
-PackageDLLOutputDir=
-PackageDCPOutputDir=
-SearchPath=
-Packages=
-Conditionals=
-DebugSourceDirs=
-UsePackages=0
-[Parameters]
-RunParams=
-HostApplication=
-Launcher=
-UseLauncher=0
-DebugCWD=
-[Language]
-ActiveLang=
-ProjectLang=
-RootDir=
-[Version Info]
-IncludeVerInfo=1
-AutoIncBuild=0
-MajorVer=1
-MinorVer=0
-Release=0
-Build=0
-Debug=0
-PreRelease=0
-Special=0
-Private=0
-DLL=0
-Locale=1033
-CodePage=1252
-[Version Info Keys]
-CompanyName=
-FileDescription=
-FileVersion=1.0.0.0
-InternalName=
-LegalCopyright=
-LegalTrademarks=
-OriginalFilename=
-ProductName=
-ProductVersion=1.0.0.0
-Comments=
diff --git a/Chameleon.lpi b/Chameleon.lpi
index 771f1cd..123dd97 100644
--- a/Chameleon.lpi
+++ b/Chameleon.lpi
@@ -22,6 +22,12 @@
+
+
+
+
+
+
diff --git a/Chameleon.res b/Chameleon.res
index 45affc0..0d06996 100644
Binary files a/Chameleon.res and b/Chameleon.res differ
diff --git a/about1.pas b/about1.pas
index 59adb3d..dfaf755 100644
--- a/about1.pas
+++ b/about1.pas
@@ -4,7 +4,7 @@ unit about1;
interface
-uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
+uses SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
Buttons, ExtCtrls;
type
@@ -29,4 +29,4 @@ implementation
{$R *.lfm}
end.
-
\ No newline at end of file
+
diff --git a/frmMain.lfm b/frmMain.lfm
index 801de59..a056717 100644
--- a/frmMain.lfm
+++ b/frmMain.lfm
@@ -205,7 +205,7 @@ object MainForm: TMainForm
end
end
end
- object BitBtn1: TBitBtn
+ object btnAbout: TBitBtn
Left = 323
Height = 37
Top = 11
@@ -227,7 +227,7 @@ object MainForm: TMainForm
}
ModalResult = 3
NumGlyphs = 2
- OnClick = BitBtn1Click
+ OnClick = btnAboutClick
TabOrder = 2
end
object SaveDialog1: TSaveDialog
diff --git a/frmMain.pas b/frmMain.pas
index b2f018e..038cb8b 100644
--- a/frmMain.pas
+++ b/frmMain.pas
@@ -36,7 +36,7 @@ type
RCFileName: TEdit;
BrowseRC: TButton;
SaveRC: TButton;
- BitBtn1: TBitBtn;
+ btnAbout: TBitBtn;
procedure InformationClick(Sender: TObject);
procedure BrowsePasClick(Sender: TObject);
procedure BrowseRCClick(Sender: TObject);
@@ -45,7 +45,7 @@ type
procedure optManualClick(Sender: TObject);
procedure optAutomaticClick(Sender: TObject);
procedure RCFileNameChange(Sender: TObject);
- procedure BitBtn1Click(Sender: TObject);
+ procedure btnAboutClick(Sender: TObject);
procedure SaveRCClick(Sender: TObject);
private
procedure GenerateDfmFile(const filename, frmname: string;
@@ -292,9 +292,6 @@ begin
EnableSavePas;
end;
-
-
-
procedure TMainForm.EnableWndInput;
begin
WndValue.Enabled := optManual.Checked;
@@ -311,13 +308,12 @@ begin
EnableWndInput;
end;
-
procedure TMainForm.RCFileNameChange(Sender: TObject);
begin
SaveRC.Enabled := False;
end;
-procedure TMainForm.BitBtn1Click(Sender: TObject);
+procedure TMainForm.btnAboutClick(Sender: TObject);
begin
AboutBox.ShowModal;
end;