home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 August / VPR9708A.ISO / D3TRIAL / INSTALL / DATA.Z / delphi32.exe / RCDATA / AXNEWSOURCE next >
Text File  |  1997-05-14  |  1KB  |  82 lines
  1. unit %0:s;
  2.  
  3. interface
  4.  
  5. uses
  6.   Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  7.   StdCtrls, ExtCtrls;
  8.  
  9. type
  10.   T%1:s = class(TForm)
  11.     CtlImage: TSpeedButton;
  12.     NameLbl: TLabel;
  13.     OkBtn: TButton;
  14.     CopyrightLbl: TLabel;
  15.     DescLbl: TLabel;
  16.   end;
  17.  
  18. procedure Show%1:s;
  19.  
  20. implementation
  21.  
  22. {$R *.DFM}
  23.  
  24. procedure Show%1:s;
  25. begin
  26.   with T%1:s.Create(nil) do
  27.     try
  28.       ShowModal;
  29.     finally
  30.       Free;
  31.     end;
  32. end;
  33.  
  34. end.
  35. |object %0:s: T%0:s
  36.   Left = 200
  37.   Top = 108
  38.   BorderIcons = [biSystemMenu]
  39.   BorderStyle = bsDialog
  40.   AutoScroll = False
  41.   Caption = 'About'
  42.   ClientHeight = 127
  43.   ClientWidth = 267
  44.   Position = poScreenCenter
  45.   PixelsPerInch = 96
  46.   TextHeight = 13
  47. |  object NameLbl: TLabel
  48.     Left = 80
  49.     Top = 16
  50.     Width = 177
  51.     Height = 16
  52.     Caption = '%s'
  53.     ParentFont = True
  54.   end
  55.   object CopyrightLbl: TLabel
  56.     Left = 56
  57.     Top = 72
  58.     Width = 155
  59.     Height = 13
  60.     Caption = 'Copyright (c) 1997 Frank Borland'
  61.   end
  62.   object DescLbl: TLabel
  63.     Left = 80
  64.     Top = 34
  65.     Width = 53
  66.     Height = 13
  67.     Caption = 'Description'
  68.   end
  69.   object OkBtn: TButton
  70.     Left = 96
  71.     Top = 96
  72.     Width = 75
  73.     Height = 25
  74.     Cancel = True
  75.     Caption = 'OK'
  76.     Default = True
  77.     ModalResult = 1
  78.     TabOrder = 0
  79.   end
  80. end
  81. |
  82.