| Last change
 on this file since 640 was             541, checked in by Kevin Toppenberg, 16 years ago | 
        
          | 
TMG Ver 1.1 Added HTML Support, better demographics editing
 | 
        
          | File size:
            693 bytes | 
      
      
| Rev | Line |  | 
|---|
| [541] | 1 | unit fTMGPrintingAnimation; | 
|---|
|  | 2 | //kt added this entire unit and form. | 
|---|
|  | 3 | //kt The initial plan was to have a printing animation. | 
|---|
|  | 4 | //   but it depended on an AVI begin found, and it was easy to break, | 
|---|
|  | 5 | //   so was replaced with simple picture of printer... | 
|---|
|  | 6 |  | 
|---|
|  | 7 | interface | 
|---|
|  | 8 |  | 
|---|
|  | 9 | uses | 
|---|
|  | 10 | Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, | 
|---|
|  | 11 | Dialogs, ComCtrls, StdCtrls, ExtCtrls, pngimage; | 
|---|
|  | 12 |  | 
|---|
|  | 13 | type | 
|---|
|  | 14 | TfrmTMGPrinting = class(TForm) | 
|---|
|  | 15 | lblPrinting: TLabel; | 
|---|
|  | 16 | pnlBackground: TPanel; | 
|---|
|  | 17 | Image1: TImage; | 
|---|
|  | 18 | private | 
|---|
|  | 19 | { Private declarations } | 
|---|
|  | 20 | public | 
|---|
|  | 21 | { Public declarations } | 
|---|
|  | 22 | end; | 
|---|
|  | 23 |  | 
|---|
|  | 24 | var | 
|---|
|  | 25 | frmTMGPrinting: TfrmTMGPrinting; | 
|---|
|  | 26 |  | 
|---|
|  | 27 | implementation | 
|---|
|  | 28 |  | 
|---|
|  | 29 | {$R *.dfm} | 
|---|
|  | 30 |  | 
|---|
|  | 31 | end. | 
|---|
|  | 32 |  | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.