source: cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/fTMGPrintingAnimation.pas@ 809

Last change on this file since 809 was 669, checked in by Kevin Toppenberg, 15 years ago

Adding fTMGPrintingAnimation

File size: 727 bytes
Line 
1unit 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 a printer...
6
7interface
8
9uses
10 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
11 Dialogs, ComCtrls, StdCtrls, ExtCtrls, pngimage, Buttons;
12
13type
14 TfrmTMGPrinting = class(TForm)
15 lblPrinting: TLabel;
16 pnlBackground: TPanel;
17 Image1: TImage;
18 btnDone: TBitBtn;
19 private
20 { Private declarations }
21 public
22 { Public declarations }
23 end;
24
25var
26 frmTMGPrinting: TfrmTMGPrinting;
27
28implementation
29
30{$R *.dfm}
31
32end.
33
Note: See TracBrowser for help on using the repository browser.