LazReport, fix default font for some controls and forms (for gtk1), issue #10785

git-svn-id: trunk@26722 -
This commit is contained in:
jesus 2010-07-18 02:16:40 +00:00
parent 3920c1a238
commit 5d5e183f9d
13 changed files with 174 additions and 167 deletions

View File

@ -27,204 +27,244 @@ Lazarus Port: Olivier Guilbaud, Jesus Reyes A.
See license.txt and license-lazreport.txt for details.
"/>
<Version Minor="9" Release="7"/>
<Files Count="49">
<Files Count="59">
<Item1>
<Filename Value="lr_barc.pas"/>
<UnitName Value="LR_BarC"/>
<Filename Value="lr_about.pas"/>
<UnitName Value="LR_About"/>
</Item1>
<Item2>
<Filename Value="lr_barc.lfm"/>
<Filename Value="lr_about.lfm"/>
<Type Value="LFM"/>
</Item2>
<Item3>
<Filename Value="lr_bnded.pas"/>
<UnitName Value="LR_BndEd"/>
<Filename Value="lr_barc.pas"/>
<UnitName Value="LR_BarC"/>
</Item3>
<Item4>
<Filename Value="lr_bnded.lfm"/>
<Filename Value="lr_barc.lfm"/>
<Type Value="LFM"/>
</Item4>
<Item5>
<Filename Value="lr_class.pas"/>
<UnitName Value="LR_Class"/>
<Filename Value="lr_bnded.pas"/>
<UnitName Value="LR_BndEd"/>
</Item5>
<Item6>
<Filename Value="lr_const.pas"/>
<UnitName Value="LR_Const"/>
<Filename Value="lr_bnded.lfm"/>
<Type Value="LFM"/>
</Item6>
<Item7>
<Filename Value="lr_dbset.pas"/>
<UnitName Value="LR_DBSet"/>
<Filename Value="lr_class.pas"/>
<UnitName Value="LR_Class"/>
</Item7>
<Item8>
<Filename Value="lr_desgn.pas"/>
<UnitName Value="LR_Desgn"/>
<Filename Value="lr_const.pas"/>
<UnitName Value="LR_Const"/>
</Item8>
<Item9>
<Filename Value="lr_desgn.lfm"/>
<Type Value="LFM"/>
<Filename Value="lr_dbset.pas"/>
<UnitName Value="LR_DBSet"/>
</Item9>
<Item10>
<Filename Value="lr_dopt.pas"/>
<UnitName Value="LR_Dopt"/>
<Filename Value="lr_desgn.pas"/>
<UnitName Value="LR_Desgn"/>
</Item10>
<Item11>
<Filename Value="lr_dopt.lfm"/>
<Filename Value="lr_desgn.lfm"/>
<Type Value="LFM"/>
</Item11>
<Item12>
<Filename Value="lr_e_csv.pas"/>
<UnitName Value="LR_E_CSV"/>
<Filename Value="lr_dopt.pas"/>
<UnitName Value="LR_Dopt"/>
</Item12>
<Item13>
<Filename Value="lr_e_gen.pas"/>
<UnitName Value="lr_e_gen"/>
<Filename Value="lr_dopt.lfm"/>
<Type Value="LFM"/>
</Item13>
<Item14>
<Filename Value="lr_e_htm.pas"/>
<UnitName Value="LR_E_HTM"/>
<Filename Value="lr_e_csv.pas"/>
<UnitName Value="LR_E_CSV"/>
</Item14>
<Item15>
<Filename Value="lr_e_txt.pas"/>
<UnitName Value="LR_E_TXT"/>
<Filename Value="lr_e_gen.pas"/>
<UnitName Value="lr_e_gen"/>
</Item15>
<Item16>
<Filename Value="lr_edit.pas"/>
<UnitName Value="LR_Edit"/>
<Filename Value="lr_e_htm.pas"/>
<UnitName Value="LR_E_HTM"/>
</Item16>
<Item17>
<Filename Value="lr_edit.lfm"/>
<Type Value="LFM"/>
<Filename Value="lr_e_txt.pas"/>
<UnitName Value="LR_E_TXT"/>
</Item17>
<Item18>
<Filename Value="lr_expres.pas"/>
<UnitName Value="lr_expres"/>
<Filename Value="lr_edit.pas"/>
<UnitName Value="LR_Edit"/>
</Item18>
<Item19>
<Filename Value="lr_expres.lfm"/>
<Filename Value="lr_edit.lfm"/>
<Type Value="LFM"/>
</Item19>
<Item20>
<Filename Value="lr_flds.pas"/>
<UnitName Value="LR_Flds"/>
<Filename Value="lr_ev_ed.pas"/>
<UnitName Value="LR_Ev_ed"/>
</Item20>
<Item21>
<Filename Value="lr_flds.lfm"/>
<Filename Value="lr_ev_ed.lfm"/>
<Type Value="LFM"/>
</Item21>
<Item22>
<Filename Value="lr_fmted.pas"/>
<UnitName Value="LR_fmted"/>
<Filename Value="lr_expres.pas"/>
<UnitName Value="lr_expres"/>
</Item22>
<Item23>
<Filename Value="lr_fmted.lfm"/>
<Filename Value="lr_expres.lfm"/>
<Type Value="LFM"/>
</Item23>
<Item24>
<Filename Value="lr_funct_editor_unit.pas"/>
<UnitName Value="lr_funct_editor_unit"/>
<Filename Value="lr_flds.pas"/>
<UnitName Value="LR_Flds"/>
</Item24>
<Item25>
<Filename Value="lr_funct_editor_unit1.pas"/>
<UnitName Value="lr_funct_editor_unit1"/>
<Filename Value="lr_flds.lfm"/>
<Type Value="LFM"/>
</Item25>
<Item26>
<Filename Value="lr_gedit.pas"/>
<UnitName Value="LR_GEdit"/>
<Filename Value="lr_fmted.pas"/>
<UnitName Value="LR_fmted"/>
</Item26>
<Item27>
<Filename Value="lr_gedit.lfm"/>
<Filename Value="lr_fmted.lfm"/>
<Type Value="LFM"/>
</Item27>
<Item28>
<Filename Value="lr_grped.pas"/>
<UnitName Value="LR_GrpEd"/>
<Filename Value="lr_funct_editor_unit.pas"/>
<UnitName Value="lr_funct_editor_unit"/>
</Item28>
<Item29>
<Filename Value="lr_grped.lfm"/>
<Type Value="LFM"/>
<Filename Value="lr_funct_editor_unit1.pas"/>
<UnitName Value="lr_funct_editor_unit1"/>
</Item29>
<Item30>
<Filename Value="lr_iflds.pas"/>
<UnitName Value="LR_IFlds"/>
<Filename Value="lr_gedit.pas"/>
<UnitName Value="LR_GEdit"/>
</Item30>
<Item31>
<Filename Value="lr_iflds.lfm"/>
<Filename Value="lr_gedit.lfm"/>
<Type Value="LFM"/>
</Item31>
<Item32>
<Filename Value="lr_pars.pas"/>
<UnitName Value="LR_Pars"/>
<Filename Value="lr_grped.pas"/>
<UnitName Value="LR_GrpEd"/>
</Item32>
<Item33>
<Filename Value="lr_pgopt.pas"/>
<UnitName Value="LR_pgopt"/>
<Filename Value="lr_grped.lfm"/>
<Type Value="LFM"/>
</Item33>
<Item34>
<Filename Value="lr_pgopt.lfm"/>
<Type Value="LFM"/>
<Filename Value="lr_iflds.pas"/>
<UnitName Value="LR_IFlds"/>
</Item34>
<Item35>
<Filename Value="lr_pgrid.pas"/>
<UnitName Value="LR_PGrid"/>
<Filename Value="lr_iflds.lfm"/>
<Type Value="LFM"/>
</Item35>
<Item36>
<Filename Value="lr_prntr.pas"/>
<UnitName Value="LR_Prntr"/>
<Filename Value="lr_pars.pas"/>
<UnitName Value="LR_Pars"/>
</Item36>
<Item37>
<Filename Value="lr_progr.pas"/>
<UnitName Value="LR_progr"/>
<Filename Value="lr_pgopt.pas"/>
<UnitName Value="LR_pgopt"/>
</Item37>
<Item38>
<Filename Value="lr_progr.lfm"/>
<Filename Value="lr_pgopt.lfm"/>
<Type Value="LFM"/>
</Item38>
<Item39>
<Filename Value="lr_propedit.pas"/>
<UnitName Value="lr_propedit"/>
<Filename Value="lr_pgrid.pas"/>
<UnitName Value="LR_PGrid"/>
</Item39>
<Item40>
<Filename Value="lr_prdlg.pas"/>
<UnitName Value="LR_PrDlg"/>
</Item40>
<Item41>
<Filename Value="lr_prdlg.lfm"/>
<Type Value="LFM"/>
</Item41>
<Item42>
<Filename Value="lr_prntr.pas"/>
<UnitName Value="LR_Prntr"/>
</Item42>
<Item43>
<Filename Value="lr_progr.pas"/>
<UnitName Value="LR_progr"/>
</Item43>
<Item44>
<Filename Value="lr_progr.lfm"/>
<Type Value="LFM"/>
</Item44>
<Item45>
<Filename Value="lr_propedit.pas"/>
<UnitName Value="lr_propedit"/>
</Item45>
<Item46>
<Filename Value="lr_register.pas"/>
<HasRegisterProc Value="True"/>
<UnitName Value="LR_Register"/>
</Item40>
<Item41>
<Filename Value="lr_register.lrs"/>
<Type Value="LRS"/>
</Item41>
<Item42>
<Filename Value="lr_rrect.pas"/>
<UnitName Value="LR_RRect"/>
</Item42>
<Item43>
<Filename Value="lr_rrect.lfm"/>
<Type Value="LFM"/>
</Item43>
<Item44>
<Filename Value="lr_shape.pas"/>
<UnitName Value="LR_Shape"/>
</Item44>
<Item45>
<Filename Value="lr_shape.lfm"/>
<Type Value="LFM"/>
</Item45>
<Item46>
<Filename Value="lr_utils.pas"/>
<UnitName Value="LR_Utils"/>
</Item46>
<Item47>
<Filename Value="lr_view.pas"/>
<UnitName Value="LR_View"/>
<Filename Value="lr_register.lrs"/>
<Type Value="LRS"/>
</Item47>
<Item48>
<Filename Value="lr_view.lfm"/>
<Type Value="LFM"/>
<Filename Value="lr_rrect.pas"/>
<UnitName Value="LR_RRect"/>
</Item48>
<Item49>
<Filename Value="lr_rrect.lfm"/>
<Type Value="LFM"/>
</Item49>
<Item50>
<Filename Value="lr_shape.pas"/>
<UnitName Value="LR_Shape"/>
</Item50>
<Item51>
<Filename Value="lr_shape.lfm"/>
<Type Value="LFM"/>
</Item51>
<Item52>
<Filename Value="lr_utils.pas"/>
<UnitName Value="LR_Utils"/>
</Item52>
<Item53>
<Filename Value="lr_var.pas"/>
<UnitName Value="LR_Var"/>
</Item53>
<Item54>
<Filename Value="lr_var.lfm"/>
<Type Value="LFM"/>
</Item54>
<Item55>
<Filename Value="lr_vared.pas"/>
<UnitName Value="LR_Vared"/>
</Item55>
<Item56>
<Filename Value="lr_vared.lfm"/>
<Type Value="LFM"/>
</Item56>
<Item57>
<Filename Value="lr_view.pas"/>
<UnitName Value="LR_View"/>
</Item57>
<Item58>
<Filename Value="lr_view.lfm"/>
<Type Value="LFM"/>
</Item58>
<Item59>
<Filename Value="sysutilsadds.pas"/>
<UnitName Value="SysUtilsAdds"/>
</Item49>
</Item59>
</Files>
<i18n>
<EnableI18N Value="True"/>

