28 lines
489 B
Plaintext
28 lines
489 B
Plaintext
unit MainForm;
|
|
{$mode delphi}
|
|
interface
|
|
uses ActnList, Classes, ComCtrls, Menus, SysUtils, FileUtil, Forms, Controls,
|
|
Graphics, Dialogs;
|
|
type
|
|
|
|
{ TMainFrm }
|
|
|
|
TMainFrm = class(TForm)
|
|
ActionList: TActionList;
|
|
ImageList: TImageList;
|
|
MainMenu: TMainMenu;
|
|
FileM: TMenuItem;
|
|
EditM: TMenuItem;
|
|
HelpM: TMenuItem;
|
|
ToolsM: TMenuItem;
|
|
PopupMenu: TPopupMenu;
|
|
ToolBar: TToolBar;
|
|
private
|
|
public
|
|
end;
|
|
var
|
|
MainFrm: TMainFrm;
|
|
implementation
|
|
{$R *.lfm}
|
|
end.
|