lazreport, another couple of missing files

git-svn-id: trunk@46081 -
This commit is contained in:
jesus 2014-08-28 15:27:44 +00:00
parent bfe6b6f444
commit 44dfa5d07f
3 changed files with 498 additions and 0 deletions

2
.gitattributes vendored
View File

@ -2485,6 +2485,8 @@ components/lazreport/source/lr_e_csv.pas svneol=native#text/pascal
components/lazreport/source/lr_e_gen.pas svneol=native#text/pascal
components/lazreport/source/lr_e_htm.pas svneol=native#text/pascal
components/lazreport/source/lr_e_txt.pas svneol=native#text/pascal
components/lazreport/source/lr_e_txt_params.lfm svneol=native#text/plain
components/lazreport/source/lr_e_txt_params.pas svneol=native#text/pascal
components/lazreport/source/lr_edit.lfm svneol=native#text/plain
components/lazreport/source/lr_edit.pas svneol=native#text/pascal
components/lazreport/source/lr_ev_ed.lfm svneol=native#text/plain

View File

@ -0,0 +1,368 @@
object lrExpTxtParamsForm: TlrExpTxtParamsForm
Left = 765
Height = 220
Top = 355
Width = 303
Caption = 'Txt export params'
ClientHeight = 220
ClientWidth = 303
Position = poScreenCenter
LCLVersion = '1.3'
object ButtonPanel1: TButtonPanel
Left = 6
Height = 42
Top = 172
Width = 291
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 0
ShowButtons = [pbOK, pbCancel, pbHelp]
end
object Panel1: TPanel
Left = 6
Height = 160
Top = 6
Width = 291
Align = alClient
BorderSpacing.Around = 6
ClientHeight = 160
ClientWidth = 291
TabOrder = 1
object CheckBox1: TCheckBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = Panel1
Left = 7
Height = 22
Top = 7
Width = 138
BorderSpacing.Around = 6
Caption = 'Delete empty lines'
TabOrder = 0
end
object CheckBox2: TCheckBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = CheckBox1
AnchorSideTop.Side = asrBottom
Left = 7
Height = 22
Top = 35
Width = 132
BorderSpacing.Around = 6
Caption = 'Insert page break'
TabOrder = 1
end
object RadioGroup1: TRadioGroup
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = CheckBox2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 7
Height = 83
Top = 63
Width = 277
Anchors = [akTop, akLeft, akRight]
AutoFill = True
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Code page'
ChildSizing.LeftRightSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 66
ClientWidth = 273
Items.Strings = (
'UTF8'
'Ansi'
'OEM'
)
TabOrder = 2
end
end
end
object lrExpTxtParamsForm: TlrExpTxtParamsForm
Left = 765
Height = 220
Top = 355
Width = 303
Caption = 'Txt export params'
ClientHeight = 220
ClientWidth = 303
Position = poScreenCenter
LCLVersion = '1.3'
object ButtonPanel1: TButtonPanel
Left = 6
Height = 42
Top = 172
Width = 291
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 0
ShowButtons = [pbOK, pbCancel, pbHelp]
end
object Panel1: TPanel
Left = 6
Height = 160
Top = 6
Width = 291
Align = alClient
BorderSpacing.Around = 6
ClientHeight = 160
ClientWidth = 291
TabOrder = 1
object CheckBox1: TCheckBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = Panel1
Left = 7
Height = 22
Top = 7
Width = 138
BorderSpacing.Around = 6
Caption = 'Delete empty lines'
TabOrder = 0
end
object CheckBox2: TCheckBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = CheckBox1
AnchorSideTop.Side = asrBottom
Left = 7
Height = 22
Top = 35
Width = 132
BorderSpacing.Around = 6
Caption = 'Insert page break'
TabOrder = 1
end
object RadioGroup1: TRadioGroup
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = CheckBox2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 7
Height = 83
Top = 63
Width = 277
Anchors = [akTop, akLeft, akRight]
AutoFill = True
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Code page'
ChildSizing.LeftRightSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 66
ClientWidth = 273
Items.Strings = (
'UTF8'
'Ansi'
'OEM'
)
TabOrder = 2
end
end
end
object lrExpTxtParamsForm: TlrExpTxtParamsForm
Left = 765
Height = 220
Top = 355
Width = 303
Caption = 'Txt export params'
ClientHeight = 220
ClientWidth = 303
Position = poScreenCenter
LCLVersion = '1.3'
object ButtonPanel1: TButtonPanel
Left = 6
Height = 42
Top = 172
Width = 291
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 0
ShowButtons = [pbOK, pbCancel, pbHelp]
end
object Panel1: TPanel
Left = 6
Height = 160
Top = 6
Width = 291
Align = alClient
BorderSpacing.Around = 6
ClientHeight = 160
ClientWidth = 291
TabOrder = 1
object CheckBox1: TCheckBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = Panel1
Left = 7
Height = 22
Top = 7
Width = 138
BorderSpacing.Around = 6
Caption = 'Delete empty lines'
TabOrder = 0
end
object CheckBox2: TCheckBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = CheckBox1
AnchorSideTop.Side = asrBottom
Left = 7
Height = 22
Top = 35
Width = 132
BorderSpacing.Around = 6
Caption = 'Insert page break'
TabOrder = 1
end
object RadioGroup1: TRadioGroup
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = CheckBox2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 7
Height = 83
Top = 63
Width = 277
Anchors = [akTop, akLeft, akRight]
AutoFill = True
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Code page'
ChildSizing.LeftRightSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 66
ClientWidth = 273
Items.Strings = (
'UTF8'
'Ansi'
'OEM'
)
TabOrder = 2
end
end
end
object lrExpTxtParamsForm: TlrExpTxtParamsForm
Left = 765
Height = 220
Top = 355
Width = 303
Caption = 'Txt export params'
ClientHeight = 220
ClientWidth = 303
Position = poScreenCenter
LCLVersion = '1.3'
object ButtonPanel1: TButtonPanel
Left = 6
Height = 42
Top = 172
Width = 291
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 0
ShowButtons = [pbOK, pbCancel, pbHelp]
end
object Panel1: TPanel
Left = 6
Height = 160
Top = 6
Width = 291
Align = alClient
BorderSpacing.Around = 6
ClientHeight = 160
ClientWidth = 291
TabOrder = 1
object CheckBox1: TCheckBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = Panel1
Left = 7
Height = 22
Top = 7
Width = 138
BorderSpacing.Around = 6
Caption = 'Delete empty lines'
TabOrder = 0
end
object CheckBox2: TCheckBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = CheckBox1
AnchorSideTop.Side = asrBottom
Left = 7
Height = 22
Top = 35
Width = 132
BorderSpacing.Around = 6
Caption = 'Insert page break'
TabOrder = 1
end
object RadioGroup1: TRadioGroup
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = CheckBox2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 7
Height = 83
Top = 63
Width = 277
Anchors = [akTop, akLeft, akRight]
AutoFill = True
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Code page'
ChildSizing.LeftRightSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 66
ClientWidth = 273
Items.Strings = (
'UTF8'
'Ansi'
'OEM'
)
TabOrder = 2
end
end
end

