}

Delphi.int.ru — Портал программистов

Вход Регистрация | Забыли пароль?

Просмотр кода

Идентификатор: 92ee2e1a Описание: Код загружен: 13 июля 2011, 19:28 (Моисеев Евгений Леонидович)

  1. unit Unit14;
  2.  
  3. interface
  4.  
  5. uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
  6. Buttons, ExtCtrls;
  7.  
  8. type
  9. TAboutBox = class(TForm)
  10. Panel1: TPanel;
  11. ProgramIcon: TImage;
  12. ProductName: TLabel;
  13. Version: TLabel;
  14. Copyright: TLabel;
  15. Comments: TLabel;
  16. OKButton: TButton;
  17. Label1: TLabel;
  18. Label2: TLabel;
  19. private
  20. { Private declarations }
  21. public
  22. { Public declarations }
  23. end;
  24.  
  25. var
  26. AboutBox: TAboutBox;
  27.  
  28. implementation
  29.  
  30. {$R *.dfm}
  31.  
  32. end.

Ссылка на данный код:

На главную страницу сервиса обмена кодом »