View File

@ -7,12 +7,12 @@ unit lazreport;
interface
uses
LR_BarC, LR_BndEd, LR_Class, LR_Const, LR_DBSet, LR_Desgn, LR_Dopt,
LR_E_CSV, lr_e_gen, LR_E_HTM, LR_E_TXT, LR_Edit, lr_expres, LR_Flds,
LR_fmted, lr_funct_editor_unit, lr_funct_editor_unit1, LR_GEdit, LR_GrpEd,
LR_IFlds, LR_Pars, LR_pgopt, LR_PGrid, LR_Prntr, LR_progr, lr_propedit,
LR_Register, LR_RRect, LR_Shape, LR_Utils, LR_View, SysUtilsAdds,
LazarusPackageIntf;
LR_About, LR_BarC, LR_BndEd, LR_Class, LR_Const, LR_DBSet, LR_Desgn,
LR_Dopt, LR_E_CSV, lr_e_gen, LR_E_HTM, LR_E_TXT, LR_Edit, LR_Ev_ed,
lr_expres, LR_Flds, LR_fmted, lr_funct_editor_unit, lr_funct_editor_unit1,
LR_GEdit, LR_GrpEd, LR_IFlds, LR_Pars, LR_pgopt, LR_PGrid, LR_PrDlg,
LR_Prntr, LR_progr, lr_propedit, LR_Register, LR_RRect, LR_Shape, LR_Utils,
LR_Var, LR_Vared, LR_View, SysUtilsAdds, LazarusPackageIntf;
implementation

