Разработка программы психотестирования
Категория реферата: Рефераты по информатике, программированию
Теги реферата: решебник по русскому языку, шпаргалки по праву бесплатно
Добавил(а) на сайт: Назар.
Предыдущая страница реферата | 2 3 4 5 6 7 8 9 10 11 12 | Следующая страница реферата
procedure TForm1.N4Click(Sender: TObject); begin close; end;
procedure TForm1.N7Click(Sender: TObject); begin aboutbox.show end;
procedure TForm1.N2Click(Sender: TObject); begin if opendialog1.Execute then memo1.Lines.LoadFromFile(opendialog1.filename) end;
procedure TForm1.N3Click(Sender: TObject); begin if savedialog1.Execute then memo1.Lines.SaveToFile(savedialog1.filename) end;
end.
unit Unit2;
{Модуль, описывающий окно “О программе”}
interface
uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
Buttons, ExtCtrls;
type
TAboutBox = class(TForm)
Panel1: TPanel;
ProgramIcon: TImage;
ProductName: TLabel;
Comments: TLabel;
OKButton: TButton; procedure OKButtonClick(Sender: TObject); private
{ Private declarations } public
{ Public declarations } end;
var
AboutBox: TAboutBox;
implementation
{$R *.DFM}
procedure TAboutBox.OKButtonClick(Sender: TObject); begin
Hide end; end.
Данная программа демонстрирует использование меню. Она имеет главное
меню и всплывающее, которое появляется при нажатии правой кнопки мышки.
Меню снабжены клавишами быстрого доступа, используется разделительная
линия.
Меню «Открыть», «Сохранить», «Выход» и «О программе» снабжены
клавишами быстрого доступа. Всплывающее меню, имеющее два пункта –
«Открыть» и «Сохранить». При их нажатии вызываются события соотвутствующих
пунктов главного меню.
Выводы
Рекомендуем скачать другие рефераты по теме: реферат слово, шпорі по философии.
Предыдущая страница реферата | 2 3 4 5 6 7 8 9 10 11 12 | Следующая страница реферата