| Class TFilePropForm (unit FileProp) |
TForm
| Constructors |
| Functions |
procedure CloseButClick(Sender: TObject);
procedure DelButClick(Sender: TObject);
procedure DiffButClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure GetButClick(Sender: TObject);
procedure ListView1Change(Sender: TObject; Item: TListItem;
Change: TItemChange);
procedure ListView1ColumnClick(Sender: TObject; Column: TListColumn);
procedure ListView1Compare(Sender: TObject; Item1, Item2: TListItem;
Data: Integer; var Compare: Integer);
procedure ViewButClick(Sender: TObject);
procedure AddHI(hi: THistoryItem; Num: integer);
procedure CheckButtons;
procedure ShowFileNode(fn: TFileNode);
procedure ShowProj(Proj: TProjectNode);| Properties |
| Events |
| Variables |
ButPanel : TPanel;
CloseBut : TButton;
DelBut : TButton;
DiffBut : TButton;
GetBut : TButton;
ListView1 : TListView;
Panel2 : TPanel;
StatusBar1 : TStatusBar;
ViewBut : TButton;
DifProg : string;
LastCol : TListColumn;
ObjList : TComponent;
Rev : integer;| Constructors |
| Functions |
procedure CloseButClick(Sender: TObject);
procedure DelButClick(Sender: TObject);
procedure DiffButClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure GetButClick(Sender: TObject);
procedure ListView1Change(Sender: TObject; Item: TListItem;
Change: TItemChange);
procedure ListView1ColumnClick(Sender: TObject; Column: TListColumn);
procedure ListView1Compare(Sender: TObject; Item1, Item2: TListItem;
Data: Integer; var Compare: Integer);
procedure ViewButClick(Sender: TObject);
procedure AddHI(hi: THistoryItem; Num: integer);
procedure CheckButtons;
procedure ShowFileNode(fn: TFileNode);
procedure ShowProj(Proj: TProjectNode);| Properties |
| Events |
| Variables |
ButPanel : TPanel;
CloseBut : TButton;
DelBut : TButton;
DiffBut : TButton;
GetBut : TButton;
ListView1 : TListView;
Panel2 : TPanel;
StatusBar1 : TStatusBar;
ViewBut : TButton;
DifProg : string;
LastCol : TListColumn;
ObjList : TComponent;Public declarations
Rev : integer;