lazedit: Adds a about box

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2299 8e941d3f-bd1b-0410-a28a-d453659cc2b4

applications/lazedit/lazedit_about.pas

@@ -0,0 +1,41 @@
+unit lazedit_about;
+
+{$mode objfpc}{$H+}
+
+interface
+
+uses
+  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
+  lazedit_constants;
+
+type
+
+  { TformAbout }
+
+  TformAbout = class(TForm)
+    Button1: TButton;
+    Label1: TLabel;
+    labelCopyright: TLabel;
+    procedure FormCreate(Sender: TObject);
+  private
+    { private declarations }
+  public
+    { public declarations }
+  end;
+
+var
+  formAbout: TformAbout;
+
+implementation
+
+{$R *.lfm}
+
+{ TformAbout }
+
+procedure TformAbout.FormCreate(Sender: TObject);
+begin
+  labelCopyright.Caption := CopyLeftStatement;
+end;
+
+end.
+