|
Last change
on this file was 455, checked in by chronos, 13 years ago |
- Modified: PrintPreview should use TVectorCanvas instead of raster TCanvas dependent on DPI of printer. But some font function as TextWidth and TextHeight cannot be easily implemented without use of OS API.
|
|
File size:
498 bytes
|
| Line | |
|---|
| 1 | object FormMain: TFormMain
|
|---|
| 2 | Left = 355
|
|---|
| 3 | Height = 354
|
|---|
| 4 | Top = 127
|
|---|
| 5 | Width = 471
|
|---|
| 6 | Caption = 'Print preview demo'
|
|---|
| 7 | ClientHeight = 354
|
|---|
| 8 | ClientWidth = 471
|
|---|
| 9 | LCLVersion = '1.1'
|
|---|
| 10 | object ButtonPreview: TButton
|
|---|
| 11 | Left = 9
|
|---|
| 12 | Height = 25
|
|---|
| 13 | Top = 9
|
|---|
| 14 | Width = 123
|
|---|
| 15 | Caption = 'Print preview'
|
|---|
| 16 | OnClick = ButtonPreviewClick
|
|---|
| 17 | TabOrder = 0
|
|---|
| 18 | end
|
|---|
| 19 | object PrintPreview1: TPrintPreview
|
|---|
| 20 | Zoom = 1
|
|---|
| 21 | OnPrint = PrintPreview1Print
|
|---|
| 22 | left = 136
|
|---|
| 23 | top = 80
|
|---|
| 24 | end
|
|---|
| 25 | end
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
