source: trunk/Forms/UFormCommit.pas

Last change on this file was 7, checked in by chronos, 10 years ago
  • Added: Commit form.
File size: 913 bytes
Line 
1unit UFormCommit;
2
3{$mode delphi}
4
5interface
6
7uses
8 Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
9 ComCtrls, ExtCtrls;
10
11type
12
13 { TFormCommit }
14
15 TFormCommit = class(TForm)
16 ButtonCancel: TButton;
17 ButtonOk: TButton;
18 ComboBox1: TComboBox;
19 GroupBox1: TGroupBox;
20 ListView1: TListView;
21 MemoMessage: TMemo;
22 Panel1: TPanel;
23 Splitter1: TSplitter;
24 procedure ButtonCancelClick(Sender: TObject);
25 procedure FormCreate(Sender: TObject);
26 procedure GroupBox1Click(Sender: TObject);
27 private
28 { private declarations }
29 public
30 { public declarations }
31 end;
32
33var
34 FormCommit: TFormCommit;
35
36implementation
37
38{$R *.lfm}
39
40{ TFormCommit }
41
42procedure TFormCommit.FormCreate(Sender: TObject);
43begin
44
45end;
46
47procedure TFormCommit.GroupBox1Click(Sender: TObject);
48begin
49
50end;
51
52procedure TFormCommit.ButtonCancelClick(Sender: TObject);
53begin
54
55end;
56
57end.
58
Note: See TracBrowser for help on using the repository browser.