View File

@ -1,7 +1,7 @@
object frAboutForm: TfrAboutForm
Left = 411
Left = 228
Height = 174
Top = 290
Top = 135
Width = 285
HorzScrollBar.Page = 278
VertScrollBar.Page = 149
@ -16,7 +16,7 @@ object frAboutForm: TfrAboutForm
LCLVersion = '0.9.29'
object Bevel2: TBevel
Left = 0
Height = 124
Height = 126
Top = 0
Width = 285
Align = alClient
@ -87,62 +87,55 @@ object frAboutForm: TfrAboutForm
}
end
object Label1: TLabel
Left = 104
Height = 15
Left = 96
Height = 16
Top = 16
Width = 71
Width = 72
Alignment = taCenter
Caption = 'FreeReport'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Height = -13
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label2: TLabel
Left = 104
Height = 15
Height = 14
Top = 32
Width = 72
Width = 60
Alignment = taCenter
Caption = 'Version 2.32'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
ParentColor = False
ParentFont = False
end
object Label3: TLabel
Left = 88
Height = 15
Height = 14
Top = 64
Width = 142
Width = 116
Alignment = taCenter
Caption = 'Copyright (©) 1998-2002'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
ParentColor = False
ParentFont = False
end
object Label4: TLabel
Left = 88
Height = 15
Height = 14
Top = 48
Width = 99
Width = 85
Alignment = taCenter
Caption = 'by Tzyganenko A.'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
ParentColor = False
ParentFont = False
end
object ButtonPanel1: TButtonPanel
Left = 6
Height = 38
Top = 130
Height = 36
Top = 132
Width = 273
OKButton.Name = 'OKButton'
OKButton.Caption = '&OK'