View File

@ -0,0 +1,128 @@
unit LR_E_TXT_Params;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ButtonPanel,
ExtCtrls, StdCtrls;
type
{ TlrExpTxtParamsForm }
TlrExpTxtParamsForm = class(TForm)
ButtonPanel1: TButtonPanel;
CheckBox1: TCheckBox;
CheckBox2: TCheckBox;
Panel1: TPanel;
RadioGroup1: TRadioGroup;
private
{ private declarations }
public
{ public declarations }
end;
implementation
{$R *.lfm}
end.
unit LR_E_TXT_Params;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ButtonPanel,
ExtCtrls, StdCtrls;
type
{ TlrExpTxtParamsForm }
TlrExpTxtParamsForm = class(TForm)
ButtonPanel1: TButtonPanel;
CheckBox1: TCheckBox;
CheckBox2: TCheckBox;
Panel1: TPanel;
RadioGroup1: TRadioGroup;
private
{ private declarations }
public
{ public declarations }
end;
implementation
{$R *.lfm}
end.
unit LR_E_TXT_Params;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ButtonPanel,
ExtCtrls, StdCtrls;
type
{ TlrExpTxtParamsForm }
TlrExpTxtParamsForm = class(TForm)
ButtonPanel1: TButtonPanel;
CheckBox1: TCheckBox;
CheckBox2: TCheckBox;
Panel1: TPanel;
RadioGroup1: TRadioGroup;
private
{ private declarations }
public
{ public declarations }
end;
implementation
{$R *.lfm}
end.
unit LR_E_TXT_Params;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ButtonPanel,
ExtCtrls, StdCtrls;
type
{ TlrExpTxtParamsForm }
TlrExpTxtParamsForm = class(TForm)
ButtonPanel1: TButtonPanel;
CheckBox1: TCheckBox;
CheckBox2: TCheckBox;
Panel1: TPanel;
RadioGroup1: TRadioGroup;
private
{ private declarations }
public
{ public declarations }
end;
implementation
{$R *.lfm}
end.