Quick tutorial showing how to store info about your application in the windows registry. The class is written so that all applications you ever write will get their info stored, this can be useful when writing lots of applications
The reson i wrote this small class is that i tend to write lots of software. This class provides a standard way to store info about an application that can be read by any of your apps.
Uses Classes, Sysutils, Registry, Windows;
TApplicationRegistryInfo = class (TObject)
property AppName: string read FAppName write FAppName;
property Location: string read FLocation write FLocation;
property Version: string read FVersion write FVersion;
reg := Tregistry.Create;
reg.RootKey := HKEY_LOCAL_MACHINE;
if FAppName <> '' then begin
if reg.OpenKey(Format('\SOFTWARE\Innovative Software\%s\Info',[AppName]),TRUE) then
Even though there are only a few fields in this class, it can easily be extended to suit your needs, consider this class a baseclass that can be extended as needed.
add AppRegInfo to uses in main form.
// register usage first
reginfo.AppName := 'Application Name';
reginfo.Location := Application.ExeName;
// version info this could also be extracted from the exe
reginfo.Version := '1 Beta';