View File

@ -11,8 +11,6 @@ inherited frDesignerForm: TfrDesignerForm
Caption = 'Designer'
ClientHeight = 411
ClientWidth = 695
Font.Height = -11
Font.Name = 'MS Sans Serif'
KeyPreview = True
Menu = MainMenu1
OnClose = frDesignerFormClose
@ -1954,8 +1952,6 @@ inherited frDesignerForm: TfrDesignerForm
Height = 29
Top = 2
Width = 67
Font.Height = -11
Font.Name = 'MS Sans Serif'
ItemHeight = 0
Items.Strings = (
'5'
@ -1988,8 +1984,6 @@ inherited frDesignerForm: TfrDesignerForm
Height = 29
Top = 2
Width = 155
Font.Height = -11
Font.Name = 'MS Sans Serif'
ItemHeight = 15
OnChange = DoClick
OnDrawItem = C2DrawItem

View File

@ -7,8 +7,6 @@ object frFloatWindow: TfrFloatWindow
VertScrollBar.Page = 60
BorderStyle = bsToolWindow
Caption = 'frFloatWindow'
Font.Height = -11
Font.Name = 'MS Sans Serif'
FormStyle = fsStayOnTop
OnDestroy = FormDestroy
OnShow = FormShow

View File

@ -10,8 +10,6 @@ object frInspForm: TfrInspForm
Caption = 'Object inspector'
ClientHeight = 176
ClientWidth = 132
Font.Height = -11
Font.Name = 'MS Sans Serif'
OnCreate = FormCreate
OnDeactivate = FormDeactivate
OnDestroy = FormDestroy
@ -47,7 +45,7 @@ object frInspForm: TfrInspForm
end
object Edit1: TEdit
Left = 24
Height = 20
Height = 23
Top = 16
Width = 80
TabOrder = 0

View File

@ -217,7 +217,6 @@ begin
begin
Brush.Color := clBtnFace;
Pen.Color := clBtnShadow;
Font.Name := 'MS Sans Serif';
Font.Size := 8;
Font.Style := [];
Font.Color := clBlack;

View File

@ -10,8 +10,6 @@ object frPrintForm: TfrPrintForm
Caption = 'Print'
ClientHeight = 270
ClientWidth = 368
Font.Height = -11
Font.Name = 'MS Sans Serif'
OnCreate = FormCreate
OnDeactivate = FormDeactivate
Position = poScreenCenter
@ -39,16 +37,16 @@ object frPrintForm: TfrPrintForm
end
object Label1: TLabel
Left = 16
Height = 15
Height = 14
Top = 76
Width = 40
Width = 33
Caption = 'Copies'
FocusControl = E1
ParentColor = False
end
object E1: TEdit
Left = 64
Height = 20
Height = 23
Top = 72
Width = 61
HelpContext = 99
@ -62,13 +60,14 @@ object frPrintForm: TfrPrintForm
Width = 253
Caption = 'Page range'
ClientHeight = 145
ClientWidth = 251
ClientWidth = 249
TabOrder = 1
object Label2: TLabel
Left = 14
Height = 15
Top = 81
Width = 504
Height = 38
Top = 91
Width = 228
AutoSize = False
Caption = 'Enter page numbers and/or page ranges, separated by commas. For example, 1,3,5-12'
ParentColor = False
WordWrap = True
@ -89,7 +88,7 @@ object frPrintForm: TfrPrintForm
Left = 8
Height = 22
Top = 40
Width = 99
Width = 85
HelpContext = 118
AllowGrayed = True
Caption = 'Current &page'
@ -100,7 +99,7 @@ object frPrintForm: TfrPrintForm
Left = 8
Height = 22
Top = 60
Width = 80
Width = 68
HelpContext = 124
AllowGrayed = True
Caption = '&Numbers:'
@ -110,7 +109,7 @@ object frPrintForm: TfrPrintForm
end
object E2: TEdit
Left = 88
Height = 20
Height = 23
Top = 58
Width = 155
HelpContext = 133
@ -191,7 +190,7 @@ object frPrintForm: TfrPrintForm
Width = 349
Caption = 'Printer'
ClientHeight = 34
ClientWidth = 347
ClientWidth = 345
TabOrder = 5
object PropButton: TButton
Left = 264
@ -205,7 +204,7 @@ object frPrintForm: TfrPrintForm
end
object CB1: TComboBox
Left = 8
Height = 29
Height = 27
Top = 1
Width = 245
HelpContext = 142

View File

@ -9,8 +9,6 @@ object frRoundRectForm: TfrRoundRectForm
ClientHeight = 284
ClientWidth = 562
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
KeyPreview = True
OnCreate = FormCreate
OnKeyDown = FormKeyDown
@ -55,8 +53,6 @@ object frRoundRectForm: TfrRoundRectForm
Height = 237
Top = 8
Width = 333
Font.Height = -11
Font.Name = 'MS Sans Serif'
Lines.Strings = (
'M1'
)

View File

@ -10,8 +10,6 @@ object frPreviewSearchForm: TfrPreviewSearchForm
Caption = 'Find text'
ClientHeight = 167
ClientWidth = 291
Font.Height = -11
Font.Name = 'MS Sans Serif'
OnActivate = FormActivate
OnCreate = FormCreate
Position = poScreenCenter

View File

@ -11,8 +11,6 @@ object frVarForm: TfrVarForm
ClientHeight = 317
ClientWidth = 217
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
OnActivate = FormActivate
OnCreate = FormCreate
OnDeactivate = FormDeactivate
@ -35,8 +33,6 @@ object frVarForm: TfrVarForm
Width = 209
HelpContext = 22
ClickOnSelChange = False
Font.Height = -11
Font.Name = 'MS Sans Serif'
IntegralHeight = True
ItemHeight = 0
OnDblClick = ValListDblClick

View File

@ -10,8 +10,6 @@ object frVaredForm: TfrVaredForm
Caption = 'Variables list'
ClientHeight = 269
ClientWidth = 249
Font.Height = -11
Font.Name = 'MS Sans Serif'
OnActivate = FormActivate
OnCreate = FormCreate
Position = poScreenCenter

View File

@ -12,8 +12,6 @@ object frPreviewForm: TfrPreviewForm
ClientHeight = 374
ClientWidth = 412
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
KeyPreview = True
OnActivate = FormActivate
OnClose = FormClose