From f1c82d9a6de142155bc214cfad4bcb88d5cd6345 Mon Sep 17 00:00:00 2001 From: jesus Date: Tue, 29 May 2012 04:42:31 +0000 Subject: [PATCH] LazReport, continue work on dialogs and some fixes, for details see issue #22141 git-svn-id: trunk@37448 - --- .gitattributes | 7 + .../addons/DialogControls/lr_dialogdesign.lpk | 14 +- .../addons/DialogControls/lr_dialogdesign.pas | 2 +- .../DialogControls/lrdbdialogcontrols.pas | 237 ++ .../DialogControls/lrdbdialogcontrols_img.inc | 112 + .../DialogControls/lrdialogcontrols.pas | 2152 +------------ .../DialogControls/lrdialogcontrols_img.inc | 2738 +++++++++-------- .../source/addons/SqlDB/lr_ibconnection.pas | 125 - .../source/addons/SqlDB/lr_pqconnection.pas | 123 - .../source/addons/SqlDB/lr_sqldb.lpk | 12 +- .../source/addons/SqlDB/lr_sqlquery.pas | 560 +--- .../source/addons/SqlDB/lrsqldb_img.inc | 1621 +--------- .../source/addons/TDbfDB/lr_tdbf.lpk | 4 + .../source/addons/TDbfDB/lrtdbfdata.pas | 299 -- .../source/addons/TDbfDB/lrtdbfdata_img.inc | 171 +- .../addons/ZeosDB/languages/lrdbzeosconst.po | 23 + .../ZeosDB/languages/lrdbzeosconst.ru.po | 23 + .../source/addons/ZeosDB/lr_db_zeos.pas | 1185 +------ .../source/addons/ZeosDB/lr_editparams.lfm | 150 + .../source/addons/ZeosDB/lr_editparams.pas | 153 + .../source/addons/ZeosDB/lr_editvariables.lfm | 234 +- .../source/addons/ZeosDB/lr_editvariables.pas | 218 -- .../source/addons/ZeosDB/lr_zeos_img.inc | 443 +-- .../source/addons/ZeosDB/lr_zeosdb.lpk | 20 +- .../source/addons/ZeosDB/lr_zeosdb.pas | 45 +- .../source/addons/ZeosDB/lrdbzeosconst.pas | 20 + .../lazreport/source/languages/lr_const.de.po | 36 +- .../lazreport/source/languages/lr_const.es.po | 36 +- .../lazreport/source/languages/lr_const.fr.po | 36 +- .../lazreport/source/languages/lr_const.id.po | 36 +- .../lazreport/source/languages/lr_const.it.po | 36 +- .../lazreport/source/languages/lr_const.lt.po | 36 +- .../lazreport/source/languages/lr_const.pl.po | 36 +- .../lazreport/source/languages/lr_const.po | 36 +- .../lazreport/source/languages/lr_const.pt.po | 36 +- .../source/languages/lr_const.pt_BR.po | 36 +- .../lazreport/source/languages/lr_const.ru.po | 36 +- .../lazreport/source/languages/lr_const.uk.po | 36 +- components/lazreport/source/lr_class.pas | 216 +- components/lazreport/source/lr_const.pas | 19 +- .../lazreport/source/lr_dbcomponent.pas | 358 +-- components/lazreport/source/lr_dbrel.pas | 60 + components/lazreport/source/lr_desgn.lfm | 65 +- components/lazreport/source/lr_desgn.pas | 397 ++- components/lazreport/source/lr_pars.pas | 2 +- 45 files changed, 3076 insertions(+), 9164 deletions(-) create mode 100644 components/lazreport/source/addons/DialogControls/lrdbdialogcontrols.pas create mode 100644 components/lazreport/source/addons/DialogControls/lrdbdialogcontrols_img.inc create mode 100644 components/lazreport/source/addons/ZeosDB/languages/lrdbzeosconst.po create mode 100644 components/lazreport/source/addons/ZeosDB/languages/lrdbzeosconst.ru.po create mode 100644 components/lazreport/source/addons/ZeosDB/lr_editparams.lfm create mode 100644 components/lazreport/source/addons/ZeosDB/lr_editparams.pas create mode 100644 components/lazreport/source/addons/ZeosDB/lrdbzeosconst.pas diff --git a/.gitattributes b/.gitattributes index a641ea6812..fea08ef1f9 100644 --- a/.gitattributes +++ b/.gitattributes @@ -1625,6 +1625,8 @@ components/lazreport/samples/userds/unit2.pas svneol=native#text/pascal components/lazreport/samples/userds/usuario.lrf svneol=native#text/xml components/lazreport/source/addons/DialogControls/lr_dialogdesign.lpk svneol=native#text/plain components/lazreport/source/addons/DialogControls/lr_dialogdesign.pas svneol=native#text/plain +components/lazreport/source/addons/DialogControls/lrdbdialogcontrols.pas svneol=native#text/plain +components/lazreport/source/addons/DialogControls/lrdbdialogcontrols_img.inc svneol=native#text/plain components/lazreport/source/addons/DialogControls/lrdialogcontrols.pas svneol=native#text/plain components/lazreport/source/addons/DialogControls/lrdialogcontrols_img.inc svneol=native#text/plain components/lazreport/source/addons/SqlDB/lr_ibconnection.pas svneol=native#text/plain @@ -1637,12 +1639,17 @@ components/lazreport/source/addons/TDbfDB/lr_tdbf.lpk svneol=native#text/plain components/lazreport/source/addons/TDbfDB/lr_tdbf.pas svneol=native#text/plain components/lazreport/source/addons/TDbfDB/lrtdbfdata.pas svneol=native#text/plain components/lazreport/source/addons/TDbfDB/lrtdbfdata_img.inc svneol=native#text/plain +components/lazreport/source/addons/ZeosDB/languages/lrdbzeosconst.po svneol=native#text/plain +components/lazreport/source/addons/ZeosDB/languages/lrdbzeosconst.ru.po svneol=native#text/plain components/lazreport/source/addons/ZeosDB/lr_db_zeos.pas svneol=native#text/plain +components/lazreport/source/addons/ZeosDB/lr_editparams.lfm svneol=native#text/plain +components/lazreport/source/addons/ZeosDB/lr_editparams.pas svneol=native#text/plain components/lazreport/source/addons/ZeosDB/lr_editvariables.lfm svneol=native#text/plain components/lazreport/source/addons/ZeosDB/lr_editvariables.pas svneol=native#text/plain components/lazreport/source/addons/ZeosDB/lr_zeos_img.inc svneol=native#text/plain components/lazreport/source/addons/ZeosDB/lr_zeosdb.lpk svneol=native#text/plain components/lazreport/source/addons/ZeosDB/lr_zeosdb.pas svneol=native#text/plain +components/lazreport/source/addons/ZeosDB/lrdbzeosconst.pas svneol=native#text/plain components/lazreport/source/addons/addfunction/addfunction.lrs svneol=native#text/pascal components/lazreport/source/addons/addfunction/doc/HISTORY.RUS svneol=native#text/plain components/lazreport/source/addons/addfunction/doc/README.RUS svneol=native#text/plain diff --git a/components/lazreport/source/addons/DialogControls/lr_dialogdesign.lpk b/components/lazreport/source/addons/DialogControls/lr_dialogdesign.lpk index 9eaa78d48f..641e19d032 100644 --- a/components/lazreport/source/addons/DialogControls/lr_dialogdesign.lpk +++ b/components/lazreport/source/addons/DialogControls/lr_dialogdesign.lpk @@ -2,6 +2,7 @@ + @@ -14,7 +15,10 @@ - + + + @@ -24,6 +28,14 @@ + + + + + + + + diff --git a/components/lazreport/source/addons/DialogControls/lr_dialogdesign.pas b/components/lazreport/source/addons/DialogControls/lr_dialogdesign.pas index 66f5f26fd6..333d8fcca9 100644 --- a/components/lazreport/source/addons/DialogControls/lr_dialogdesign.pas +++ b/components/lazreport/source/addons/DialogControls/lr_dialogdesign.pas @@ -7,7 +7,7 @@ unit lr_DialogDesign; interface uses - LRDialogControls, LazarusPackageIntf; + LRDialogControls, lrDBDialogControls, LazarusPackageIntf; implementation diff --git a/components/lazreport/source/addons/DialogControls/lrdbdialogcontrols.pas b/components/lazreport/source/addons/DialogControls/lrdbdialogcontrols.pas new file mode 100644 index 0000000000..bc37989223 --- /dev/null +++ b/components/lazreport/source/addons/DialogControls/lrdbdialogcontrols.pas @@ -0,0 +1,237 @@ +unit lrDBDialogControls; + +{$mode objfpc}{$H+} + +interface + +uses + Classes, SysUtils, LResources, LRDialogControls, Graphics, LR_Class, + Controls, DbCtrls, StdCtrls, DB; + +type + + { TlrDBLookupComboBox } + + TlrDBLookupComboBox = class(TlrVisualControl) + private + FKeyField:string; + FListField:string; + FListSource:string; + function GetKeyField: string; + function GetListField: string; + function GetListSource: string; + function GetText: Variant; + procedure SetKeyField(AValue: string); + procedure SetListField(AValue: string); + procedure SetListSource(AValue: string); + procedure DBLookupComboBox1CloseUp(Sender: TObject); + procedure SetText(AValue: Variant); + protected + procedure PaintDesignControl; override; + function CreateControl:TControl;override; + procedure AfterLoad;override; + public + constructor Create(AOwnerPage:TfrPage); override; + procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; + procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; + published + property KeyField:string read GetKeyField write SetKeyField; + property ListField:string read GetListField write SetListField; + property ListSource:string read GetListSource write SetListSource; + property Color; + property Enabled; + property Text:Variant read GetText write SetText; + property OnClick; + end; + +implementation +uses lclintf, Themes, LCLType, DBPropEdits, PropEdits, LR_Utils, LR_DBRel; + +var + lrBMP_LRDBLookupComboBox:TBitmap = nil; + +procedure InitLRComp; +begin + DoRegsiterControl(lrBMP_LRDBLookupComboBox, TlrDBLookupComboBox); +end; + +{ TlrDBLookupComboBox } + +function TlrDBLookupComboBox.GetKeyField: string; +begin + Result:=FKeyField; +end; + +function TlrDBLookupComboBox.GetListField: string; +begin + Result:=FListField; +end; + +function TlrDBLookupComboBox.GetListSource: string; +begin + Result:=FListSource; +end; + +function TlrDBLookupComboBox.GetText: Variant; +begin + Result:=TDBLookupComboBox(FControl).KeyValue; +end; + +procedure TlrDBLookupComboBox.SetKeyField(AValue: string); +begin + if FKeyField=AValue then Exit; + FKeyField:=AValue; + TDBLookupComboBox(FControl).KeyField:=AValue; +end; + +procedure TlrDBLookupComboBox.SetListField(AValue: string); +begin + if FListField=AValue then Exit; + FListField:=AValue; + TDBLookupComboBox(FControl).ListField:=AValue; +end; + +procedure TlrDBLookupComboBox.SetListSource(AValue: string); +var + D:TDataSet; +begin + if FListSource=AValue then Exit; + FListSource:=AValue; + + D:=frFindComponent(nil, AValue) as TDataSet; + if Assigned(D) then + begin + TDBLookupComboBox(FControl).ListSource:=frGetDataSource(OwnerForm, D); + end; +end; + +procedure TlrDBLookupComboBox.DBLookupComboBox1CloseUp(Sender: TObject); +begin + if Assigned(TDBLookupComboBox(FControl).ListSource) and Assigned(TDBLookupComboBox(FControl).ListSource.DataSet) then + TDBLookupComboBox(FControl).ListSource.DataSet.Locate(TDBLookupComboBox(FControl).KeyField, TDBLookupComboBox(FControl).KeyValue, []); +end; + +procedure TlrDBLookupComboBox.SetText(AValue: Variant); +begin + TDBLookupComboBox(FControl).KeyValue:=AValue; +end; + +procedure TlrDBLookupComboBox.PaintDesignControl; +var + AY, aH:integer; + R1:TRect; +begin + AY:=(DRect.Top + DRect.Bottom) div 2; + aH:=Canvas.TextHeight(Name) div 2; + Canvas.Frame3d(DRect, 1, bvLowered); + Canvas.Brush.Color := FControl.Color; + Canvas.FillRect(DRect); + Canvas.Font:=FControl.Font; + Canvas.TextRect(DRect, DRect.Left + 3, AY - aH, Name); + + R1:=DRect; + R1.Left:=R1.Right - 16; + DrawFrameControl(Canvas.Handle, R1, DFC_BUTTON, DFCS_BUTTONPUSH); +end; + +function TlrDBLookupComboBox.CreateControl: TControl; +begin + Result:=TDBLookupComboBox.Create(OwnerForm); + TDBLookupComboBox(Result).Style:=csDropDownList; + TDBLookupComboBox(Result).OnCloseUp:=@DBLookupComboBox1CloseUp; +end; + +procedure TlrDBLookupComboBox.AfterLoad; +var + D:TDataSet; +begin + inherited AfterLoad; + + D:=frFindComponent(nil, FListSource) as TDataSet; + if Assigned(D) then + begin + try + TDBLookupComboBox(FControl).ListSource:=frGetDataSource(OwnerForm, D); + finally + end; + end; +end; + +constructor TlrDBLookupComboBox.Create(AOwnerPage: TfrPage); +begin + inherited Create(AOwnerPage); + BaseName:='lrDBLookupComboBox'; +end; + +procedure TlrDBLookupComboBox.LoadFromXML(XML: TLrXMLConfig; const Path: String + ); +begin + inherited LoadFromXML(XML, Path); + KeyField:=XML.GetValue(Path+'KeyField/Value'{%H-}, ''); + ListField:=XML.GetValue(Path+'ListField/Value'{%H-}, ''); + FListSource:=XML.GetValue(Path+'ListSource/Value'{%H-}, ''); +end; + +procedure TlrDBLookupComboBox.SaveToXML(XML: TLrXMLConfig; const Path: String); +begin + inherited SaveToXML(XML, Path); + XML.SetValue(Path+'KeyField/Value'{%H-}, FKeyField); + XML.SetValue(Path+'ListField/Value'{%H-}, FListField); + XML.SetValue(Path+'ListSource/Value'{%H-}, FListSource); +end; + +type + + { TlrDBLookupComboBoxListSourceProperty } + + TlrDBLookupComboBoxListSourceProperty = class(TFieldProperty) + public + procedure FillValues(const Values: TStringList); override; + end; + + { TlrDBLookupComboBoxFiledsProperty } + + TlrDBLookupComboBoxFiledsProperty = class(TFieldProperty) + public + procedure FillValues(const Values: TStringList); override; + end; + +{ TlrDBLookupComboBoxFiledsProperty } + +procedure TlrDBLookupComboBoxFiledsProperty.FillValues(const Values: TStringList + ); +var + L:TlrDBLookupComboBox; + DS:TDataSet; + i:integer; +begin + if (GetComponent(0) is TlrDBLookupComboBox) then + begin + L:=GetComponent(0) as TlrDBLookupComboBox; + if Assigned(TDBLookupComboBox(L.Control).ListSource) then + frGetFieldNames(TfrTDataSet(TDBLookupComboBox(L.Control).ListSource.DataSet) , Values); + end; +end; + +{ TlrDBLookupComboBoxListSourceProperty } + +procedure TlrDBLookupComboBoxListSourceProperty.FillValues( + const Values: TStringList); +begin + if (GetComponent(0) is TlrDBLookupComboBox) then + frGetComponents(nil, TDataSet, Values, nil); +end; + +initialization + {$I lrdbdialogcontrols_img.inc} + InitLRComp; + + RegisterPropertyEditor(TypeInfo(string), TlrDBLookupComboBox, 'ListSource', TlrDBLookupComboBoxListSourceProperty); + RegisterPropertyEditor(TypeInfo(string), TlrDBLookupComboBox, 'KeyField', TlrDBLookupComboBoxFiledsProperty); + RegisterPropertyEditor(TypeInfo(string), TlrDBLookupComboBox, 'ListField', TlrDBLookupComboBoxFiledsProperty); + +finalization + if Assigned(lrBMP_LRDBLookupComboBox) then + FreeAndNil(lrBMP_LRDBLookupComboBox); +end. + diff --git a/components/lazreport/source/addons/DialogControls/lrdbdialogcontrols_img.inc b/components/lazreport/source/addons/DialogControls/lrdbdialogcontrols_img.inc new file mode 100644 index 0000000000..7b3f16677b --- /dev/null +++ b/components/lazreport/source/addons/DialogControls/lrdbdialogcontrols_img.inc @@ -0,0 +1,112 @@ +LazarusResources.Add('tlrdblookupcombobox','BMP',[ + 'BM'#138#9#0#0#0#0#0#0#138#0#0#0'|'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0 + +#9#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0 + +#0#255#1#0#0#0#0#0#0#0#0#0#0#0'T'#184#30#252#0#0#0#0#0#0#0#0'fff'#252#0#0#0#0 + +#0#0#0#0#196#245'('#255#0#0#0#0#0#0#0#0#0#0#0#0#4#0#0#0#0#0#0#0#0#0#0#0#0#0#0 + +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#237#239#239'?'#183#174#174#255#183#174#174#255 + +#183#174#174#255#183#176#175#255#183#176#175#255#183#176#175#255#183#176#175 + +#255#183#176#175#255#183#176#175#255#183#176#175#255#183#176#175#255#183#176 + +#175#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255 + +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146 + +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#183#176#175#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#146'ww'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#146'ww'#255#183#176#175#255#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255 + +#255#255#255#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311' + +#255'311'#255'311'#255#255#255#255#255#146'ww'#255#183#176#175#255#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#146'ww'#255#183#176#175#255#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#146'ww'#255#188#187#189#255#188#187#189 + +#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187 + +#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#146 + +'ww'#255#183#176#175#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#146'ww'#255#188#187#189#255'311'#255'311'#255'311'#255'311' + +#255'311'#255'311'#255'311'#255'311'#255'311'#255#188#187#189#255#146'ww'#255 + +#183#176#175#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#254#253#252#0#254#253#252#0#254#253#252#0#254#253#252#0#254#253 + +#252#0#146'ww'#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187 + +#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188 + +#187#189#255#188#187#189#255#188#187#189#255#146'ww'#255#183#176#175#255#255 + +#255#255#0#255#255#255#0#254#253#252#0#254#253#252#0#230#194#167#255#196'vB' + +#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#146'ww'#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#146'ww'#255#183#176#175#255#255#255#255#0#255#255#255#0#230#194 + +#167#255#197'xE'#255#196'vB'#255#236#209#189#255#255#255#255#255#243#225#211 + +#255#236#209#189#255#230#194#167#255#146'ww'#255#255#255#255#255'311'#255'31' + +'1'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255#255 + +#255#255#255#146'ww'#255#183#176#175#255#255#255#255#0#255#255#255#0#197'xE' + +#255#217#163'{'#255#223#178#145#255#236#209#189#255#255#255#255#255#243#225 + +#211#255#236#209#189#255#230#194#167#255#146'ww'#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#146'ww'#255#183#176#175#255#255#255#255#0#255#255#255#0#210#147'd'#255#217 + +#163'{'#255#223#178#145#255#196'vB'#255#196'vB'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#129'yy'#255'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz' + +#255'zzz'#255#136'xx'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#183 + +#176#175#255#255#255#255#0#255#255#255#0#210#147'd'#255#197'xE'#255#196'vB' + +#255#236#209#189#255#255#255#255#255#146'ww'#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + ,#255#255#255#255#255#255#255#255#255#255#255#255#255#255#146'ww'#255#227#231 + +#231#255#227#231#231#255#227#231#231#255#146'ww'#255#183#176#175#255#255#255 + +#255#0#255#255#255#0#197'xE'#255#217#163'{'#255#223#178#145#255#236#209#189 + +#255#255#255#255#255#146'ww'#255#255#255#255#255'311'#255'311'#255'311'#255 + +'311'#255'311'#255'311'#255'311'#255'311'#255#255#255#255#255#146'ww'#255#227 + +#231#231#255'>??'#255#227#231#231#255#146'ww'#255#183#176#175#255#255#255#255 + +#0#255#255#255#0#210#147'd'#255#217#163'{'#255#223#178#145#255#196'vB'#255 + +#196'vB'#255#146'ww'#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#146'ww'#255#227#231#231#255#227#231#231#255 + +#227#231#231#255#146'ww'#255#237#239#239'?'#255#255#255#0#255#255#255#0#210 + +#147'd'#255#197'xE'#255#196'vB'#255#236#209#189#255#255#255#255#255#146'ww' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 + +'ww'#255#146'ww'#255#237#239#239'?'#255#255#255#0#255#255#255#0#255#255#255#0 + +#197'xE'#255#217#163'{'#255#223#178#145#255#236#209#189#255#255#255#255#255 + +#243#225#211#255#236#209#189#255#230#194#167#255#223#178#145#255#217#163'{' + +#255#214#155'p'#255#196'vB'#255#254#253#252#0#254#253#252#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#210#147'd'#255#217#163'{' + +#255#223#178#145#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB' + +#255#196'vB'#255#217#163'{'#255#214#155'p'#255#210#147'd'#255#254#253#252#0 + +#254#253#252#0#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#0#0#0#255#0#0 + +#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#210#147'd'#255 + +#196'vB'#255#196'vB'#255#230#194#167#255#236#209#189#255#230#194#167#255#223 + +#178#145#255#217#163'{'#255#214#155'p'#255#196'vB'#255#196'vB'#255#210#147'd' + +#255#254#253#252#0#254#253#252#0#0#0#0#255#0#0#0#255#255#255#255#0#255#255 + +#255#0#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#196'vB'#255#214#155'p'#255#223#178#145#255#236#209#189#255#243#225#211 + +#255#236#209#189#255#230#194#167#255#223#178#145#255#217#163'{'#255#214#155 + +'p'#255#210#147'd'#255#196'vB'#255#254#253#252#0#254#253#252#0#255#255#255#0 + +#255#255#255#0#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#230#194#167#255#196'vB'#255#196'v' + +'B'#255#243#225#211#255#255#255#255#255#243#225#211#255#236#209#189#255#230 + +#194#167#255#223#178#145#255#196'vB'#255#196'vB'#255#230#194#167#255#254#253 + +#252#0#254#253#252#0'ffw'#255#0#0#0#255#255#255#255#0#255#255#255#0#0#0#0#255 + +'ffw'#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#254#253#252 + +#0#254#253#252#0#230#194#167#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB' + +#255#196'vB'#255#196'vB'#255#230#194#167#255#254#253#252#0#254#253#252#0#255 + +#255#255#0#255#255#255#0'ffw'#255#0#0#0#255#255#255#255#0#255#255#255#0#0#0#0 + +#255'ffw'#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0 +]); diff --git a/components/lazreport/source/addons/DialogControls/lrdialogcontrols.pas b/components/lazreport/source/addons/DialogControls/lrdialogcontrols.pas index 3043019ce7..bb937a9696 100644 --- a/components/lazreport/source/addons/DialogControls/lrdialogcontrols.pas +++ b/components/lazreport/source/addons/DialogControls/lrdialogcontrols.pas @@ -6,7 +6,7 @@ interface uses Classes, SysUtils, LResources, Graphics, DB, LR_Class, Controls, StdCtrls, - LMessages, LCLType, LCLIntf, Buttons, EditBtn; + LMessages, LCLType, LCLIntf, Buttons, EditBtn, Themes; type TLRDialogControls = class(TComponent) @@ -35,7 +35,9 @@ type procedure SetName(const AValue: string); override; procedure UpdateControlPosition; override; procedure AfterCreate;override; + function CreateControl:TControl;virtual;abstract; public + constructor Create(AOwnerPage:TfrPage); override; procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; @@ -59,6 +61,9 @@ type function GetWordWrap: boolean; procedure SetAlignment(AValue: TAlignment); procedure SetWordWrap(AValue: boolean); + protected + procedure PaintDesignControl; override; + function CreateControl:TControl;override; public constructor Create(AOwnerPage:TfrPage); override; procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; @@ -79,6 +84,7 @@ type private protected procedure PaintDesignControl; override; + function CreateControl:TControl;override; public constructor Create(AOwnerPage:TfrPage); override; procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; @@ -97,6 +103,7 @@ type procedure MemoChange(Sender: TObject); protected procedure PaintDesignControl; override; + function CreateControl:TControl;override; public constructor Create(AOwnerPage:TfrPage); override; procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; @@ -116,6 +123,7 @@ type procedure SetKind(AValue: TBitBtnKind); protected procedure PaintDesignControl; override; + function CreateControl:TControl;override; public constructor Create(AOwnerPage:TfrPage); override; procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; @@ -135,6 +143,10 @@ type private function GetChecked: boolean; procedure SetChecked(AValue: boolean); + protected + procedure PaintDesignControl; override; + function CreateControl:TControl;override; + function GetCheckStyle(ACheck:boolean):TThemedButton;virtual; public constructor Create(AOwnerPage:TfrPage); override; procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; @@ -150,21 +162,12 @@ type { TlrRadioButton } - TlrRadioButton = class(TlrVisualControl) - private - function GetChecked: boolean; - procedure SetChecked(AValue: boolean); + TlrRadioButton = class(TlrCheckBox) + protected + function CreateControl:TControl;override; + function GetCheckStyle(ACheck:boolean):TThemedButton;override; public constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property AutoSize; - property Color; - property Enabled; - property Caption; - property Checked:boolean read GetChecked write SetChecked; - property OnClick; end; { TlrListBox } @@ -177,6 +180,7 @@ type procedure SetItems(AValue: TStrings); protected procedure PaintDesignControl; override; + function CreateControl:TControl;override; public constructor Create(AOwnerPage:TfrPage); override; procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; @@ -203,6 +207,7 @@ type procedure SetStyle(AValue: TComboBoxStyle); protected procedure PaintDesignControl; override; + function CreateControl:TControl;override; public constructor Create(AOwnerPage:TfrPage); override; procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; @@ -227,6 +232,7 @@ type procedure SetDate(AValue: TDateTime); protected procedure PaintDesignControl; override; + function CreateControl:TControl;override; public constructor Create(AOwnerPage:TfrPage); override; procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; @@ -240,8 +246,10 @@ type procedure Register; +procedure DoRegsiterControl(var cmpBMP:TBitmap; lrClass:TlrVisualControlClass); implementation -uses typinfo; +uses typinfo, types, + lrDBDialogControls; procedure Register; begin @@ -259,8 +267,6 @@ var lrBMP_LRListBox:TBitmap = nil; lrBMP_LRDateEdit:TBitmap = nil; -procedure InitLRComp; - procedure DoRegsiterControl(var cmpBMP:TBitmap; lrClass:TlrVisualControlClass); begin if not assigned(cmpBMP) then @@ -271,6 +277,7 @@ begin end; end; +procedure InitLRComp; begin DoRegsiterControl(lrBMP_LRLabel, TlrLabel); DoRegsiterControl(lrBMP_LREdit, TlrEdit); @@ -313,13 +320,16 @@ begin DrawFrameControl(Canvas.Handle, R1, DFC_BUTTON, DFCS_BUTTONPUSH); end; +function TlrDateEdit.CreateControl: TControl; +begin + Result:=TDateEdit.Create(OwnerForm); +end; + constructor TlrDateEdit.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); BaseName := 'lrDateEdit'; - FControl:=TDateEdit.Create(OwnerForm); - FControl.Parent:=OwnerForm; - FControl.AutoSize:=true; + AutoSize:=true; end; procedure TlrDateEdit.LoadFromXML(XML: TLrXMLConfig; const Path: String); @@ -352,6 +362,8 @@ end; procedure TlrListBox.SetItems(AValue: TStrings); begin TListBox(FControl).Items:=AValue; + if Assigned(frDesigner) then + frDesigner.Modified:=true; end; procedure TlrListBox.PaintDesignControl; @@ -375,13 +387,16 @@ begin end; end; +function TlrListBox.CreateControl: TControl; +begin + Result:=TListBox.Create(OwnerForm); +end; + constructor TlrListBox.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); BaseName := 'lrListBox'; - FControl:=TListBox.Create(OwnerForm); - FControl.Parent:=OwnerForm; - FControl.AutoSize:=true; + AutoSize:=true; end; procedure TlrListBox.LoadFromXML(XML: TLrXMLConfig; const Path: String); @@ -427,13 +442,15 @@ begin end; end; +function TlrMemo.CreateControl: TControl; +begin + Result:=TMemo.Create(OwnerForm); +end; + constructor TlrMemo.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); BaseName := 'lrMemo'; - FControl:=TMemo.Create(OwnerForm); - FControl.Parent:=OwnerForm; - Memo.OnChange:=@MemoChange; end; @@ -449,36 +466,25 @@ end; { TlrRadioButton } -function TlrRadioButton.GetChecked: boolean; +function TlrRadioButton.CreateControl: TControl; begin - Result:=TRadioButton(FControl).Checked; + Result:=TRadioButton.Create(OwnerForm); end; -procedure TlrRadioButton.SetChecked(AValue: boolean); +function TlrRadioButton.GetCheckStyle(ACheck: boolean): TThemedButton; begin - TRadioButton(FControl).Checked:=AValue; + if ACheck then + Result:=tbRadioButtonCheckedNormal + else + Result:=tbRadioButtonUncheckedNormal end; constructor TlrRadioButton.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); BaseName := 'lrRadioButton'; - FControl:=TRadioButton.Create(OwnerForm); - FControl.Parent:=OwnerForm; - FControl.AutoSize:=true; end; -procedure TlrRadioButton.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - Checked:=XML.GetValue(Path+'Checked/Value'{%H-}, false); -end; - -procedure TlrRadioButton.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'Checked/Value'{%H-}, Checked); -end; { TlrComboBox } @@ -515,6 +521,8 @@ end; procedure TlrComboBox.SetItems(AValue: TStrings); begin TComboBox(FControl).Items:=AValue; + if Assigned(frDesigner) then + frDesigner.Modified:=true; end; procedure TlrComboBox.SetStyle(AValue: TComboBoxStyle); @@ -540,13 +548,16 @@ begin DrawFrameControl(Canvas.Handle, R1, DFC_BUTTON, DFCS_BUTTONPUSH); end; +function TlrComboBox.CreateControl: TControl; +begin + Result:=TComboBox.Create(OwnerForm); +end; + constructor TlrComboBox.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); BaseName := 'lrComboBox'; - FControl:=TComboBox.Create(OwnerForm); - FControl.Parent:=OwnerForm; - FControl.AutoSize:=true; + AutoSize:=true; end; procedure TlrComboBox.LoadFromXML(XML: TLrXMLConfig; const Path: String); @@ -569,24 +580,58 @@ end; { TlrCheckBox } +type + THackChekBox = class(TCustomCheckBox); + function TlrCheckBox.GetChecked: boolean; begin - Result:=TCheckBox(FControl).Checked; + Result:=THackChekBox(FControl).Checked; end; procedure TlrCheckBox.SetChecked(AValue: boolean); begin - TCheckBox(FControl).Checked:=AValue; + THackChekBox(FControl).Checked:=AValue; +end; + +procedure TlrCheckBox.PaintDesignControl; +var + AX, AY, aW, aH:integer; + CSize: TSize; + PaintRect:TRect; + details: TThemedElementDetails; +begin + Details := ThemeServices.GetElementDetails(GetCheckStyle(Checked)); + CSize := ThemeServices.GetDetailSize(Details); + PaintRect.Left := DRect.Left; + PaintRect.Top := (DRect.Top + DRect.Bottom - CSize.cy) div 2; + PaintRect := Bounds(PaintRect.Left, PaintRect.Top, CSize.cx, CSize.cy); + ThemeServices.DrawElement(Canvas.Handle, Details, PaintRect, nil); + + AX:=DRect.Left + CSize.cx + 2; + AY:=(DRect.Top + DRect.Bottom) div 2; +// aW:=Canvas.TextWidth(Caption); + aH:=Canvas.TextHeight(Caption) div 2; + Canvas.TextRect(DRect, AX, AY - aH, Caption) +end; + +function TlrCheckBox.CreateControl: TControl; +begin + Result:=TCheckBox.Create(OwnerForm); +end; + +function TlrCheckBox.GetCheckStyle(ACheck: boolean): TThemedButton; +begin + if ACheck then + Result:=tbCheckBoxCheckedNormal + else + Result:=tbCheckBoxUncheckedNormal end; constructor TlrCheckBox.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); - BaseName := 'lrCheckBox'; - FControl:=TCheckBox.Create(OwnerForm); - FControl.Parent:=OwnerForm; - FControl.AutoSize:=true; -// CheckBox1: TCheckBox; + BaseName:='lrCheckBox'; + AutoSize:=true; end; procedure TlrCheckBox.LoadFromXML(XML: TLrXMLConfig; const Path: String); @@ -628,13 +673,16 @@ begin Canvas.TextRect(DRect, AX - (aW div 2), AY - aH, Caption) end; +function TlrButton.CreateControl: TControl; +begin + Result:=TBitBtn.Create(OwnerForm); + Result.AutoSize:=true; +end; + constructor TlrButton.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); BaseName := 'lrButton'; - FControl:=TBitBtn.Create(OwnerForm); - FControl.Parent:=OwnerForm; - FControl.AutoSize:=true; end; procedure TlrButton.LoadFromXML(XML: TLrXMLConfig; const Path: String); @@ -664,13 +712,15 @@ begin Canvas.TextRect(DRect, DRect.Left + 3, AY - aH, Text) end; +function TlrEdit.CreateControl: TControl; +begin + Result:=TEdit.Create(OwnerForm); +end; + constructor TlrEdit.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); BaseName := 'lrEdit'; - FControl:=TEdit.Create(OwnerForm); - FControl.Parent:=OwnerForm; - end; procedure TlrEdit.LoadFromXML(XML: TLrXMLConfig; const Path: String); @@ -707,12 +757,27 @@ begin TLabel(FControl).WordWrap:=AValue; end; +procedure TlrLabel.PaintDesignControl; +var + AY, aH:integer; +begin + AY:=(DRect.Top + DRect.Bottom) div 2; + aH:=Canvas.TextHeight(Text) div 2; + Canvas.Brush.Color := FControl.Color; + Canvas.FillRect(DRect); + Canvas.Font:=FControl.Font; + Canvas.TextRect(DRect, DRect.Left + 3, AY - aH, Text) +end; + +function TlrLabel.CreateControl: TControl; +begin + Result:=TLabel.Create(OwnerForm); +end; + constructor TlrLabel.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); BaseName := 'lrLabel'; - FControl:=TLabel.Create(OwnerForm); - FControl.Parent:=OwnerForm; end; procedure TlrLabel.LoadFromXML(XML: TLrXMLConfig; const Path: String); @@ -794,18 +859,22 @@ end; procedure TlrVisualControl.OnClickHandle(Sender: TObject); var FSaveView:TfrView; + FSavePage:TfrPage; CmdList, ErrorList:TStringList; begin - if DocMode = dmPrinting then + if (DocMode = dmPrinting) and (Script.Count>0) and (Trim(Script.Text)<>'') then begin FSaveView:=CurView; + FSavePage:=CurPage; CmdList:=TStringList.Create; ErrorList:=TStringList.Create; try CurView := Self; + CurPage:=OwnerPage; frInterpretator.PrepareScript(Script, CmdList, ErrorList); frInterpretator.DoScript(CmdList); finally + CurPage:=FSavePage; CurView := FSaveView; FreeAndNil(CmdList); FreeAndNil(ErrorList); @@ -818,46 +887,17 @@ begin Script:=AValue; end; -type - THackControl = class(TWinControl); - procedure TlrVisualControl.PaintDesignControl; var - Bmp: TBitmap; - MemDC: HDC; - OldBitmap: HBITMAP; + AY, aH:integer; + S:string; begin - Bmp := TBitmap.Create; - Bmp.Width := dx + 1; - Bmp.Height := dy + 1; - Bmp.Canvas.Brush.Color := clBtnFace; - Bmp.Canvas.FillRect(Rect(0, 0, dx + 1, dy + 1)); - - MemDC := CreateCompatibleDC(0); - OldBitmap := SelectObject(MemDC, Bmp.Handle); - - if Control is TWinControl then - begin - Bmp.Canvas.Brush.Color := clRed; - BMP.Canvas.FillRect(Rect(0, 0, dx + 1, dy + 1)); - if Caption <> '' then - BMP.Canvas.TextRect(Rect(0, 0, dx + 1, dy + 1), 0,0, Caption) - else - BMP.Canvas.TextRect(Rect(0, 0, dx + 1, dy + 1), 0,0, Name) - end - else - begin - FControl.Left := 0; - FControl.Top := 0; - FControl.Width := DX; - FControl.Height := DY; - Control.Perform(LM_ERASEBKGND, MemDC, MemDC); - Control.Perform(LM_PAINT, MemDC, MemDC); - end; - SelectObject(MemDC, OldBitmap); - DeleteDC(MemDC); - Canvas.Draw(x, y, Bmp); - Bmp.Free; + AY:=(DRect.Top + DRect.Bottom) div 2; + aH:=Canvas.TextHeight(Text) div 2; + Canvas.Brush.Color := clRed; + Canvas.FillRect(DRect); + Canvas.Font:=FControl.Font; + Canvas.TextRect(DRect, DRect.Left + 3, AY - aH, Name) end; procedure TlrVisualControl.SetName(const AValue: string); @@ -869,7 +909,7 @@ end; procedure TlrVisualControl.UpdateControlPosition; begin FControl.Left:=round(Left); - FControl.Top:=round(Top); + FControl.Top:=round(Top) - 20; //Header width FControl.Width:=round(Width); FControl.Height:=round(Height); end; @@ -881,6 +921,16 @@ begin FControl.OnClick:=@OnClickHandle; end; +constructor TlrVisualControl.Create(AOwnerPage: TfrPage); +begin + inherited Create(AOwnerPage); + FControl:=CreateControl; + if Assigned(FControl) then + begin + FControl.Parent:=OwnerForm; + end; +end; + procedure TlrVisualControl.LoadFromXML(XML: TLrXMLConfig; const Path: String); begin inherited LoadFromXML(XML, Path); @@ -949,1905 +999,5 @@ finalization if Assigned(lrBMP_LRDateEdit) then FreeAndNil(lrBMP_LRDateEdit); end. -unit LRDialogControls; -{$mode objfpc}{$H+} -interface - -uses - Classes, SysUtils, LResources, Graphics, DB, LR_Class, Controls, StdCtrls, - LMessages, LCLType, LCLIntf, Buttons, EditBtn; - -type - TLRDialogControls = class(TComponent) - end; - - { TlrVisualControl } - - TlrVisualControl = class(TfrControl) - private - function GetAutoSize: Boolean; - function GetCaption: string; - function GetColor: TColor; - function GetEnabled: boolean; - function GetFont: TFont; - function GetOnClick: TfrScriptStrings; - procedure SetAutoSize(AValue: Boolean); - procedure SetCaption(AValue: string); - procedure SetColor(AValue: TColor); - procedure SetEnabled(AValue: boolean); - procedure SetFont(AValue: TFont); - procedure OnClickHandle(Sender: TObject); - procedure SetOnClick(AValue: TfrScriptStrings); - protected - FControl: TControl; - procedure PaintDesignControl; override; - procedure SetName(const AValue: string); override; - procedure UpdateControlPosition; override; - procedure AfterCreate;override; - public - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - - property Control: TControl read FControl write FControl; - property AutoSize: Boolean read GetAutoSize write SetAutoSize; - property Color:TColor read GetColor write SetColor; - property Caption:string read GetCaption write SetCaption; - property Text:string read GetCaption write SetCaption; - property Font:TFont read GetFont write SetFont; - property OnClick:TfrScriptStrings read GetOnClick write SetOnClick; - published - property Enabled:boolean read GetEnabled write SetEnabled; - end; - TlrVisualControlClass = class of TlrVisualControl; - - { TlrLabel } - - TlrLabel = class(TlrVisualControl) - private - function GetAlignment: TAlignment; - function GetWordWrap: boolean; - procedure SetAlignment(AValue: TAlignment); - procedure SetWordWrap(AValue: boolean); - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Alignment: TAlignment read GetAlignment write SetAlignment; - property WordWrap:boolean read GetWordWrap write SetWordWrap; - property AutoSize; - property Color; - property Caption; - property Font; - property OnClick; - end; - - { TlrEdit } - - TlrEdit = class(TlrVisualControl) - private - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Color; - property Enabled; - property Text; - property OnClick; - end; - - { TlrMemo } - - TlrMemo = class(TlrVisualControl) - private - procedure MemoChange(Sender: TObject); - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Color; - property Enabled; - property Memo; - property OnClick; - end; - - { TlrButton } - - TlrButton = class(TlrVisualControl) - private - function GetKind: TBitBtnKind; - procedure SetKind(AValue: TBitBtnKind); - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property AutoSize; - property Color; - property Enabled; - property Caption; - property Kind: TBitBtnKind read GetKind write SetKind; - property OnClick; - end; - - { TlrCheckBox } - - TlrCheckBox = class(TlrVisualControl) - private - function GetChecked: boolean; - procedure SetChecked(AValue: boolean); - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property AutoSize; - property Color; - property Enabled; - property Caption; - property Checked:boolean read GetChecked write SetChecked; - property OnClick; - end; - - { TlrRadioButton } - - TlrRadioButton = class(TlrVisualControl) - private - function GetChecked: boolean; - procedure SetChecked(AValue: boolean); - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property AutoSize; - property Color; - property Enabled; - property Caption; - property Checked:boolean read GetChecked write SetChecked; - property OnClick; - end; - - { TlrListBox } - - TlrListBox = class(TlrVisualControl) - private - function GetItemIndex: integer; - function GetItems: TStrings; - procedure SetItemIndex(AValue: integer); - procedure SetItems(AValue: TStrings); - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Color; - property Enabled; - property Items:TStrings read GetItems write SetItems; - property ItemIndex:integer read GetItemIndex write SetItemIndex; - property OnClick; - end; - - { TlrComboBox } - - TlrComboBox = class(TlrVisualControl) - private - function GetDropDownCount: integer; - function GetItemIndex: integer; - function GetItems: TStrings; - function GetStyle: TComboBoxStyle; - procedure SetDropDownCount(AValue: integer); - procedure SetItemIndex(AValue: integer); - procedure SetItems(AValue: TStrings); - procedure SetStyle(AValue: TComboBoxStyle); - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Color; - property Enabled; - property Text; - property AutoSize; - property Style:TComboBoxStyle read GetStyle write SetStyle; - property Items:TStrings read GetItems write SetItems; - property ItemIndex:integer read GetItemIndex write SetItemIndex; - property DropDownCount:integer read GetDropDownCount write SetDropDownCount; - property OnClick; - end; - - { TlrDateEdit } - - TlrDateEdit = class(TlrVisualControl) - private - function GetDate: TDateTime; - procedure SetDate(AValue: TDateTime); - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Color; - property Enabled; - property Date:TDateTime read GetDate write SetDate; - property OnClick; - end; - -procedure Register; - -implementation -uses typinfo; - -procedure Register; -begin - RegisterComponents('LazReport',[TLRDialogControls]); -end; - -var - lrBMP_LRLabel:TBitmap = nil; - lrBMP_LREdit:TBitmap = nil; - lrBMP_LRButton:TBitmap = nil; - lrBMP_LRCheckBox:TBitmap = nil; - lrBMP_LRComboBox:TBitmap = nil; - lrBMP_LRRadioButton:TBitmap = nil; - lrBMP_LRMemo:TBitmap = nil; - lrBMP_LRListBox:TBitmap = nil; - lrBMP_LRDateEdit:TBitmap = nil; - -procedure InitLRComp; - -procedure DoRegsiterControl(var cmpBMP:TBitmap; lrClass:TlrVisualControlClass); -begin - if not assigned(cmpBMP) then - begin - cmpBMP := TBitmap.Create; - cmpBMP.LoadFromLazarusResource(lrClass.ClassName); - frRegisterObject(lrClass, cmpBMP, lrClass.ClassName, nil, otlUIControl, nil); - end; -end; - -begin - DoRegsiterControl(lrBMP_LRLabel, TlrLabel); - DoRegsiterControl(lrBMP_LREdit, TlrEdit); - DoRegsiterControl(lrBMP_LRMemo, TlrMemo); - DoRegsiterControl(lrBMP_LRButton, TlrButton); - DoRegsiterControl(lrBMP_LRCheckBox, TlrCheckBox); - DoRegsiterControl(lrBMP_LRComboBox, TlrComboBox); - DoRegsiterControl(lrBMP_LRRadioButton, TlrRadioButton); - DoRegsiterControl(lrBMP_LRListBox, TlrListBox); - DoRegsiterControl(lrBMP_LRDateEdit, TlrDateEdit); -end; - -{ TlrDateEdit } - -function TlrDateEdit.GetDate: TDateTime; -begin - Result:=TDateEdit(FControl).Date; -end; - -procedure TlrDateEdit.SetDate(AValue: TDateTime); -begin - TDateEdit(FControl).Date:=AValue; -end; - -procedure TlrDateEdit.PaintDesignControl; -var - AY, aH:integer; - R1:TRect; -begin - AY:=(DRect.Top + DRect.Bottom) div 2; - aH:=Canvas.TextHeight(Text) div 2; - Canvas.Frame3d(DRect, 1, bvLowered); - Canvas.Brush.Color := FControl.Color; - Canvas.FillRect(DRect); - Canvas.Font:=FControl.Font; - Canvas.TextRect(DRect, DRect.Left + 3, AY - aH, Text); - - R1:=DRect; - R1.Left:=R1.Right - 16; - DrawFrameControl(Canvas.Handle, R1, DFC_BUTTON, DFCS_BUTTONPUSH); -end; - -constructor TlrDateEdit.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrDateEdit'; - FControl:=TDateEdit.Create(OwnerForm); - FControl.Parent:=OwnerForm; - FControl.AutoSize:=true; -end; - -procedure TlrDateEdit.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); -end; - -procedure TlrDateEdit.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); -end; - -{ TlrListBox } - -function TlrListBox.GetItemIndex: integer; -begin - Result:=TListBox(FControl).ItemIndex; -end; - -function TlrListBox.GetItems: TStrings; -begin - Result:=TListBox(FControl).Items; -end; - -procedure TlrListBox.SetItemIndex(AValue: integer); -begin - TListBox(FControl).ItemIndex:=AValue; -end; - -procedure TlrListBox.SetItems(AValue: TStrings); -begin - TListBox(FControl).Items:=AValue; -end; - -procedure TlrListBox.PaintDesignControl; -var - AY, aH, i:integer; - S:string; -begin - aH:=Canvas.TextHeight(Text) div 2; - Canvas.Frame3d(DRect, 1, bvLowered); - Canvas.Brush.Color := FControl.Color; - Canvas.FillRect(DRect); - Canvas.Font:=FControl.Font; - AY:=DRect.Top + 1; - i:=0; - while (AY < DRect.Bottom) and (iWidth then - Canvas.TextRect(DRect, 0, AY - aH, Caption) - else - Canvas.TextRect(DRect, AX - (aW div 2), AY - aH, Caption) -end; - -constructor TlrButton.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrButton'; - FControl:=TBitBtn.Create(OwnerForm); - FControl.Parent:=OwnerForm; - FControl.AutoSize:=true; -end; - -procedure TlrButton.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - RestoreProperty('Kind',XML.GetValue(Path+'Kind/Value','bkCustom')); -end; - -procedure TlrButton.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'Kind/Value', GetSaveProperty('Kind')); -end; - -{ TlrEdit } - -procedure TlrEdit.PaintDesignControl; -var - AY, aH:integer; -begin - AY:=(DRect.Top + DRect.Bottom) div 2; - aH:=Canvas.TextHeight(Text) div 2; - Canvas.Frame3d(DRect, 1, bvLowered); - Canvas.Brush.Color := FControl.Color; - Canvas.FillRect(DRect); - Canvas.Font:=FControl.Font; - Canvas.TextRect(DRect, DRect.Left + 3, AY - aH, Text) -end; - -constructor TlrEdit.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrEdit'; - FControl:=TEdit.Create(OwnerForm); - FControl.Parent:=OwnerForm; - -end; - -procedure TlrEdit.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - Text:=XML.GetValue(Path+'Text/Value'{%H-}, ''); -end; - -procedure TlrEdit.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'Text/Value'{%H-}, Text); -end; - -{ TlrLabel } - -function TlrLabel.GetAlignment: TAlignment; -begin - Result:=TLabel(FControl).Alignment; -end; - -function TlrLabel.GetWordWrap: boolean; -begin - Result:=TLabel(FControl).WordWrap; -end; - -procedure TlrLabel.SetAlignment(AValue: TAlignment); -begin - TLabel(FControl).Alignment:=AValue; -end; - -procedure TlrLabel.SetWordWrap(AValue: boolean); -begin - TLabel(FControl).WordWrap:=AValue; -end; - -constructor TlrLabel.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrLabel'; - FControl:=TLabel.Create(OwnerForm); - FControl.Parent:=OwnerForm; -end; - -procedure TlrLabel.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - WordWrap:=XML.GetValue(Path+'WordWrap/Value'{%H-}, false); - RestoreProperty('Alignment',XML.GetValue(Path+'Alignment/Value','')); -end; - -procedure TlrLabel.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'WordWrap/Value'{%H-}, WordWrap); - XML.SetValue(Path+'Alignment/Value', GetSaveProperty('Alignment')); -end; - - -{ TlrVisualControl } - -procedure TlrVisualControl.SetColor(AValue: TColor); -begin - FControl.Color:=AValue; - Invalidate; -end; - -function TlrVisualControl.GetAutoSize: Boolean; -begin - Result:=FControl.AutoSize; -end; - -function TlrVisualControl.GetCaption: string; -begin - Result:=FControl.Caption; -end; - -function TlrVisualControl.GetColor: TColor; -begin - Result:=FControl.Color; -end; - -function TlrVisualControl.GetEnabled: boolean; -begin - Result:=FControl.Enabled; -end; - -function TlrVisualControl.GetFont: TFont; -begin - Result:=FControl.Font; -end; - -function TlrVisualControl.GetOnClick: TfrScriptStrings; -begin - Result:=Script; -end; - -procedure TlrVisualControl.SetAutoSize(AValue: Boolean); -begin - FControl.AutoSize:=AValue; -end; - -procedure TlrVisualControl.SetCaption(AValue: string); -begin - FControl.Caption:=AValue; - Invalidate; -end; - -procedure TlrVisualControl.SetEnabled(AValue: boolean); -begin - FControl.Enabled:=AValue; - Invalidate; -end; - -procedure TlrVisualControl.SetFont(AValue: TFont); -begin - FControl.Font:=AValue; - Invalidate; -end; - -procedure TlrVisualControl.OnClickHandle(Sender: TObject); -var - FSaveView:TfrView; - CmdList, ErrorList:TStringList; -begin - if DocMode = dmPrinting then - begin - FSaveView:=CurView; - CmdList:=TStringList.Create; - ErrorList:=TStringList.Create; - try - CurView := Self; - frInterpretator.PrepareScript(Script, CmdList, ErrorList); - frInterpretator.DoScript(CmdList); - finally - CurView := FSaveView; - FreeAndNil(CmdList); - FreeAndNil(ErrorList); - end; - end; -end; - -procedure TlrVisualControl.SetOnClick(AValue: TfrScriptStrings); -begin - Script:=AValue; -end; - -type - THackControl = class(TWinControl); - -procedure TlrVisualControl.PaintDesignControl; -var - Bmp: TBitmap; - MemDC: HDC; - OldBitmap: HBITMAP; -begin - Bmp := TBitmap.Create; - Bmp.Width := dx + 1; - Bmp.Height := dy + 1; - Bmp.Canvas.Brush.Color := clBtnFace; - Bmp.Canvas.FillRect(Rect(0, 0, dx + 1, dy + 1)); - - MemDC := CreateCompatibleDC(0); - OldBitmap := SelectObject(MemDC, Bmp.Handle); - - if Control is TWinControl then - begin - Bmp.Canvas.Brush.Color := clRed; - BMP.Canvas.FillRect(Rect(0, 0, dx + 1, dy + 1)); - if Caption <> '' then - BMP.Canvas.TextRect(Rect(0, 0, dx + 1, dy + 1), 0,0, Caption) - else - BMP.Canvas.TextRect(Rect(0, 0, dx + 1, dy + 1), 0,0, Name) - end - else - begin - FControl.Left := 0; - FControl.Top := 0; - FControl.Width := DX; - FControl.Height := DY; - Control.Perform(LM_ERASEBKGND, MemDC, MemDC); - Control.Perform(LM_PAINT, MemDC, MemDC); - end; - SelectObject(MemDC, OldBitmap); - DeleteDC(MemDC); - Canvas.Draw(x, y, Bmp); - Bmp.Free; -end; - -procedure TlrVisualControl.SetName(const AValue: string); -begin - inherited SetName(AValue); - FControl.Name:=Name; -end; - -procedure TlrVisualControl.UpdateControlPosition; -begin - FControl.Left:=round(Left); - FControl.Top:=round(Top); - FControl.Width:=round(Width); - FControl.Height:=round(Height); -end; - -procedure TlrVisualControl.AfterCreate; -begin - inherited AfterCreate; - if Assigned(FControl) then - FControl.OnClick:=@OnClickHandle; -end; - -procedure TlrVisualControl.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - Enabled:=XML.GetValue(Path+'Enabled/Value'{%H-}, true); - Font.Name := XML.GetValue(Path+'Font/Name/Value', 'Arial'); // todo chk - Font.Size := XML.GetValue(Path+'Font/Size/Value'{%H-}, 10); // todo chk - RestoreProperty('CharSet',XML.GetValue(Path+'Font/Charset/Value',''),Font); - RestoreProperty('Style',XML.GetValue(Path+'Font/Style/Value',''),Font); - Font.Color := StringToColor(XML.GetValue(Path+'Font/Color/Value','clBlack')); // todo chk - Caption:=XML.GetValue(Path+'Caption/Value'{%H-}, ''); - AutoSize:=XML.GetValue(Path+'AutoSize/Value'{%H-}, true); - Color:= StringToColor(XML.GetValue(Path+'Color/Value', 'clNone')); - if StreamMode = smDesigning then - begin - OnClick.Text:=XML.GetValue(Path+'Event/OnClick/Value', ''); - end; -end; - -procedure TlrVisualControl.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'Enabled/Value'{%H-}, Enabled); - XML.SetValue(Path+'Font/Name/Value', Font.Name); - XML.SetValue(Path+'Font/Size/Value'{%H-}, Font.Size); - XML.SetValue(Path+'Font/Color/Value', ColorToString(Font.Color)); - XML.SetValue(Path+'Font/Charset/Value', GetSaveProperty('CharSet',Font)); - XML.SetValue(Path+'Font/Style/Value', GetSaveProperty('Style',Font)); - XML.SetValue(Path+'Caption/Value'{%H-}, Caption); - XML.SetValue(Path+'AutoSize/Value'{%H-}, AutoSize); - XML.SetValue(Path+'Color/Value', ColorToString(Color)); - - if StreamMode = smDesigning then - begin - if IsPublishedProp(self,'OnClick') then - XML.SetValue(Path+'Event/OnClick/Value', OnClick.Text); - end; -end; - - -initialization - {$I lrdialogcontrols_img.inc} - InitLRComp; - -{ RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); - RegisterPropertyEditor(TypeInfo(TfrVariables), TLRZQuery, 'Params', TLRZQueryParamsProperty); - - RegisterPropertyEditor(TypeInfo(string), TLRZConnection, 'Protocol', TLRZConnectionProtocolProperty); -} -finalization - if Assigned(lrBMP_LRLabel) then - FreeAndNil(lrBMP_LRLabel); - if Assigned(lrBMP_LREdit) then - FreeAndNil(lrBMP_LREdit); - if Assigned(lrBMP_LRButton) then - FreeAndNil(lrBMP_LRButton); - if Assigned(lrBMP_LRCheckBox) then - FreeAndNil(lrBMP_LRCheckBox); - if Assigned(lrBMP_LRComboBox) then - FreeAndNil(lrBMP_LRComboBox); - if Assigned(lrBMP_LRRadioButton) then - FreeAndNil(lrBMP_LRRadioButton); - if Assigned(lrBMP_LRMemo) then - FreeAndNil(lrBMP_LRMemo); - if Assigned(lrBMP_LRListBox) then - FreeAndNil(lrBMP_LRListBox); - if Assigned(lrBMP_LRDateEdit) then - FreeAndNil(lrBMP_LRDateEdit); -end. -unit LRDialogControls; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, LResources, Graphics, DB, LR_Class, Controls, StdCtrls, - LMessages, LCLType, LCLIntf, Buttons, EditBtn; - -type - TLRDialogControls = class(TComponent) - end; - - { TlrVisualControl } - - TlrVisualControl = class(TfrControl) - private - function GetAutoSize: Boolean; - function GetCaption: string; - function GetColor: TColor; - function GetEnabled: boolean; - function GetFont: TFont; - function GetOnClick: TfrScriptStrings; - procedure SetAutoSize(AValue: Boolean); - procedure SetCaption(AValue: string); - procedure SetColor(AValue: TColor); - procedure SetEnabled(AValue: boolean); - procedure SetFont(AValue: TFont); - procedure OnClickHandle(Sender: TObject); - procedure SetOnClick(AValue: TfrScriptStrings); - protected - FControl: TControl; - procedure PaintDesignControl; override; - procedure SetName(const AValue: string); override; - procedure UpdateControlPosition; override; - procedure AfterCreate;override; - public - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - - property Control: TControl read FControl write FControl; - property AutoSize: Boolean read GetAutoSize write SetAutoSize; - property Color:TColor read GetColor write SetColor; - property Caption:string read GetCaption write SetCaption; - property Text:string read GetCaption write SetCaption; - property Font:TFont read GetFont write SetFont; - property OnClick:TfrScriptStrings read GetOnClick write SetOnClick; - published - property Enabled:boolean read GetEnabled write SetEnabled; - end; - TlrVisualControlClass = class of TlrVisualControl; - - { TlrLabel } - - TlrLabel = class(TlrVisualControl) - private - function GetAlignment: TAlignment; - function GetWordWrap: boolean; - procedure SetAlignment(AValue: TAlignment); - procedure SetWordWrap(AValue: boolean); - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Alignment: TAlignment read GetAlignment write SetAlignment; - property WordWrap:boolean read GetWordWrap write SetWordWrap; - property AutoSize; - property Color; - property Caption; - property Font; - property OnClick; - end; - - { TlrEdit } - - TlrEdit = class(TlrVisualControl) - private - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Color; - property Enabled; - property Text; - property OnClick; - end; - - { TlrMemo } - - TlrMemo = class(TlrVisualControl) - private - procedure MemoChange(Sender: TObject); - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Color; - property Enabled; - property Memo; - property OnClick; - end; - - { TlrButton } - - TlrButton = class(TlrVisualControl) - private - function GetKind: TBitBtnKind; - procedure SetKind(AValue: TBitBtnKind); - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property AutoSize; - property Color; - property Enabled; - property Caption; - property Kind: TBitBtnKind read GetKind write SetKind; - property OnClick; - end; - - { TlrCheckBox } - - TlrCheckBox = class(TlrVisualControl) - private - function GetChecked: boolean; - procedure SetChecked(AValue: boolean); - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property AutoSize; - property Color; - property Enabled; - property Caption; - property Checked:boolean read GetChecked write SetChecked; - property OnClick; - end; - - { TlrRadioButton } - - TlrRadioButton = class(TlrVisualControl) - private - function GetChecked: boolean; - procedure SetChecked(AValue: boolean); - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property AutoSize; - property Color; - property Enabled; - property Caption; - property Checked:boolean read GetChecked write SetChecked; - property OnClick; - end; - - { TlrListBox } - - TlrListBox = class(TlrVisualControl) - private - function GetItemIndex: integer; - function GetItems: TStrings; - procedure SetItemIndex(AValue: integer); - procedure SetItems(AValue: TStrings); - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Color; - property Enabled; - property Items:TStrings read GetItems write SetItems; - property ItemIndex:integer read GetItemIndex write SetItemIndex; - property OnClick; - end; - - { TlrComboBox } - - TlrComboBox = class(TlrVisualControl) - private - function GetDropDownCount: integer; - function GetItemIndex: integer; - function GetItems: TStrings; - function GetStyle: TComboBoxStyle; - procedure SetDropDownCount(AValue: integer); - procedure SetItemIndex(AValue: integer); - procedure SetItems(AValue: TStrings); - procedure SetStyle(AValue: TComboBoxStyle); - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Color; - property Enabled; - property Text; - property AutoSize; - property Style:TComboBoxStyle read GetStyle write SetStyle; - property Items:TStrings read GetItems write SetItems; - property ItemIndex:integer read GetItemIndex write SetItemIndex; - property DropDownCount:integer read GetDropDownCount write SetDropDownCount; - property OnClick; - end; - - { TlrDateEdit } - - TlrDateEdit = class(TlrVisualControl) - private - function GetDate: TDateTime; - procedure SetDate(AValue: TDateTime); - protected - procedure PaintDesignControl; override; - public - constructor Create(AOwnerPage:TfrPage); override; - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Color; - property Enabled; - property Date:TDateTime read GetDate write SetDate; - property OnClick; - end; - -procedure Register; - -implementation -uses typinfo; - -procedure Register; -begin - RegisterComponents('LazReport',[TLRDialogControls]); -end; - -var - lrBMP_LRLabel:TBitmap = nil; - lrBMP_LREdit:TBitmap = nil; - lrBMP_LRButton:TBitmap = nil; - lrBMP_LRCheckBox:TBitmap = nil; - lrBMP_LRComboBox:TBitmap = nil; - lrBMP_LRRadioButton:TBitmap = nil; - lrBMP_LRMemo:TBitmap = nil; - lrBMP_LRListBox:TBitmap = nil; - lrBMP_LRDateEdit:TBitmap = nil; - -procedure InitLRComp; - -procedure DoRegsiterControl(var cmpBMP:TBitmap; lrClass:TlrVisualControlClass); -begin - if not assigned(cmpBMP) then - begin - cmpBMP := TBitmap.Create; - cmpBMP.LoadFromLazarusResource(lrClass.ClassName); - frRegisterObject(lrClass, cmpBMP, lrClass.ClassName, nil, otlUIControl, nil); - end; -end; - -begin - DoRegsiterControl(lrBMP_LRLabel, TlrLabel); - DoRegsiterControl(lrBMP_LREdit, TlrEdit); - DoRegsiterControl(lrBMP_LRMemo, TlrMemo); - DoRegsiterControl(lrBMP_LRButton, TlrButton); - DoRegsiterControl(lrBMP_LRCheckBox, TlrCheckBox); - DoRegsiterControl(lrBMP_LRComboBox, TlrComboBox); - DoRegsiterControl(lrBMP_LRRadioButton, TlrRadioButton); - DoRegsiterControl(lrBMP_LRListBox, TlrListBox); - DoRegsiterControl(lrBMP_LRDateEdit, TlrDateEdit); -end; - -{ TlrDateEdit } - -function TlrDateEdit.GetDate: TDateTime; -begin - Result:=TDateEdit(FControl).Date; -end; - -procedure TlrDateEdit.SetDate(AValue: TDateTime); -begin - TDateEdit(FControl).Date:=AValue; -end; - -procedure TlrDateEdit.PaintDesignControl; -var - AY, aH:integer; - R1:TRect; -begin - AY:=(DRect.Top + DRect.Bottom) div 2; - aH:=Canvas.TextHeight(Text) div 2; - Canvas.Frame3d(DRect, 1, bvLowered); - Canvas.Brush.Color := FControl.Color; - Canvas.FillRect(DRect); - Canvas.Font:=FControl.Font; - Canvas.TextRect(DRect, DRect.Left + 3, AY - aH, Text); - - R1:=DRect; - R1.Left:=R1.Right - 16; - DrawFrameControl(Canvas.Handle, R1, DFC_BUTTON, DFCS_BUTTONPUSH); -end; - -constructor TlrDateEdit.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrDateEdit'; - FControl:=TDateEdit.Create(OwnerForm); - FControl.Parent:=OwnerForm; - FControl.AutoSize:=true; -end; - -procedure TlrDateEdit.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); -end; - -procedure TlrDateEdit.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); -end; - -{ TlrListBox } - -function TlrListBox.GetItemIndex: integer; -begin - Result:=TListBox(FControl).ItemIndex; -end; - -function TlrListBox.GetItems: TStrings; -begin - Result:=TListBox(FControl).Items; -end; - -procedure TlrListBox.SetItemIndex(AValue: integer); -begin - TListBox(FControl).ItemIndex:=AValue; -end; - -procedure TlrListBox.SetItems(AValue: TStrings); -begin - TListBox(FControl).Items:=AValue; -end; - -procedure TlrListBox.PaintDesignControl; -var - AY, aH, i:integer; - S:string; -begin - aH:=Canvas.TextHeight(Text) div 2; - Canvas.Frame3d(DRect, 1, bvLowered); - Canvas.Brush.Color := FControl.Color; - Canvas.FillRect(DRect); - Canvas.Font:=FControl.Font; - AY:=DRect.Top + 1; - i:=0; - while (AY < DRect.Bottom) and (iWidth then - Canvas.TextRect(DRect, 0, AY - aH, Caption) - else - Canvas.TextRect(DRect, AX - (aW div 2), AY - aH, Caption) -end; - -constructor TlrButton.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrButton'; - FControl:=TBitBtn.Create(OwnerForm); - FControl.Parent:=OwnerForm; - FControl.AutoSize:=true; -end; - -procedure TlrButton.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - RestoreProperty('Kind',XML.GetValue(Path+'Kind/Value','bkCustom')); -end; - -procedure TlrButton.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'Kind/Value', GetSaveProperty('Kind')); -end; - -{ TlrEdit } - -procedure TlrEdit.PaintDesignControl; -var - AY, aH:integer; -begin - AY:=(DRect.Top + DRect.Bottom) div 2; - aH:=Canvas.TextHeight(Text) div 2; - Canvas.Frame3d(DRect, 1, bvLowered); - Canvas.Brush.Color := FControl.Color; - Canvas.FillRect(DRect); - Canvas.Font:=FControl.Font; - Canvas.TextRect(DRect, DRect.Left + 3, AY - aH, Text) -end; - -constructor TlrEdit.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrEdit'; - FControl:=TEdit.Create(OwnerForm); - FControl.Parent:=OwnerForm; - -end; - -procedure TlrEdit.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - Text:=XML.GetValue(Path+'Text/Value'{%H-}, ''); -end; - -procedure TlrEdit.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'Text/Value'{%H-}, Text); -end; - -{ TlrLabel } - -function TlrLabel.GetAlignment: TAlignment; -begin - Result:=TLabel(FControl).Alignment; -end; - -function TlrLabel.GetWordWrap: boolean; -begin - Result:=TLabel(FControl).WordWrap; -end; - -procedure TlrLabel.SetAlignment(AValue: TAlignment); -begin - TLabel(FControl).Alignment:=AValue; -end; - -procedure TlrLabel.SetWordWrap(AValue: boolean); -begin - TLabel(FControl).WordWrap:=AValue; -end; - -constructor TlrLabel.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrLabel'; - FControl:=TLabel.Create(OwnerForm); - FControl.Parent:=OwnerForm; -end; - -procedure TlrLabel.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - WordWrap:=XML.GetValue(Path+'WordWrap/Value'{%H-}, false); - RestoreProperty('Alignment',XML.GetValue(Path+'Alignment/Value','')); -end; - -procedure TlrLabel.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'WordWrap/Value'{%H-}, WordWrap); - XML.SetValue(Path+'Alignment/Value', GetSaveProperty('Alignment')); -end; - - -{ TlrVisualControl } - -procedure TlrVisualControl.SetColor(AValue: TColor); -begin - FControl.Color:=AValue; - Invalidate; -end; - -function TlrVisualControl.GetAutoSize: Boolean; -begin - Result:=FControl.AutoSize; -end; - -function TlrVisualControl.GetCaption: string; -begin - Result:=FControl.Caption; -end; - -function TlrVisualControl.GetColor: TColor; -begin - Result:=FControl.Color; -end; - -function TlrVisualControl.GetEnabled: boolean; -begin - Result:=FControl.Enabled; -end; - -function TlrVisualControl.GetFont: TFont; -begin - Result:=FControl.Font; -end; - -function TlrVisualControl.GetOnClick: TfrScriptStrings; -begin - Result:=Script; -end; - -procedure TlrVisualControl.SetAutoSize(AValue: Boolean); -begin - FControl.AutoSize:=AValue; -end; - -procedure TlrVisualControl.SetCaption(AValue: string); -begin - FControl.Caption:=AValue; - Invalidate; -end; - -procedure TlrVisualControl.SetEnabled(AValue: boolean); -begin - FControl.Enabled:=AValue; - Invalidate; -end; - -procedure TlrVisualControl.SetFont(AValue: TFont); -begin - FControl.Font:=AValue; - Invalidate; -end; - -procedure TlrVisualControl.OnClickHandle(Sender: TObject); -var - FSaveView:TfrView; - CmdList, ErrorList:TStringList; -begin - if DocMode = dmPrinting then - begin - FSaveView:=CurView; - CmdList:=TStringList.Create; - ErrorList:=TStringList.Create; - try - CurView := Self; - frInterpretator.PrepareScript(Script, CmdList, ErrorList); - frInterpretator.DoScript(CmdList); - finally - CurView := FSaveView; - FreeAndNil(CmdList); - FreeAndNil(ErrorList); - end; - end; -end; - -procedure TlrVisualControl.SetOnClick(AValue: TfrScriptStrings); -begin - Script:=AValue; -end; - -type - THackControl = class(TWinControl); - -procedure TlrVisualControl.PaintDesignControl; -var - Bmp: TBitmap; - MemDC: HDC; - OldBitmap: HBITMAP; -begin - Bmp := TBitmap.Create; - Bmp.Width := dx + 1; - Bmp.Height := dy + 1; - Bmp.Canvas.Brush.Color := clBtnFace; - Bmp.Canvas.FillRect(Rect(0, 0, dx + 1, dy + 1)); - - MemDC := CreateCompatibleDC(0); - OldBitmap := SelectObject(MemDC, Bmp.Handle); - - if Control is TWinControl then - begin - Bmp.Canvas.Brush.Color := clRed; - BMP.Canvas.FillRect(Rect(0, 0, dx + 1, dy + 1)); - if Caption <> '' then - BMP.Canvas.TextRect(Rect(0, 0, dx + 1, dy + 1), 0,0, Caption) - else - BMP.Canvas.TextRect(Rect(0, 0, dx + 1, dy + 1), 0,0, Name) - end - else - begin - FControl.Left := 0; - FControl.Top := 0; - FControl.Width := DX; - FControl.Height := DY; - Control.Perform(LM_ERASEBKGND, MemDC, MemDC); - Control.Perform(LM_PAINT, MemDC, MemDC); - end; - SelectObject(MemDC, OldBitmap); - DeleteDC(MemDC); - Canvas.Draw(x, y, Bmp); - Bmp.Free; -end; - -procedure TlrVisualControl.SetName(const AValue: string); -begin - inherited SetName(AValue); - FControl.Name:=Name; -end; - -procedure TlrVisualControl.UpdateControlPosition; -begin - FControl.Left:=round(Left); - FControl.Top:=round(Top); - FControl.Width:=round(Width); - FControl.Height:=round(Height); -end; - -procedure TlrVisualControl.AfterCreate; -begin - inherited AfterCreate; - if Assigned(FControl) then - FControl.OnClick:=@OnClickHandle; -end; - -procedure TlrVisualControl.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - Enabled:=XML.GetValue(Path+'Enabled/Value'{%H-}, true); - Font.Name := XML.GetValue(Path+'Font/Name/Value', 'Arial'); // todo chk - Font.Size := XML.GetValue(Path+'Font/Size/Value'{%H-}, 10); // todo chk - RestoreProperty('CharSet',XML.GetValue(Path+'Font/Charset/Value',''),Font); - RestoreProperty('Style',XML.GetValue(Path+'Font/Style/Value',''),Font); - Font.Color := StringToColor(XML.GetValue(Path+'Font/Color/Value','clBlack')); // todo chk - Caption:=XML.GetValue(Path+'Caption/Value'{%H-}, ''); - AutoSize:=XML.GetValue(Path+'AutoSize/Value'{%H-}, true); - Color:= StringToColor(XML.GetValue(Path+'Color/Value', 'clNone')); - if StreamMode = smDesigning then - begin - OnClick.Text:=XML.GetValue(Path+'Event/OnClick/Value', ''); - end; -end; - -procedure TlrVisualControl.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'Enabled/Value'{%H-}, Enabled); - XML.SetValue(Path+'Font/Name/Value', Font.Name); - XML.SetValue(Path+'Font/Size/Value'{%H-}, Font.Size); - XML.SetValue(Path+'Font/Color/Value', ColorToString(Font.Color)); - XML.SetValue(Path+'Font/Charset/Value', GetSaveProperty('CharSet',Font)); - XML.SetValue(Path+'Font/Style/Value', GetSaveProperty('Style',Font)); - XML.SetValue(Path+'Caption/Value'{%H-}, Caption); - XML.SetValue(Path+'AutoSize/Value'{%H-}, AutoSize); - XML.SetValue(Path+'Color/Value', ColorToString(Color)); - - if StreamMode = smDesigning then - begin - if IsPublishedProp(self,'OnClick') then - XML.SetValue(Path+'Event/OnClick/Value', OnClick.Text); - end; -end; - - -initialization - {$I lrdialogcontrols_img.inc} - InitLRComp; - -{ RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); - RegisterPropertyEditor(TypeInfo(TfrVariables), TLRZQuery, 'Params', TLRZQueryParamsProperty); - - RegisterPropertyEditor(TypeInfo(string), TLRZConnection, 'Protocol', TLRZConnectionProtocolProperty); -} -finalization - if Assigned(lrBMP_LRLabel) then - FreeAndNil(lrBMP_LRLabel); - if Assigned(lrBMP_LREdit) then - FreeAndNil(lrBMP_LREdit); - if Assigned(lrBMP_LRButton) then - FreeAndNil(lrBMP_LRButton); - if Assigned(lrBMP_LRCheckBox) then - FreeAndNil(lrBMP_LRCheckBox); - if Assigned(lrBMP_LRComboBox) then - FreeAndNil(lrBMP_LRComboBox); - if Assigned(lrBMP_LRRadioButton) then - FreeAndNil(lrBMP_LRRadioButton); - if Assigned(lrBMP_LRMemo) then - FreeAndNil(lrBMP_LRMemo); - if Assigned(lrBMP_LRListBox) then - FreeAndNil(lrBMP_LRListBox); - if Assigned(lrBMP_LRDateEdit) then - FreeAndNil(lrBMP_LRDateEdit); -end. diff --git a/components/lazreport/source/addons/DialogControls/lrdialogcontrols_img.inc b/components/lazreport/source/addons/DialogControls/lrdialogcontrols_img.inc index 7663bb69a4..00079ba9ea 100644 --- a/components/lazreport/source/addons/DialogControls/lrdialogcontrols_img.inc +++ b/components/lazreport/source/addons/DialogControls/lrdialogcontrols_img.inc @@ -1365,6 +1365,1375 @@ LazarusResources.Add('tlrdateedit','BMP',[ +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 ]); + +(* +LazarusResources.Add('tlrbutton','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#196#190#182#255#143'c7'#255#131'>'#10#255 + +#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@' + +#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255 + +#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@' + +#10#255#133'@'#11#255#132'A'#12#255#180#160#137#255#248#251#254#0#151'e7'#255 + +#213#156'x'#255#240#168#142#255#238#165#139#255#238#166#140#255#239#166#140 + +#255#239#166#140#255#239#166#140#255#239#166#140#255#239#166#140#255#239#166 + +#140#255#239#166#140#255#239#166#140#255#239#166#140#255#239#166#140#255#239 + +#166#140#255#239#166#140#255#239#166#140#255#239#166#140#255#238#166#140#255 + +#237#165#139#255#243#172#148#255#166'nA'#255#218#212#205#255#160'`'''#255#246 + +#226#214#255#225#215#218#255#222#206#205#255#223#208#208#255#223#208#208#255 + +#223#208#208#255#223#208#208#255#222#207#207#255#223#209#208#255#224#209#209 + +#255#222#207#207#255#223#208#208#255#222#207#207#255#223#208#208#255#222#207 + +#207#255#224#209#208#255#223#208#208#255#223#208#208#255#223#208#208#255#218 + +#203#202#255#249#244#245#255#185#131'T'#255#206#195#186#255#158'^('#255#243 + +#222#210#255#233#222#224#255#230#213#211#255#231#215#214#255#231#215#214#255 + +#231#215#215#255#230#214#213#255#230#214#213#255#228#213#212#255#224#208#208 + +#255#230#214#213#255#233#217#217#255#234#218#217#255#232#216#216#255#230#214 + +#213#255#228#212#212#255#231#216#215#255#231#215#214#255#231#215#214#255#227 + +#210#209#255#253#244#246#255#181#127'S'#255#207#197#188#255#160'a+'#255#245 + +#225#213#255#234#225#227#255#231#217#215#255#232#219#218#255#232#219#218#255 + +#230#217#217#255#230#217#217#255#230#217#217#255'_\['#255'_\['#255#230#218 + +#217#255#230#218#217#255'_\['#255#240#226#225#255'_\['#255#230#218#217#255 + +#230#218#217#255#230#218#217#255#232#219#218#255#228#214#213#255#253#247#248 + +#255#183#131'V'#255#207#196#187#255#161'd/'#255#246#227#216#255#240#232#233 + +#255#237#224#222#255#238#226#225#255#238#226#225#255#233#221#219#255#233#221 + +#219#255'_\['#255#233#221#219#255#233#221#219#255'_\['#255#236#224#223#255']' + +'XW'#255'_\['#255#236#224#223#255#236#224#223#255#236#224#223#255#238#226#225 + +#255#238#226#225#255#235#222#220#255#255#250#252#255#184#133'Y'#255#206#195 + +#186#255#161'e1'#255#246#229#218#255#244#238#238#255#242#231#229#255#243#233 + +#231#255#243#233#231#255#238#228#226#255#238#228#226#255'_\['#255#238#228#226 + +#255#238#228#226#255'_\['#255#243#234#232#255'_\['#255'_\['#255#243#234#232 + +#255#243#234#232#255#243#232#230#255#243#233#231#255#243#233#231#255#240#229 + +#227#255#254#253#254#255#184#134'['#255#205#196#186#255#162'g3'#255#248#231 + ,#220#255#252#245#246#255#250#238#237#255#251#240#239#255#251#240#239#255#246 + +#235#234#255#246#235#234#255'_\['#255#246#235#234#255#246#235#234#255'_\[' + +#255#249#238#237#255'_\['#255#249#238#237#255'_\['#255#249#238#237#255#249 + +#238#237#255#251#240#239#255#251#240#238#255#249#238#236#255#255#255#255#255 + +#185#136']'#255#206#196#186#255#163'j6'#255#248#232#222#255#253#248#250#255 + +#251#242#241#255#252#244#243#255#252#244#243#255#249#241#240#255#252#244#243 + +#255'_\['#255#252#244#243#255#252#244#243#255'_\['#255#255#253#252#255'_\[' + +#255#255#251#250#255#255#253#252#255#252#243#242#255#253#245#244#255#252#244 + +#243#255#251#243#242#255#250#241#240#255#255#254#254#255#185#138'_'#255#205 + +#195#186#255#164'm;'#255#249#235#224#255#253#253#252#255#251#249#245#255#252 + +#250#247#255#252#250#247#255#253#250#247#255#253#249#246#255#255#255#255#255 + +'_\['#255'_\['#255#255#255#252#255#255#255#252#255'_\['#255#252#249#246#255 + +#250#248#245#255#252#250#247#255#252#250#247#255#252#250#247#255#251#249#246 + +#255#250#248#244#255#255#254#253#255#186#140'c'#255#206#195#185#255#166'o=' + +#255#249#238#230#255#251#255#255#255#250#253#253#255#251#254#255#255#251#254 + +#255#255#251#253#255#255#251#254#255#255#249#252#253#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#250#252#254#255#255#255#255#255#251#253#255#255 + +#251#254#255#255#251#254#255#255#251#254#255#255#251#254#255#255#251#252#254 + +#255#248#251#252#255#252#255#255#255#188#143'g'#255#205#194#184#255#167'uF' + +#255#253#230#215#255#255#247#238#255#255#244#235#255#255#245#236#255#255#245 + +#236#255#255#245#236#255#255#245#236#255#255#245#236#255#255#242#233#255#255 + +#242#233#255#255#244#235#255#255#245#236#255#255#243#234#255#255#245#236#255 + +#255#245#236#255#255#245#236#255#255#245#236#255#255#245#236#255#255#244#235 + +#255#255#243#233#255#255#250#242#255#190#145'j'#255#205#193#184#255#162#134 + +'n'#255#192#154'w'#255#207#174#138#255#207#168#130#255#208#170#131#255#208 + +#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255 + +#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131 + +#255#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255#207#169 + +#131#255#208#170#133#255#206#167#129#255#166#132'f'#255#220#219#219#255#217 + +#221#224#255#169#153#135#255#146'u['#255#149'y]'#255#148'y\'#255#148'y\'#255 + +#148'y\'#255#148'y\'#255#148'y\'#255#148'y\'#255#148'y\'#255#148'y\'#255#145 + +'vZ'#255#144'vZ'#255#145'vZ'#255#145'vZ'#255#145'vZ'#255#145'vZ'#255#144'vZ' + +#255#146'w['#255#148'x\'#255#150'|_'#255#201#197#193#255#225#225#229#255#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#254#254#254#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 +]); +LazarusResources.Add('tlrbuttonpanel','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161 + +#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255 + +#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157 + +#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157 + +#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161 + +#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255 + +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 + +#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223 + +#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227 + +#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255 + +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 + +#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223 + +#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227 + +#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255 + +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 + +#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223 + +#224#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10 + +#255#133'@'#10#255#133'@'#10#255#131'>'#10#255#131'>'#10#255#143'c7'#255#196 + +#190#182#255#227#223#224#255#227#223#224#255#196#190#182#255#143'c7'#255#131 + +'>'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10 + +#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#239#166#140#255#239#166#140 + +#255#239#166#140#255#239#166#140#255#238#166#140#255#238#166#140#255#238#165 + +#139#255#240#168#142#255#238#165#139#255#213#156'x'#255#151'e7'#255#227#223 + +#224#255#227#223#224#255#151'e7'#255#213#156'x'#255#238#165#139#255#238#165 + +#139#255#238#166#140#255#238#166#140#255#239#166#140#255#239#166#140#255#239 + +#166#140#255#239#166#140#255#239#166#140#255#223#208#208#255#223#208#208#255 + +#223#208#208#255#223#208#208#255#223#208#208#255#223#208#208#255#223#208#208 + +#255#222#206#205#255#225#215#218#255#246#226#214#255#160'`'''#255#227#223#224 + +#255#227#223#224#255#160'`'''#255#246#226#214#255#225#215#218#255#223#208#208 + +#255#223#208#208#255#223#208#208#255#223#208#208#255#223#208#208#255#223#208 + +#208#255#223#208#208#255#223#208#208#255#230#214#213#255#0#0#255#255'uu'#255 + +#255#231#215#215#255#231#215#214#255'uu'#255#255#0#0#255#255#230#213#211#255 + +#233#222#224#255#243#222#210#255#158'^('#255#227#223#224#255#227#223#224#255 + +#158'^('#255#243#222#210#255#233#222#224#255#231#215#214#255#231#215#214#255 + +#0#147#0#255#231#215#215#255#230#214#213#255#230#214#213#255#230#214#213#255 + +#230#214#213#255#230#217#217#255'uu'#255#255#0#0#255#255'uu'#255#255'uu'#255 + +#255#0#0#255#255'uu'#255#255#231#217#215#255#234#225#227#255#245#225#213#255 + +#160'a+'#255#227#223#224#255#227#223#224#255#160'a+'#255#245#225#213#255#234 + +#225#227#255#232#219#218#255#0#147#0#255'U'#255'U'#255#0#147#0#255#230#217 + +#217#255#230#217#217#255#230#217#217#255#230#217#217#255#233#221#219#255#233 + +#221#219#255'uu'#255#255#0#0#255#255#0#0#255#255'uu'#255#255#238#226#225#255 + +#237#224#222#255#240#232#233#255#246#227#216#255#161'd/'#255#227#223#224#255 + +#227#223#224#255#161'd/'#255#246#227#216#255#240#232#233#255#0#147#0#255'U' + +#255'U'#255#0#217#0#255'U'#255'U'#255#0#147#0#255#233#221#219#255#233#221#219 + +#255#233#221#219#255#246#235#234#255#246#235#234#255'uu'#255#255#0#0#255#255 + +#0#0#255#255'uu'#255#255#251#240#239#255#250#238#237#255#252#245#246#255#248 + +#231#220#255#162'g3'#255#227#223#224#255#227#223#224#255#162'g3'#255#248#231 + +#220#255#252#245#246#255#0#217#0#255#0#217#0#255#251#240#239#255#0#217#0#255 + +'U'#255'U'#255#0#147#0#255#246#235#234#255#246#235#234#255#249#241#240#255'u' + +'u'#255#255#0#0#255#255'uu'#255#255'uu'#255#255#0#0#255#255'uu'#255#255#251 + +#242#241#255#253#248#250#255#248#232#222#255#162'g3'#255#227#223#224#255#227 + +#223#224#255#163'j6'#255#248#232#222#255#253#248#250#255#252#244#243#255#252 + +#244#243#255#252#244#243#255#249#241#240#255#0#217#0#255'U'#255'U'#255#0#147 + +#0#255#249#241#240#255#253#250#247#255#0#0#255#255'uu'#255#255#253#250#247 + +#255#252#250#247#255'uu'#255#255#0#0#255#255#251#249#245#255#253#253#252#255 + +#249#235#224#255#162'g3'#255#227#223#224#255#227#223#224#255#164'm;'#255#249 + +#235#224#255#253#253#252#255#252#250#247#255#252#250#247#255#252#250#247#255 + ,#253#250#247#255#253#249#246#255#0#217#0#255#0#217#0#255#253#250#247#255#255 + +#255#255#255#251#254#255#255#251#254#255#255#251#253#255#255#251#254#255#255 + +#251#254#255#255#251#254#255#255#250#253#253#255#251#255#255#255#249#238#230 + +#255#162'g3'#255#227#223#224#255#227#223#224#255#166'o='#255#249#238#230#255 + +#251#255#255#255#251#254#255#255#251#254#255#255#251#254#255#255#251#253#255 + +#255#251#254#255#255#251#254#255#255#255#255#255#255#255#255#255#255#255#245 + +#236#255#255#245#236#255#255#245#236#255#255#245#236#255#255#245#236#255#255 + +#245#236#255#255#244#235#255#255#247#238#255#255#247#238#255#253#230#215#255 + +#167'uF'#255#227#223#224#255#227#223#224#255#167'uF'#255#253#230#215#255#255 + +#247#238#255#255#244#235#255#255#245#236#255#255#245#236#255#255#245#236#255 + +#255#245#236#255#255#245#236#255#255#245#236#255#255#245#236#255#208#170#131 + +#255#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255#208#170 + +#131#255#207#168#130#255#207#168#130#255#207#168#130#255#192#154'w'#255#162 + +#134'n'#255#227#223#224#255#227#223#224#255#162#134'n'#255#192#154'w'#255#207 + +#168#130#255#207#168#130#255#208#170#131#255#208#170#131#255#208#170#131#255 + +#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255#146'u['#255 + +#146'u['#255#146'u['#255#146'u['#255#146'u['#255#146'u['#255#146'u['#255#146 + +'u['#255#146'u['#255#169#153#135#255#217#221#224#255#227#223#224#255#227#223 + +#224#255#217#221#224#255#169#153#135#255#146'u['#255#146'u['#255#146'u['#255 + +#146'u['#255#146'u['#255#146'u['#255#146'u['#255#146'u['#255#146'u['#255#227 + +#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255 + +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 + +#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223 + +#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227 + +#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255 + +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 + +#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223 + +#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227 + +#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255 + +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161 + +#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255 + +#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157 + +#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157 + +#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161 + +#157#157#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0 +]); +LazarusResources.Add('tlrcheckbox','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0'EEE'#255'EEE'#255'EEE'#255'EEE' + +#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255 + +'EEE'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254 + +#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0'EEE'#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231 + +#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 + +#231#231#255#227#231#231#255#227#231#231#255'EEE'#255#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE'#255#227#231#231 + +#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231 + +#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 + +#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0'EEE'#255#227#231#231#255#227#231#231#255#227#231#231 + +#255#227#231#231#255#190'l8'#255#227#231#231#255#227#231#231#255#227#231#231 + +#255#227#231#231#255#227#231#231#255#227#231#231#255'EEE'#255#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE'#255 + +#227#231#231#255#227#231#231#255#227#231#231#255#190'l8'#255#190'l8'#255#190 + +'l8'#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 + +#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0'EEE'#255#227#231#231#255#227#231#231#255#190'l8'#255 + +#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#227#231#231#255#227#231#231 + +#255#227#231#231#255#227#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE'#255#227#231#231#255#227 + +#231#231#255#190'l8'#255#190'l8'#255#227#231#231#255#190'l8'#255#190'l8'#255 + +#190'l8'#255#227#231#231#255#227#231#231#255#227#231#231#255'EEE'#255#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE' + +#255#227#231#231#255#227#231#231#255#190'l8'#255#227#231#231#255#227#231#231 + +#255#227#231#231#255#190'l8'#255#190'l8'#255#190'l8'#255#227#231#231#255#227 + ,#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0'EEE'#255#227#231#231#255#227#231#231#255#227#231#231 + +#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#190'l8' + +#255#190'l8'#255#227#231#231#255#227#231#231#255'EEE'#255#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE'#255#227 + +#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255 + +#227#231#231#255#227#231#231#255#227#231#231#255#190'l8'#255#227#231#231#255 + +#227#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0'EEE'#255#227#231#231#255#227#231#231#255#227#231 + +#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 + +#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255'EEE'#255#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE' + +#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231 + +#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 + +#231#231#255#227#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254#254#254 + +#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0'EEE'#255'EEE'#255'EEE'#255'EEE'#255'E' + +'EE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE' + +#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0 +]); +LazarusResources.Add('tlrcombobox','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#195#193#192#255#195#193#192#255#195#193#192#255 + +#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192 + +#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193 + +#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#195#193#192#255 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255#237 + +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#146'ww'#255#195#193#192#255#255#255#255 + +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146 + +'ww'#255#237#239#239#255#237#239#239#255'311'#255'311'#255'311'#255'311'#255 + +'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255#237#239#239 + +#255#237#239#239#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237#239 + +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 + +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237#239#239#255#237 + +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#146'ww' + +#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#146'ww'#255#188#187#189#255#188#187#189#255#188 + +#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255 + +#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189 + +#255#188#187#189#255#188#187#189#255#188#187#189#255#146'ww'#255#195#193#192 + +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#146'ww'#255#188#187#189#255#188#187#189#255'311'#255'311'#255 + +'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311' + +#255#188#187#189#255#188#187#189#255#146'ww'#255#195#193#192#255#255#255#255 + +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146 + +'ww'#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188 + +#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255 + +#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189 + +#255#188#187#189#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237#239 + +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 + +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237#239#239#255#237 + +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#146'ww' + +#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#146'ww'#255#237#239#239#255#237#239#239#255'311' + ,#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255 + +'311'#255'311'#255#237#239#239#255#237#239#239#255#146'ww'#255#195#193#192 + +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 + +#239#255#237#239#239#255#237#239#239#255#146'ww'#255#195#193#192#255#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#146'ww'#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255 + +#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192 + +#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193 + +#192#255#195#193#192#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255 + +#255#0#255#255#255#0#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255'zzz'#255 + +'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237 + +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#237#239#239#255#146'ww'#255#195#193#192 + +#255#195#193#192#255#195#193#192#255#195#193#192#255#146'ww'#255#195#193#192 + +#255#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 + +#239#255#237#239#239#255#237#239#239#255#146'ww'#255#237#239#239#255'zzz'#255 + +#137#137#137#255#195#193#192#255#146'ww'#255#195#193#192#255#255#255#255#0 + +#255#255#255#0#255#255#255#0#146'ww'#255#237#239#239#255'311'#255'311'#255'3' + +'11'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311' + +#255#237#239#239#255#146'ww'#255#237#239#239#255#1#3#3#255#0#1#0#255#195#193 + +#192#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255 + +#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 + +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#146 + +'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255#195#193#192#255#146 + +'ww'#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255 + +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 + +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#255#255#255 + +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#254#254#254#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0 +]); +LazarusResources.Add('tlredit','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#252#250#250#0#255#250#253#0 + +#255#250#253#0#255#250#253#0#255#251#253#0#250#252#253#0#252#251#253#0#255 + +#250#253#0#255#249#253#0#255#248#252#0#255#250#253#0#249#253#254#0#240#248 + +#248#0#252#254#255#0#255#254#255#0#255#253#255#0#254#247#250#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#253#253#253#0#255#255#255#0#255 + +#255#255#0#161#157#157#255#226#239#241#255#226#239#241#255#226#239#241#255 + +#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241 + +#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239 + +#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226 + +#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#255#255#255#0 + +#255#255#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#226#239#241#255#255#255#255#0#255 + +#255#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#0#2#0#255#0#3#0#255#255#255#255#255#0#2#1#255#0#0#0#255#255 + +#255#255#255#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq' + +#255#255#255#255#255#255#255#255#255#255#255#255#255#190'l8'#255#190'l8'#255 + +#190'l8'#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#190'l8'#255 + +#190'l8'#255#255#255#255#255#255#255#255#255#255#255#255#255#0#3#0#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#226#239#241#255#255#255#255#0 + +#255#255#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#190 + +'l8'#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255 + +#190'l8'#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255 + +#255#255#255#255#255#2#6#1#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255 + +#255#255#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255#190'l8' + +#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255#190 + +'l8'#255#190'l8'#255#255#255#255#255#255#255#255#255#2#2#0#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#226#239#241#255#255#255#255#0#255#255 + +#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#255#190'l8' + +#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255#255 + +#255#255#255#11#10#6#255#255#255#255#255#255#255#255#255#255#255#255#255#226 + +#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#190'l8' + +#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255#190 + +'l8'#255#190'l8'#255#255#255#255#255#255#255#255#255#2#0#0#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#226#239#241#255#255#255#255#0#255#255 + +#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#255#255#255 + ,#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#255#255#255#255#255#190 + +'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#4#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#5#0 + +#2#255#255#255#255#255#255#255#255#255#255#255#255#255#226#239#241#255#255 + +#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#4#0#3#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#226#239#241#255#255#255#255#0#255#255 + +#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#0#0#0#255#0#0#1#255#255#255#255#255#2#2#2#255#0#0#0#255#255#255 + +#255#255#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255'doq' + +#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255 + +'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq' + +#255'doq'#255#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255#161 + +#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255 + +#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157 + +#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157 + +#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161 + +#157#157#255#161#157#157#255#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#254#254#254#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0 +]); +LazarusResources.Add('tlrimage','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#1#0#0#0#3#0#0#0#3#0#0#0#2#0#0#0#2#0 + +#0#0#2#0#0#0#2#0#0#0#1#0#0#0#1#0#0#0#1#0#0#0#1#0#0#0#2#0#0#0#2#0#0#0#2#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#0#0#0#0#0#0#0 + +#1#0#0#0#4#0#0#0#8#0#0#0#11#0#0#0#13#0#0#0#13#0#0#0#11#0#0#0#11#0#0#0#10#0#0 + +#0#11#0#0#0#10#0#0#0#10#0#0#0#10#0#0#0#11#0#0#0#10#0#0#0#9#0#0#0#7#0#0#0#3#0 + +#0#0#1#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#0#0#0#1#0#0#0#6#0#0#0#13#0 + +#0#0#22#0#0#0#30#0#0#0'#'#0#0#0''''#0#0#0'*'#0#0#0'-'#0#0#0'0'#0#0#0'4'#0#0#0 + +'1'#0#0#0'-'#0#0#0'*'#0#0#0'&'#0#0#0'"'#0#0#0#29#0#0#0#19#0#0#0#11#0#0#0#4#0 + +#0#0#1#0#0#0#0#255#255#255#0#255#255#255#0#154#156#154#131#156#158#156#255 + +#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156 + +#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158 + +#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156 + +#158#156#255#156#158#156#255'WYW'#136#0#0#0','#0#0#0#12#0#0#0#0#255#255#255#0 + +#255#255#255#0#156#158#156#255#237#237#237#255#231#231#231#255#231#231#231 + +#255#231#231#231#255#231#232#231#255#231#232#231#255#232#232#232#255#232#232 + +#232#255#232#233#232#255#232#233#232#255#232#233#232#255#233#233#233#255#233 + +#233#233#255#233#233#233#255#233#233#233#255#232#232#232#255#173#175#174#255 + +#156#158#156#255#129#131#130#150#0#0#0#15#0#0#0#1#255#255#255#0#255#255#255#0 + +#156#158#156#255#228#228#228#255#137'xp'#255'jP@'#255'jP@'#255'jP@'#255'jP@' + +#255'jP@'#255'jP@'#255'jP@'#255'jP@'#255'jP@'#255'kPA'#255'kPA'#255'kPA'#255 + +'kPA'#255'kPA'#255#186#186#184#255#194#194#194#255#156#158#156#255#155#158 + +#156#155#0#0#0#1#255#255#255#0#255#255#255#0#156#158#156#255#228#228#228#255 + +'eI9'#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY' + +#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY'#255 + +#127'ZH'#255#127'ZH'#255#187#183#179#255#196#196#196#255#201#201#201#255#156 + +#158#156#255#158#161#159'n'#255#255#255#0#255#255#255#0#156#158#156#255#228 + +#228#228#255'bF6'#255'}YF'#255'}YF'#255'}YF'#255'}YF'#255'}YF'#255'}YF'#255 + +'}YF'#255'}YF'#255'}YF'#255'}YF'#255'}YF'#255'}YF'#255'vTB'#255'hJ:'#255#131 + +'tk'#255#141'|r'#255#144#134#127#255#202#204#203#255#156#158#156#255#255#255 + +#255#0#255#255#255#0#156#158#156#255#229#229#229#255'bG7'#255'tTA'#255'tS@' + +#255'qP='#255'nL8'#255'jH4'#255'jG3'#255'jG3'#255'jG3'#255'jG3'#255'jG3'#255 + +'gE2'#255'W:*'#255'M4%'#255'X;*'#255'N4%'#255'dC0'#255'bG8'#255#228#228#228 + +#255#156#158#156#255#255#255#255#0#255#255#255#0#156#158#156#255#230#230#230 + +#255'bG7'#255'mN='#255'mO='#255'mO='#255'mN='#255'kL;'#255'bB/'#255'Y6#'#255 + +'W4 '#255'W4 '#255'T8'''#255'O<1'#255'N;1'#255'N?6'#255'M=3'#255'V4"'#255'W4' + +' '#255']B3'#255#227#227#227#255#156#158#156#255#255#255#255#0#255#255#255#0 + +#156#158#156#255#230#230#230#255'nTE'#255#187#169#159#255#187#169#159#255#187 + +#169#159#255#187#169#159#255#186#169#158#255#186#168#158#255#185#167#156#255 + +#180#160#149#255#180#160#149#255#173#153#141#255'fa_'#255'ZXW'#255#129'vp' + +#255'WVU'#255#161#143#132#255#175#154#142#255'pYK'#255#226#226#226#255#156 + +#158#156#255#255#255#255#0#255#255#255#0#156#158#156#255#231#231#231#255'sYI' + +#255#209#183#168#255#210#184#168#255#210#184#168#255#209#183#168#255#209#183 + +#167#255#209#182#166#255#208#181#165#255#207#180#164#255#207#180#164#255#206 + +#179#162#255#175#153#140#255'SSR'#255#145#127'u'#255'QQQ'#255#136'yp'#255#199 + +#167#148#255'w^O'#255#224#224#224#255#156#158#156#255#255#255#255#0#255#255 + +#255#0#156#158#156#255#231#231#231#255'sWH'#255#202#172#154#255#199#175#157 + +#255#183#194#179#255#177#209#197#255#195#179#161#255#201#171#152#255#200#169 + +#150#255#199#168#149#255#199#168#149#255#198#166#147#255#197#164#145#255#139 + +'}t'#255#134'uk'#255'QQQ'#255#149'}n'#255#188#150#127#255'uZJ'#255#224#224 + +#224#255#156#158#156#255#255#255#255#0#255#255#255#0#156#158#156#255#231#231 + +#231#255'sWG'#255#196#163#142#255#178#197#182#255#223#250#247#255#238#253#252 + +#255#177#220#209#255#193#161#140#255#193#158#136#255#191#156#134#255#191#156 + +#134#255#190#154#131#255#189#152#128#255#184#148'}'#255#138'yn'#255'tjc'#255 + +#179#137'n'#255#177#134'j'#255'rVE'#255#223#223#223#255#156#158#156#255#255 + +#255#255#0#255#255#255#0#156#158#156#255#232#232#232#255'rVE'#255#189#153#128 + +#255#175#209#196#255#249#254#254#255#254#255#255#255#190#235#226#255#184#154 + ,#129#255#185#146'x'#255#183#144'u'#255#183#144'u'#255#182#141'r'#255#180#139 + +'o'#255#178#136'l'#255#163#128'h'#255#174#131'e'#255#173#128'b'#255#172'~_' + +#255'rTC'#255#223#223#223#255#156#158#156#255#255#255#255#0#255#255#255#0#156 + +#158#156#255#232#232#232#255'pTC'#255#182#142's'#255#175#166#143#255#185#229 + +#220#255#203#243#238#255#169#184#164#255#179#137'm'#255#177#134'i'#255#175 + +#131'e'#255#175#131'e'#255#173#128'a'#255#171'}^'#255#169'zZ'#255#167'wV'#255 + +#165'tR'#255#163'qO'#255#161'nK'#255'oQ>'#255#224#224#224#255#156#158#156#255 + +#255#255#255#0#255#255#255#0#156#158#156#255#232#232#232#255'oQ?'#255#171#127 + +'a'#255#173#129'c'#255#170#132'h'#255#167#141'q'#255#170'~_'#255#168'{['#255 + +#166'xW'#255#164'uT'#255#164'uT'#255#163'rP'#255#160'oL'#255#158'kH'#255#156 + +'hD'#255#154'e@'#255#152'b<'#255#150'^8'#255'lM9'#255#224#224#224#255#156#158 + +#156#255#255#255#255#0#255#255#255#0#156#158#156#255#231#231#231#255#152#134 + +'z'#255'sWF'#255'sWG'#255'sWG'#255'sWF'#255'sVE'#255'rVE'#255'qTD'#255'pTC' + +#255'pTC'#255'pSC'#255'oRB'#255'nR@'#255'nQ@'#255'mP?'#255'lP>'#255'lO='#255 + +#137'sf'#255#223#223#223#255#156#158#156#255#255#255#255#0#255#255#255#0#156 + +#158#156#255#234#234#234#254#230#230#230#255#230#230#230#255#230#230#230#255 + +#230#230#230#255#230#230#230#255#230#230#230#255#230#230#230#255#230#230#230 + +#255#229#229#229#255#229#229#229#255#229#229#229#255#229#229#229#255#229#229 + +#229#255#229#229#229#255#229#229#229#255#229#229#229#255#228#228#228#255#228 + +#228#228#255#233#233#233#255#156#158#156#255#255#255#255#0#255#255#255#0#156 + +#158#156#129#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255 + +#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156 + +#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158 + +#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156 + +#158#156#255#156#158#156#255#156#158#156#130#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0 +]); +LazarusResources.Add('tlrlabel','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255 + +#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255 + +#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0 + +#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0 + +#255#255#255#0#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8' + +#255#255#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255 + +#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#190'l8'#255#190'l8'#255#255 + +#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0#190'l8'#255 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#218 + +#165#129#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#218 + +#165#129#255#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#190'l8'#255 + +#190'l8'#255#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255 + +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#190'l8'#255 + +#190'l8'#255#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255 + +#0#190'l8'#255#190'l8'#255#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255 + +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0 + +#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255 + +#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#190'l8'#255#190'l8'#255 + +#255#255#255#0#255#255#255#0#190'l8'#255#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#218#165#129#255#190'l8'#255 + +#255#255#255#0#190'l8'#255#218#165#129#255#255#255#255#0#255#255#255#0#190'l' + +'8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0#255 + +#255#255#0#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#0#255 + ,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0#255 + +#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#190'l8'#255#255 + +#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#254#254#254#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0 +]); +LazarusResources.Add('tlrlistbox','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#254#252#252#0#254#252#252#0 + +#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254 + +#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252 + +#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0 + +#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#255#255#255#0#255 + +#255#255#0#254#252#252#0#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 + +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#254#252#252#0#254#252#252#0#255#255#255#0#255#255 + +#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 + +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 + +#239#239#255#146'ww'#255#193#192#194#255#193#192#194#255#193#192#194#255#193 + +#192#194#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252 + +#252#0#146'ww'#255#237#239#239#255#237#239#239#255'311'#255'311'#255'311'#255 + +'311'#255'311'#255'311'#255'311'#255'311'#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#146'ww'#255#237#239#239#255'zzz'#255#137#137#137#255#193#192 + +#194#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0 + +#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#146'ww' + +#255#237#239#239#255#1#1#1#255#6#8#8#255#193#192#194#255#146'ww'#255#254#252 + +#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255 + +#237#239#239#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311' + +#255'311'#255'311'#255#237#239#239#255#237#239#239#255#146'ww'#255#237#239 + +#239#255#237#239#239#255#237#239#239#255#193#192#194#255#146'ww'#255#254#252 + +#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 + +#239#255#237#239#239#255#237#239#239#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255 + +#0#254#252#252#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 + +#239#255#146'ww'#255#249#252#250#255#187#195#194#255#242#250#249#255#185#187 + +#187#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0 + +#146'ww'#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255 + +#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189 + +#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#146'ww' + +#255#201#188#186#255#255#254#254#255#198#193#192#255#255#251#252#255#146'ww' + +#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#188 + +#187#189#255#188#187#189#255'311'#255'311'#255'311'#255'311'#255'311'#255'31' + +'1'#255'311'#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189 + +#255#146'ww'#255#255#252#251#255#209#193#194#255#255#251#251#255#204#196#197 + +#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146 + +'ww'#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188 + +#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255 + +#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#146'ww'#255 + +#213#204#201#255#254#244#244#255#208#200#200#255#255#254#255#255#146'ww'#255 + +#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239 + +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 + +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + ,#237#239#239#255#237#239#239#255#237#239#239#255#146'ww'#255#255#255#252#255 + +#189#184#183#255#255#254#253#255#192#192#192#255#146'ww'#255#254#252#252#0 + +#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237 + +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#237#239#239#255#237#239#239#255#146'ww'#255#197#188#185#255#255#255#254 + +#255#183#188#186#255#251#255#255#255#146'ww'#255#254#252#252#0#255#255#255#0 + +#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237#239#239#255'311' + +#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255 + +#237#239#239#255#237#239#239#255#146'ww'#255#255#255#254#255#187#192#190#255 + +#248#255#255#255#184#190#189#255#146'ww'#255#254#252#252#0#255#255#255#0#255 + +#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239 + +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 + +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww' + +#255#237#239#239#255#237#239#239#255'311'#255'311'#255'311'#255'311'#255'311' + +#255'311'#255'311'#255'311'#255#237#239#239#255#237#239#239#255#237#239#239 + +#255#146'ww'#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194 + +#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146 + +'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 + +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#146'ww'#255 + +#237#239#239#255#1#5#6#255#4#6#7#255#193#192#194#255#146'ww'#255#254#252#252 + +#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237 + +#239#239#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255 + +'311'#255'311'#255#237#239#239#255#237#239#239#255#146'ww'#255#237#239#239 + +#255'zzz'#255#137#137#137#255#193#192#194#255#146'ww'#255#254#252#252#0#255 + +#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237#239 + +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 + +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#237#239#239#255#146'ww'#255#237#239#239#255#237#239#239#255 + +#237#239#239#255#193#192#194#255#146'ww'#255#254#252#252#0#255#255#255#0#255 + +#255#255#0#254#252#252#0#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 + +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#254#252#252#0#254#252#252#0#255#255#255#0#255#255 + +#255#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0 + +#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254 + +#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252 + +#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0 + +#254#252#252#0#255#255#255#0#254#254#254#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 +]); +LazarusResources.Add('tlrmemo','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#161#157#157#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241 + +#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239 + +#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226 + +#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161 + +#157#157#255'doq'#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255 + +#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255 + +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255 + +#255#255#252#255#255#255#252#255#226#239#241#255#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161#157#157#255'doq' + +#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255 + +#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255 + +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#242#253#250#255 + +#255#255#252#255#226#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255 + +#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255 + +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255 + +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 + +#255#226#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#7#1#2 + +#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#7 + +#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#255#255#252#255#255#255#252#255#226 + +#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255 + +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 + +#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255 + +#252#255#255#255#252#255#255#255#252#255#255#255#252#255#226#239#241#255#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#161#157#157#255'doq'#255#255#255#252#255#7#1#2#255#7#1#2#255#7#1#2#255 + +#7#1#2#255#7#1#2#255#255#255#252#255#255#255#252#255#255#255#252#255#7#1#2 + +#255#7#1#2#255#7#1#2#255#255#255#252#255#255#255#252#255#255#255#252#255#226 + +#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255 + +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#24'BY'#255 + +'+a'#136#255'L'#137#189#255'o'#163#194#255#255#255#252#255#255#255#252#255 + +#255#255#252#255#255#255#252#255#255#255#252#255#226#239#241#255#255#255#255 + +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161 + +#157#157#255'doq'#255#255#255#252#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255 + +#7#1#2#255'.g'#132#255#148#199#249#255#145#201#249#255'A'#133#201#255'''j' + +#172#255#7#1#2#255'1'#9#10#255#255#255#252#255#255#255#252#255#226#239#241 + +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255#255 + +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255'C'#137#170#255 + +#224#242#255#255'T'#154#216#255#26'z'#190#255'I'#152#197#255'H'#140#195#255 + +#220#234#247#255#255#255#252#255#255#255#252#255#226#239#241#255#255#255#255 + +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161 + +#157#157#255'doq'#255#255#255#252#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255 + +#7#1#2#255#167#188#201#255'z'#182#213#255#144#183#209#255'U'#201#228#255'[' + +#223#245#255'x'#208#237#255'Q'#157#221#255#255#255#252#255#255#255#252#255 + +#226#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252 + ,#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255 + +#252#255#180#215#231#255'v'#186#215#255#194#246#253#255'c'#223#247#255']'#226 + +#248#255'y'#211#240#255'I'#150#216#255#233#241#249#255#226#239#241#255#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#161#157#157#255'doq'#255#255#255#252#255#7#1#2#255#7#1#2#255#7#1#2#255 + +#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#205#237#248#255'w'#203#231#255#199 + +#247#253#255'^'#220#245#255'Z'#225#247#255'{'#212#241#255'U'#159#224#255#221 + +#236#249#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255 + +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 + +#255#255#255#252#255#255#255#252#255#205#237#248#255'y'#211#238#255#199#247 + +#253#255'_'#220#245#255'['#226#247#255'z'#214#242#255'`'#170#229#255#226#238 + +#248#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255 + +#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255#255#255#252#255 + +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 + +#255#255#255#252#255#255#255#252#255#206#240#249#255#127#213#239#255#196#246 + +#253#255'l'#221#246#255'm'#202#237#255'c'#163#215#255't'#169#216#255#233#242 + +#249#191#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161#157#157 + +#255'doq'#255#255#255#252#255#7#1#2#255#7#1#2#255#25#0#4#255#7#1#2#255#255 + +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255 + +#255#255#252#255#198#236#248#255#132#215#239#255#178#227#249#255#139#192#231 + +#255#174#211#246#255#196#224#252#255'p'#165#214#255#255#255#255#0#255#255#255 + +#0#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255 + +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255 + +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 + +#255#255#255#252#255#195#236#248#255'w'#190#231#255#180#210#240#255#229#243 + +#255#255#172#210#239#255'g'#159#209#255#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255 + +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 + +#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255 + +#252#255#255#255#252#255#203#235#247#255'X'#165#216#255#133#177#219#255'F' + +#157#208#255#196#226#242#255#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#161#157#157#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq' + +#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255 + +'doq'#255'doq'#255#226#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#161#157#157#255#161#157#157#255 + +#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157 + +#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157 + +#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161 + +#157#157#255#161#157#157#255#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 +]); +LazarusResources.Add('tlrradiobutton','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#165#165#165#255'qqq'#255'JJJ'#255'qqq'#255#165#165 + +#165#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254 + +#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#177#177#177#255'HHH'#255#136#136#136#255#197#197#197#255 + +#227#231#231#255#199#199#199#255#137#137#137#255'HHH'#255#177#177#177#255#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#177#177#177#255'xxx'#255#193#193 + +#193#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 + +#231#231#255#199#199#199#255'|||'#255#177#177#177#255#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0'HHH'#255#190#190#190#255#227#231#231#255#227#231#231#255#227#231 + +#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#199 + +#199#199#255'HHH'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#165#165#165#255#131#131#131#255#227 + +#231#231#255#227#231#231#255#227#231#231#255#246#217#188#255#190'l8'#255#246 + +#217#188#255#227#231#231#255#227#231#231#255#227#231#231#255#137#137#137#255 + +#165#165#165#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0'qqq'#255#185#185#185#255#227#231#231#255#227#231#231#255 + +#246#217#188#255#190'l8'#255#190'l8'#255#190'l8'#255#246#217#188#255#227#231 + +#231#255#227#231#231#255#199#199#199#255'qqq'#255#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'JJJ'#255#227#231#231#255 + +#227#231#231#255#227#231#231#255#221#150'j'#255#221#150'j'#255#221#150'j'#255 + +#190'l8'#255#190'l8'#255#227#231#231#255#227#231#231#255#227#231#231#255'JJJ' + +#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0'qqq'#255#181#181#181#255#227#231#231#255#227#231#231#255#246#217 + ,#188#255#221#150'j'#255#221#150'j'#255#190'l8'#255#246#217#188#255#227#231 + +#231#255#227#231#231#255#197#197#197#255'qqq'#255#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#165#165#165#255#127#127 + +#127#255#227#231#231#255#227#231#231#255#227#231#231#255#246#217#188#255#221 + +#150'j'#255#246#217#188#255#227#231#231#255#227#231#231#255#227#231#231#255 + +#136#136#136#255#165#165#165#255#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'HHH'#255#180#180#180#255 + +#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231 + +#255#227#231#231#255#227#231#231#255#193#193#193#255'HHH'#255#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#177#177#177#255'sss'#255#180#180#180#255#227#231#231#255 + +#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#190#190#190 + +#255'xxx'#255#177#177#177#255#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#177#177#177#255'HHH'#255#127#127#127#255#181#181#181#255#227#231#231#255#185 + +#185#185#255#131#131#131#255'HHH'#255#177#177#177#255#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#165#165 + +#165#255'qqq'#255'JJJ'#255'qqq'#255#165#165#165#255#254#254#254#0#254#254#254 + +#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#253#253#253#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 + +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 + +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 + +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 +]); +LazarusResources.Add('tlrradiogroup','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194 + +#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192 + +#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193 + +#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#146'ww' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 + +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#193#192#194#255#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255 + +#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192 + +#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193 + +#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255 + +#193#192#194#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219 + +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 + +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 + +#223#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219#223#223 + +#255#219#223#223#255#128#128#128#255#219#223#223#255#219#223#223#255#219#223 + +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 + +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219#223#223#255#128#128 + +#128#255#221#150'j'#255#128#128#128#255#219#223#223#255'311'#255'311'#255'31' + +'1'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255#219#223#223#255 + +#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219#223#223#255#219#223 + +#223#255#128#128#128#255#219#223#223#255#219#223#223#255#219#223#223#255#219 + +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#193#192#194 + +#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#146'ww'#255#255#255#255#255#219#223#223#255#219#223#223#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 + +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 + +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#193#192#194#255#146 + +'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#146'ww'#255#255#255#255#255#219#223#223#255#219#223#223#255#128#128 + +#128#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 + +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#193#192#194#255#146'ww'#255 + +#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146 + +'ww'#255#255#255#255#255#219#223#223#255#128#128#128#255#221#150'j'#255#128 + +#128#128#255#219#223#223#255'311'#255'311'#255'311'#255'311'#255'311'#255'31' + +'1'#255'311'#255'311'#255#219#223#223#255#219#223#223#255#193#192#194#255#146 + +'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#146'ww'#255#255#255#255#255#219#223#223#255#219#223#223#255#128#128 + +#128#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 + +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#193#192#194#255#146'ww'#255 + +#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146 + ,'ww'#255#255#255#255#255#219#223#223#255#219#223#223#255#219#223#223#255#219 + +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 + +#255#219#223#223#255#219#223#223#255#193#192#194#255#146'ww'#255#193#192#194 + +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255 + +#255#255#255#219#223#223#255#219#223#223#255#128#128#128#255#219#223#223#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 + +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 + +#223#255#219#223#223#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255 + +#219#223#223#255#128#128#128#255#221#150'j'#255#128#128#128#255#219#223#223 + +#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255 + +'311'#255#219#223#223#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255 + +#219#223#223#255#219#223#223#255#128#128#128#255#219#223#223#255#219#223#223 + +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 + +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 + +#223#223#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219#223 + +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 + +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 + +#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219#223#223#255#219 + +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 + +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#193#192 + +#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255 + +#0#255#255#255#0#146'ww'#255#255#255#255#255#255#255#255#255#221#150'j'#255 + +#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255 + +#221#150'j'#255#221#150'j'#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#146'ww' + +#255#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#146'ww'#255#146'ww'#255#146'ww'#255#221#150'j'#255#221#150'j'#255#221#150'j' + +#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#221#150'j'#255 + +#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255 + +#221#150'j'#255#221#150'j'#255#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#254 + +#254#254#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0 +]); +LazarusResources.Add('tlrdateedit','BMP',[ + 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 + +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 + +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 + +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#195#193#192#255#195#193#192#255#195#193#192#255#195#193 + +#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195 + +#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255 + +#195#193#192#255#195#193#192#255#195#193#192#255#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'w' + +'w'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#146'ww'#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 + +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 + +#223#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255 + +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#219 + +#223#223#255#219#223#223#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255 + +#190'l8'#255#219#223#223#255#219#223#223#255#190'l8'#255#190'l8'#255#219#223 + +#223#255#219#223#223#255#219#223#223#255#146'ww'#255#195#193#192#255#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#146'ww'#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#221#172#140#255#190'l8'#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#190'l8'#255#221#172#140#255#221#172#140#255#190'l8'#255#219#223#223#255#219 + +#223#223#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#221#172#140#255#190'l8'#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#221#172#140#255#219#223#223 + +#255#221#172#140#255#190'l8'#255#219#223#223#255#219#223#223#255#146'ww'#255 + +#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#219#223#223#255#219#223 + +#223#255#219#223#223#255#221#172#140#255#190'l8'#255#219#223#223#255#219#223 + +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#221#172#140#255#190 + +'l8'#255#219#223#223#255#219#223#223#255#146'ww'#255#195#193#192#255#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#146'ww'#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#221#172#140#255#190'l8'#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#190'l8'#255#190'l8'#255#190'l8'#255#219#223#223#255#219#223#223#255#219#223 + +#223#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255 + +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#219 + +#223#223#255#219#223#223#255#190'l8'#255#190'l8'#255#190'l8'#255#219#223#223 + +#255#219#223#223#255#219#223#223#255#190'l8'#255#221#172#140#255#219#223#223 + +#255#219#223#223#255#219#223#223#255#219#223#223#255#146'ww'#255#195#193#192 + +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#146'ww'#255#219#223#223#255#219#223#223#255#219 + +#223#223#255#190'l8'#255#190'l8'#255#219#223#223#255#219#223#223#255#219#223 + +#223#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#219#223#223#255#219 + +#223#223#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255 + +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 + +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 + +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#146 + +'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#219#223#223#255 + +#219#223#223#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#219#223#223#255 + +#219#223#223#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww' + ,#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 + +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 + +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 + +#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 + +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' + +#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#146'ww'#255#146 + +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#221#150'j'#255#221 + +#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221 + +#150'j'#255#164#164#255#255'Y'#0#179#255#164#164#255#255'Y'#0#179#255#164#164 + +#255#255'Y'#0#179#255#164#164#255#255#146'ww'#255#195#193#192#255#255#255#255 + +#0#255#255#255#0#146'ww'#255#195#193#192#255#195#193#192#255#195#193#192#255 + +#195#193#192#255#146'ww'#255#244#221#206#255#244#221#206#255#244#221#206#255 + +#244#221#206#255#244#221#206#255#244#221#206#255#244#221#206#255#244#221#206 + +#255#164#164#255#255#244#221#206#255#164#164#255#255#244#221#206#255#164#164 + +#255#255#244#221#206#255#146'ww'#255#255#255#255#0#255#255#255#0#255#255#255 + +#0#146'ww'#255#195#193#192#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#195#193#192#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#146'ww'#255#195#193#192#255'~J'#20#255#255#255#255#0 + +#255#255#255#0#146'ww'#255#195#193#192#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#250#252 + +#252#255#195#193#192#255't<'#0#255#231#218#217#255#231#218#217#255#231#218 + +#217#255#231#218#217#255#231#218#217#255'~J'#20#255#255#255#255#0#255#255#255 + +#0#146'ww'#255#195#193#192#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#250#252#252#255#195 + +#193#192#255't<'#0#255#242#232#230#255#242#232#230#255#242#232#230#255#242 + +#232#230#255#242#232#230#255#127'L'#21#255#255#255#255#0#255#255#255#0#146'w' + +'w'#255#195#193#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255#255#255#255#250#252#252#255#195#193#192 + +#255't<'#0#255#253#247#246#255#253#247#246#255#253#247#246#255#253#247#246 + +#255#253#247#246#255#128'M'#22#255#255#255#255#0#255#255#255#0#146'ww'#255 + +#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192 + +#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193 + +#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255't<' + +#0#255#253#253#253#255#253#253#253#255#253#253#253#255#253#253#253#255#253 + +#253#253#255#128'N'#23#255#255#255#255#0#255#255#255#0#146'ww'#255#146'ww' + +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 + +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 + +'ww'#255#255#255#255#0't<'#0#255't<'#0#255't<'#0#255't<'#0#255't<'#0#255#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 +]); LazarusResources.Add('tlrbutton','BMP',[ 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 @@ -2732,1370 +4101,5 @@ LazarusResources.Add('tlrdateedit','BMP',[ +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 ]); -LazarusResources.Add('tlrbutton','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#196#190#182#255#143'c7'#255#131'>'#10#255 - +#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@' - +#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255 - +#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@' - +#10#255#133'@'#11#255#132'A'#12#255#180#160#137#255#248#251#254#0#151'e7'#255 - +#213#156'x'#255#240#168#142#255#238#165#139#255#238#166#140#255#239#166#140 - +#255#239#166#140#255#239#166#140#255#239#166#140#255#239#166#140#255#239#166 - +#140#255#239#166#140#255#239#166#140#255#239#166#140#255#239#166#140#255#239 - +#166#140#255#239#166#140#255#239#166#140#255#239#166#140#255#238#166#140#255 - +#237#165#139#255#243#172#148#255#166'nA'#255#218#212#205#255#160'`'''#255#246 - +#226#214#255#225#215#218#255#222#206#205#255#223#208#208#255#223#208#208#255 - +#223#208#208#255#223#208#208#255#222#207#207#255#223#209#208#255#224#209#209 - +#255#222#207#207#255#223#208#208#255#222#207#207#255#223#208#208#255#222#207 - +#207#255#224#209#208#255#223#208#208#255#223#208#208#255#223#208#208#255#218 - +#203#202#255#249#244#245#255#185#131'T'#255#206#195#186#255#158'^('#255#243 - +#222#210#255#233#222#224#255#230#213#211#255#231#215#214#255#231#215#214#255 - +#231#215#215#255#230#214#213#255#230#214#213#255#228#213#212#255#224#208#208 - +#255#230#214#213#255#233#217#217#255#234#218#217#255#232#216#216#255#230#214 - +#213#255#228#212#212#255#231#216#215#255#231#215#214#255#231#215#214#255#227 - +#210#209#255#253#244#246#255#181#127'S'#255#207#197#188#255#160'a+'#255#245 - +#225#213#255#234#225#227#255#231#217#215#255#232#219#218#255#232#219#218#255 - +#230#217#217#255#230#217#217#255#230#217#217#255'_\['#255'_\['#255#230#218 - +#217#255#230#218#217#255'_\['#255#240#226#225#255'_\['#255#230#218#217#255 - +#230#218#217#255#230#218#217#255#232#219#218#255#228#214#213#255#253#247#248 - +#255#183#131'V'#255#207#196#187#255#161'd/'#255#246#227#216#255#240#232#233 - +#255#237#224#222#255#238#226#225#255#238#226#225#255#233#221#219#255#233#221 - +#219#255'_\['#255#233#221#219#255#233#221#219#255'_\['#255#236#224#223#255']' - +'XW'#255'_\['#255#236#224#223#255#236#224#223#255#236#224#223#255#238#226#225 - +#255#238#226#225#255#235#222#220#255#255#250#252#255#184#133'Y'#255#206#195 - +#186#255#161'e1'#255#246#229#218#255#244#238#238#255#242#231#229#255#243#233 - +#231#255#243#233#231#255#238#228#226#255#238#228#226#255'_\['#255#238#228#226 - +#255#238#228#226#255'_\['#255#243#234#232#255'_\['#255'_\['#255#243#234#232 - +#255#243#234#232#255#243#232#230#255#243#233#231#255#243#233#231#255#240#229 - +#227#255#254#253#254#255#184#134'['#255#205#196#186#255#162'g3'#255#248#231 - ,#220#255#252#245#246#255#250#238#237#255#251#240#239#255#251#240#239#255#246 - +#235#234#255#246#235#234#255'_\['#255#246#235#234#255#246#235#234#255'_\[' - +#255#249#238#237#255'_\['#255#249#238#237#255'_\['#255#249#238#237#255#249 - +#238#237#255#251#240#239#255#251#240#238#255#249#238#236#255#255#255#255#255 - +#185#136']'#255#206#196#186#255#163'j6'#255#248#232#222#255#253#248#250#255 - +#251#242#241#255#252#244#243#255#252#244#243#255#249#241#240#255#252#244#243 - +#255'_\['#255#252#244#243#255#252#244#243#255'_\['#255#255#253#252#255'_\[' - +#255#255#251#250#255#255#253#252#255#252#243#242#255#253#245#244#255#252#244 - +#243#255#251#243#242#255#250#241#240#255#255#254#254#255#185#138'_'#255#205 - +#195#186#255#164'm;'#255#249#235#224#255#253#253#252#255#251#249#245#255#252 - +#250#247#255#252#250#247#255#253#250#247#255#253#249#246#255#255#255#255#255 - +'_\['#255'_\['#255#255#255#252#255#255#255#252#255'_\['#255#252#249#246#255 - +#250#248#245#255#252#250#247#255#252#250#247#255#252#250#247#255#251#249#246 - +#255#250#248#244#255#255#254#253#255#186#140'c'#255#206#195#185#255#166'o=' - +#255#249#238#230#255#251#255#255#255#250#253#253#255#251#254#255#255#251#254 - +#255#255#251#253#255#255#251#254#255#255#249#252#253#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#250#252#254#255#255#255#255#255#251#253#255#255 - +#251#254#255#255#251#254#255#255#251#254#255#255#251#254#255#255#251#252#254 - +#255#248#251#252#255#252#255#255#255#188#143'g'#255#205#194#184#255#167'uF' - +#255#253#230#215#255#255#247#238#255#255#244#235#255#255#245#236#255#255#245 - +#236#255#255#245#236#255#255#245#236#255#255#245#236#255#255#242#233#255#255 - +#242#233#255#255#244#235#255#255#245#236#255#255#243#234#255#255#245#236#255 - +#255#245#236#255#255#245#236#255#255#245#236#255#255#245#236#255#255#244#235 - +#255#255#243#233#255#255#250#242#255#190#145'j'#255#205#193#184#255#162#134 - +'n'#255#192#154'w'#255#207#174#138#255#207#168#130#255#208#170#131#255#208 - +#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255 - +#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131 - +#255#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255#207#169 - +#131#255#208#170#133#255#206#167#129#255#166#132'f'#255#220#219#219#255#217 - +#221#224#255#169#153#135#255#146'u['#255#149'y]'#255#148'y\'#255#148'y\'#255 - +#148'y\'#255#148'y\'#255#148'y\'#255#148'y\'#255#148'y\'#255#148'y\'#255#145 - +'vZ'#255#144'vZ'#255#145'vZ'#255#145'vZ'#255#145'vZ'#255#145'vZ'#255#144'vZ' - +#255#146'w['#255#148'x\'#255#150'|_'#255#201#197#193#255#225#225#229#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#254#254#254#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlrbuttonpanel','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161 - +#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255 - +#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157 - +#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157 - +#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161 - +#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255 - +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 - +#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223 - +#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227 - +#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255 - +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 - +#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223 - +#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227 - +#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255 - +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 - +#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223 - +#224#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10 - +#255#133'@'#10#255#133'@'#10#255#131'>'#10#255#131'>'#10#255#143'c7'#255#196 - +#190#182#255#227#223#224#255#227#223#224#255#196#190#182#255#143'c7'#255#131 - +'>'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#133'@'#10 - +#255#133'@'#10#255#133'@'#10#255#133'@'#10#255#239#166#140#255#239#166#140 - +#255#239#166#140#255#239#166#140#255#238#166#140#255#238#166#140#255#238#165 - +#139#255#240#168#142#255#238#165#139#255#213#156'x'#255#151'e7'#255#227#223 - +#224#255#227#223#224#255#151'e7'#255#213#156'x'#255#238#165#139#255#238#165 - +#139#255#238#166#140#255#238#166#140#255#239#166#140#255#239#166#140#255#239 - +#166#140#255#239#166#140#255#239#166#140#255#223#208#208#255#223#208#208#255 - +#223#208#208#255#223#208#208#255#223#208#208#255#223#208#208#255#223#208#208 - +#255#222#206#205#255#225#215#218#255#246#226#214#255#160'`'''#255#227#223#224 - +#255#227#223#224#255#160'`'''#255#246#226#214#255#225#215#218#255#223#208#208 - +#255#223#208#208#255#223#208#208#255#223#208#208#255#223#208#208#255#223#208 - +#208#255#223#208#208#255#223#208#208#255#230#214#213#255#0#0#255#255'uu'#255 - +#255#231#215#215#255#231#215#214#255'uu'#255#255#0#0#255#255#230#213#211#255 - +#233#222#224#255#243#222#210#255#158'^('#255#227#223#224#255#227#223#224#255 - +#158'^('#255#243#222#210#255#233#222#224#255#231#215#214#255#231#215#214#255 - +#0#147#0#255#231#215#215#255#230#214#213#255#230#214#213#255#230#214#213#255 - +#230#214#213#255#230#217#217#255'uu'#255#255#0#0#255#255'uu'#255#255'uu'#255 - +#255#0#0#255#255'uu'#255#255#231#217#215#255#234#225#227#255#245#225#213#255 - +#160'a+'#255#227#223#224#255#227#223#224#255#160'a+'#255#245#225#213#255#234 - +#225#227#255#232#219#218#255#0#147#0#255'U'#255'U'#255#0#147#0#255#230#217 - +#217#255#230#217#217#255#230#217#217#255#230#217#217#255#233#221#219#255#233 - +#221#219#255'uu'#255#255#0#0#255#255#0#0#255#255'uu'#255#255#238#226#225#255 - +#237#224#222#255#240#232#233#255#246#227#216#255#161'd/'#255#227#223#224#255 - +#227#223#224#255#161'd/'#255#246#227#216#255#240#232#233#255#0#147#0#255'U' - +#255'U'#255#0#217#0#255'U'#255'U'#255#0#147#0#255#233#221#219#255#233#221#219 - +#255#233#221#219#255#246#235#234#255#246#235#234#255'uu'#255#255#0#0#255#255 - +#0#0#255#255'uu'#255#255#251#240#239#255#250#238#237#255#252#245#246#255#248 - +#231#220#255#162'g3'#255#227#223#224#255#227#223#224#255#162'g3'#255#248#231 - +#220#255#252#245#246#255#0#217#0#255#0#217#0#255#251#240#239#255#0#217#0#255 - +'U'#255'U'#255#0#147#0#255#246#235#234#255#246#235#234#255#249#241#240#255'u' - +'u'#255#255#0#0#255#255'uu'#255#255'uu'#255#255#0#0#255#255'uu'#255#255#251 - +#242#241#255#253#248#250#255#248#232#222#255#162'g3'#255#227#223#224#255#227 - +#223#224#255#163'j6'#255#248#232#222#255#253#248#250#255#252#244#243#255#252 - +#244#243#255#252#244#243#255#249#241#240#255#0#217#0#255'U'#255'U'#255#0#147 - +#0#255#249#241#240#255#253#250#247#255#0#0#255#255'uu'#255#255#253#250#247 - +#255#252#250#247#255'uu'#255#255#0#0#255#255#251#249#245#255#253#253#252#255 - +#249#235#224#255#162'g3'#255#227#223#224#255#227#223#224#255#164'm;'#255#249 - +#235#224#255#253#253#252#255#252#250#247#255#252#250#247#255#252#250#247#255 - ,#253#250#247#255#253#249#246#255#0#217#0#255#0#217#0#255#253#250#247#255#255 - +#255#255#255#251#254#255#255#251#254#255#255#251#253#255#255#251#254#255#255 - +#251#254#255#255#251#254#255#255#250#253#253#255#251#255#255#255#249#238#230 - +#255#162'g3'#255#227#223#224#255#227#223#224#255#166'o='#255#249#238#230#255 - +#251#255#255#255#251#254#255#255#251#254#255#255#251#254#255#255#251#253#255 - +#255#251#254#255#255#251#254#255#255#255#255#255#255#255#255#255#255#255#245 - +#236#255#255#245#236#255#255#245#236#255#255#245#236#255#255#245#236#255#255 - +#245#236#255#255#244#235#255#255#247#238#255#255#247#238#255#253#230#215#255 - +#167'uF'#255#227#223#224#255#227#223#224#255#167'uF'#255#253#230#215#255#255 - +#247#238#255#255#244#235#255#255#245#236#255#255#245#236#255#255#245#236#255 - +#255#245#236#255#255#245#236#255#255#245#236#255#255#245#236#255#208#170#131 - +#255#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255#208#170 - +#131#255#207#168#130#255#207#168#130#255#207#168#130#255#192#154'w'#255#162 - +#134'n'#255#227#223#224#255#227#223#224#255#162#134'n'#255#192#154'w'#255#207 - +#168#130#255#207#168#130#255#208#170#131#255#208#170#131#255#208#170#131#255 - +#208#170#131#255#208#170#131#255#208#170#131#255#208#170#131#255#146'u['#255 - +#146'u['#255#146'u['#255#146'u['#255#146'u['#255#146'u['#255#146'u['#255#146 - +'u['#255#146'u['#255#169#153#135#255#217#221#224#255#227#223#224#255#227#223 - +#224#255#217#221#224#255#169#153#135#255#146'u['#255#146'u['#255#146'u['#255 - +#146'u['#255#146'u['#255#146'u['#255#146'u['#255#146'u['#255#146'u['#255#227 - +#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255 - +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 - +#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223 - +#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227 - +#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255 - +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 - +#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223 - +#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227 - +#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255 - +#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224#255#227#223#224 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161 - +#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255 - +#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157 - +#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157 - +#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161 - +#157#157#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlrcheckbox','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0'EEE'#255'EEE'#255'EEE'#255'EEE' - +#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255 - +'EEE'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254 - +#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0'EEE'#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231 - +#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 - +#231#231#255#227#231#231#255#227#231#231#255'EEE'#255#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE'#255#227#231#231 - +#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231 - +#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 - +#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0'EEE'#255#227#231#231#255#227#231#231#255#227#231#231 - +#255#227#231#231#255#190'l8'#255#227#231#231#255#227#231#231#255#227#231#231 - +#255#227#231#231#255#227#231#231#255#227#231#231#255'EEE'#255#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE'#255 - +#227#231#231#255#227#231#231#255#227#231#231#255#190'l8'#255#190'l8'#255#190 - +'l8'#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 - +#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0'EEE'#255#227#231#231#255#227#231#231#255#190'l8'#255 - +#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#227#231#231#255#227#231#231 - +#255#227#231#231#255#227#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE'#255#227#231#231#255#227 - +#231#231#255#190'l8'#255#190'l8'#255#227#231#231#255#190'l8'#255#190'l8'#255 - +#190'l8'#255#227#231#231#255#227#231#231#255#227#231#231#255'EEE'#255#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE' - +#255#227#231#231#255#227#231#231#255#190'l8'#255#227#231#231#255#227#231#231 - +#255#227#231#231#255#190'l8'#255#190'l8'#255#190'l8'#255#227#231#231#255#227 - ,#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0'EEE'#255#227#231#231#255#227#231#231#255#227#231#231 - +#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#190'l8' - +#255#190'l8'#255#227#231#231#255#227#231#231#255'EEE'#255#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE'#255#227 - +#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255 - +#227#231#231#255#227#231#231#255#227#231#231#255#190'l8'#255#227#231#231#255 - +#227#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0'EEE'#255#227#231#231#255#227#231#231#255#227#231 - +#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 - +#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255'EEE'#255#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'EEE' - +#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231 - +#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 - +#231#231#255#227#231#231#255'EEE'#255#254#254#254#0#254#254#254#0#254#254#254 - +#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0'EEE'#255'EEE'#255'EEE'#255'EEE'#255'E' - +'EE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE'#255'EEE' - +#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0 -]); -LazarusResources.Add('tlrcombobox','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#195#193#192#255#195#193#192#255#195#193#192#255 - +#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192 - +#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193 - +#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' - +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#195#193#192#255 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255#237 - +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#146'ww'#255#195#193#192#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146 - +'ww'#255#237#239#239#255#237#239#239#255'311'#255'311'#255'311'#255'311'#255 - +'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255#237#239#239 - +#255#237#239#239#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237#239 - +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 - +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237#239#239#255#237 - +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#146'ww' - +#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#146'ww'#255#188#187#189#255#188#187#189#255#188 - +#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255 - +#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189 - +#255#188#187#189#255#188#187#189#255#188#187#189#255#146'ww'#255#195#193#192 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#146'ww'#255#188#187#189#255#188#187#189#255'311'#255'311'#255 - +'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311' - +#255#188#187#189#255#188#187#189#255#146'ww'#255#195#193#192#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146 - +'ww'#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188 - +#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255 - +#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189 - +#255#188#187#189#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237#239 - +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 - +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237#239#239#255#237 - +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#146'ww' - +#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#146'ww'#255#237#239#239#255#237#239#239#255'311' - ,#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255 - +'311'#255'311'#255#237#239#239#255#237#239#239#255#146'ww'#255#195#193#192 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 - +#239#255#237#239#239#255#237#239#239#255#146'ww'#255#195#193#192#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#146'ww'#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255 - +#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192 - +#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193 - +#192#255#195#193#192#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255 - +#255#0#255#255#255#0#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255'zzz'#255 - +'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz'#255'zzz' - +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237 - +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#237#239#239#255#146'ww'#255#195#193#192 - +#255#195#193#192#255#195#193#192#255#195#193#192#255#146'ww'#255#195#193#192 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 - +#239#255#237#239#239#255#237#239#239#255#146'ww'#255#237#239#239#255'zzz'#255 - +#137#137#137#255#195#193#192#255#146'ww'#255#195#193#192#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#146'ww'#255#237#239#239#255'311'#255'311'#255'3' - +'11'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311' - +#255#237#239#239#255#146'ww'#255#237#239#239#255#1#3#3#255#0#1#0#255#195#193 - +#192#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 - +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#146 - +'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255#195#193#192#255#146 - +'ww'#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255 - +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 - +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' - +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#254#254#254#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlredit','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#252#250#250#0#255#250#253#0 - +#255#250#253#0#255#250#253#0#255#251#253#0#250#252#253#0#252#251#253#0#255 - +#250#253#0#255#249#253#0#255#248#252#0#255#250#253#0#249#253#254#0#240#248 - +#248#0#252#254#255#0#255#254#255#0#255#253#255#0#254#247#250#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#253#253#253#0#255#255#255#0#255 - +#255#255#0#161#157#157#255#226#239#241#255#226#239#241#255#226#239#241#255 - +#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241 - +#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239 - +#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226 - +#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#255#255#255#0 - +#255#255#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#226#239#241#255#255#255#255#0#255 - +#255#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#0#2#0#255#0#3#0#255#255#255#255#255#0#2#1#255#0#0#0#255#255 - +#255#255#255#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq' - +#255#255#255#255#255#255#255#255#255#255#255#255#255#190'l8'#255#190'l8'#255 - +#190'l8'#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#190'l8'#255 - +#190'l8'#255#255#255#255#255#255#255#255#255#255#255#255#255#0#3#0#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#226#239#241#255#255#255#255#0 - +#255#255#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#190 - +'l8'#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255 - +#190'l8'#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255 - +#255#255#255#255#255#2#6#1#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255 - +#255#255#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255#190'l8' - +#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255#190 - +'l8'#255#190'l8'#255#255#255#255#255#255#255#255#255#2#2#0#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#226#239#241#255#255#255#255#0#255#255 - +#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#255#190'l8' - +#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255#255 - +#255#255#255#11#10#6#255#255#255#255#255#255#255#255#255#255#255#255#255#226 - +#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#190'l8' - +#255#190'l8'#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255#190 - +'l8'#255#190'l8'#255#255#255#255#255#255#255#255#255#2#0#0#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#226#239#241#255#255#255#255#0#255#255 - +#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#255#255#255 - ,#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#255#255#255#255#255#190 - +'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#4#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#5#0 - +#2#255#255#255#255#255#255#255#255#255#255#255#255#255#226#239#241#255#255 - +#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#190'l8'#255#190'l8'#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#4#0#3#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#226#239#241#255#255#255#255#0#255#255 - +#255#0#161#157#157#255'doq'#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#0#0#0#255#0#0#1#255#255#255#255#255#2#2#2#255#0#0#0#255#255#255 - +#255#255#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255'doq' - +#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255 - +'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq' - +#255'doq'#255#226#239#241#255#255#255#255#0#255#255#255#0#161#157#157#255#161 - +#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255 - +#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157 - +#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157 - +#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161 - +#157#157#255#161#157#157#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#254#254#254#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlrimage','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#1#0#0#0#3#0#0#0#3#0#0#0#2#0#0#0#2#0 - +#0#0#2#0#0#0#2#0#0#0#1#0#0#0#1#0#0#0#1#0#0#0#1#0#0#0#2#0#0#0#2#0#0#0#2#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#0#0#0#0#0#0#0 - +#1#0#0#0#4#0#0#0#8#0#0#0#11#0#0#0#13#0#0#0#13#0#0#0#11#0#0#0#11#0#0#0#10#0#0 - +#0#11#0#0#0#10#0#0#0#10#0#0#0#10#0#0#0#11#0#0#0#10#0#0#0#9#0#0#0#7#0#0#0#3#0 - +#0#0#1#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#0#0#0#1#0#0#0#6#0#0#0#13#0 - +#0#0#22#0#0#0#30#0#0#0'#'#0#0#0''''#0#0#0'*'#0#0#0'-'#0#0#0'0'#0#0#0'4'#0#0#0 - +'1'#0#0#0'-'#0#0#0'*'#0#0#0'&'#0#0#0'"'#0#0#0#29#0#0#0#19#0#0#0#11#0#0#0#4#0 - +#0#0#1#0#0#0#0#255#255#255#0#255#255#255#0#154#156#154#131#156#158#156#255 - +#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156 - +#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158 - +#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156 - +#158#156#255#156#158#156#255'WYW'#136#0#0#0','#0#0#0#12#0#0#0#0#255#255#255#0 - +#255#255#255#0#156#158#156#255#237#237#237#255#231#231#231#255#231#231#231 - +#255#231#231#231#255#231#232#231#255#231#232#231#255#232#232#232#255#232#232 - +#232#255#232#233#232#255#232#233#232#255#232#233#232#255#233#233#233#255#233 - +#233#233#255#233#233#233#255#233#233#233#255#232#232#232#255#173#175#174#255 - +#156#158#156#255#129#131#130#150#0#0#0#15#0#0#0#1#255#255#255#0#255#255#255#0 - +#156#158#156#255#228#228#228#255#137'xp'#255'jP@'#255'jP@'#255'jP@'#255'jP@' - +#255'jP@'#255'jP@'#255'jP@'#255'jP@'#255'jP@'#255'kPA'#255'kPA'#255'kPA'#255 - +'kPA'#255'kPA'#255#186#186#184#255#194#194#194#255#156#158#156#255#155#158 - +#156#155#0#0#0#1#255#255#255#0#255#255#255#0#156#158#156#255#228#228#228#255 - +'eI9'#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY' - +#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY'#255#144'kY'#255 - +#127'ZH'#255#127'ZH'#255#187#183#179#255#196#196#196#255#201#201#201#255#156 - +#158#156#255#158#161#159'n'#255#255#255#0#255#255#255#0#156#158#156#255#228 - +#228#228#255'bF6'#255'}YF'#255'}YF'#255'}YF'#255'}YF'#255'}YF'#255'}YF'#255 - +'}YF'#255'}YF'#255'}YF'#255'}YF'#255'}YF'#255'}YF'#255'vTB'#255'hJ:'#255#131 - +'tk'#255#141'|r'#255#144#134#127#255#202#204#203#255#156#158#156#255#255#255 - +#255#0#255#255#255#0#156#158#156#255#229#229#229#255'bG7'#255'tTA'#255'tS@' - +#255'qP='#255'nL8'#255'jH4'#255'jG3'#255'jG3'#255'jG3'#255'jG3'#255'jG3'#255 - +'gE2'#255'W:*'#255'M4%'#255'X;*'#255'N4%'#255'dC0'#255'bG8'#255#228#228#228 - +#255#156#158#156#255#255#255#255#0#255#255#255#0#156#158#156#255#230#230#230 - +#255'bG7'#255'mN='#255'mO='#255'mO='#255'mN='#255'kL;'#255'bB/'#255'Y6#'#255 - +'W4 '#255'W4 '#255'T8'''#255'O<1'#255'N;1'#255'N?6'#255'M=3'#255'V4"'#255'W4' - +' '#255']B3'#255#227#227#227#255#156#158#156#255#255#255#255#0#255#255#255#0 - +#156#158#156#255#230#230#230#255'nTE'#255#187#169#159#255#187#169#159#255#187 - +#169#159#255#187#169#159#255#186#169#158#255#186#168#158#255#185#167#156#255 - +#180#160#149#255#180#160#149#255#173#153#141#255'fa_'#255'ZXW'#255#129'vp' - +#255'WVU'#255#161#143#132#255#175#154#142#255'pYK'#255#226#226#226#255#156 - +#158#156#255#255#255#255#0#255#255#255#0#156#158#156#255#231#231#231#255'sYI' - +#255#209#183#168#255#210#184#168#255#210#184#168#255#209#183#168#255#209#183 - +#167#255#209#182#166#255#208#181#165#255#207#180#164#255#207#180#164#255#206 - +#179#162#255#175#153#140#255'SSR'#255#145#127'u'#255'QQQ'#255#136'yp'#255#199 - +#167#148#255'w^O'#255#224#224#224#255#156#158#156#255#255#255#255#0#255#255 - +#255#0#156#158#156#255#231#231#231#255'sWH'#255#202#172#154#255#199#175#157 - +#255#183#194#179#255#177#209#197#255#195#179#161#255#201#171#152#255#200#169 - +#150#255#199#168#149#255#199#168#149#255#198#166#147#255#197#164#145#255#139 - +'}t'#255#134'uk'#255'QQQ'#255#149'}n'#255#188#150#127#255'uZJ'#255#224#224 - +#224#255#156#158#156#255#255#255#255#0#255#255#255#0#156#158#156#255#231#231 - +#231#255'sWG'#255#196#163#142#255#178#197#182#255#223#250#247#255#238#253#252 - +#255#177#220#209#255#193#161#140#255#193#158#136#255#191#156#134#255#191#156 - +#134#255#190#154#131#255#189#152#128#255#184#148'}'#255#138'yn'#255'tjc'#255 - +#179#137'n'#255#177#134'j'#255'rVE'#255#223#223#223#255#156#158#156#255#255 - +#255#255#0#255#255#255#0#156#158#156#255#232#232#232#255'rVE'#255#189#153#128 - +#255#175#209#196#255#249#254#254#255#254#255#255#255#190#235#226#255#184#154 - ,#129#255#185#146'x'#255#183#144'u'#255#183#144'u'#255#182#141'r'#255#180#139 - +'o'#255#178#136'l'#255#163#128'h'#255#174#131'e'#255#173#128'b'#255#172'~_' - +#255'rTC'#255#223#223#223#255#156#158#156#255#255#255#255#0#255#255#255#0#156 - +#158#156#255#232#232#232#255'pTC'#255#182#142's'#255#175#166#143#255#185#229 - +#220#255#203#243#238#255#169#184#164#255#179#137'm'#255#177#134'i'#255#175 - +#131'e'#255#175#131'e'#255#173#128'a'#255#171'}^'#255#169'zZ'#255#167'wV'#255 - +#165'tR'#255#163'qO'#255#161'nK'#255'oQ>'#255#224#224#224#255#156#158#156#255 - +#255#255#255#0#255#255#255#0#156#158#156#255#232#232#232#255'oQ?'#255#171#127 - +'a'#255#173#129'c'#255#170#132'h'#255#167#141'q'#255#170'~_'#255#168'{['#255 - +#166'xW'#255#164'uT'#255#164'uT'#255#163'rP'#255#160'oL'#255#158'kH'#255#156 - +'hD'#255#154'e@'#255#152'b<'#255#150'^8'#255'lM9'#255#224#224#224#255#156#158 - +#156#255#255#255#255#0#255#255#255#0#156#158#156#255#231#231#231#255#152#134 - +'z'#255'sWF'#255'sWG'#255'sWG'#255'sWF'#255'sVE'#255'rVE'#255'qTD'#255'pTC' - +#255'pTC'#255'pSC'#255'oRB'#255'nR@'#255'nQ@'#255'mP?'#255'lP>'#255'lO='#255 - +#137'sf'#255#223#223#223#255#156#158#156#255#255#255#255#0#255#255#255#0#156 - +#158#156#255#234#234#234#254#230#230#230#255#230#230#230#255#230#230#230#255 - +#230#230#230#255#230#230#230#255#230#230#230#255#230#230#230#255#230#230#230 - +#255#229#229#229#255#229#229#229#255#229#229#229#255#229#229#229#255#229#229 - +#229#255#229#229#229#255#229#229#229#255#229#229#229#255#228#228#228#255#228 - +#228#228#255#233#233#233#255#156#158#156#255#255#255#255#0#255#255#255#0#156 - +#158#156#129#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255 - +#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156 - +#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158 - +#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156#158#156#255#156 - +#158#156#255#156#158#156#255#156#158#156#130#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0 -]); -LazarusResources.Add('tlrlabel','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255 - +#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0 - +#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8' - +#255#255#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255 - +#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#190'l8'#255#190'l8'#255#255 - +#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0#190'l8'#255 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#218 - +#165#129#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#218 - +#165#129#255#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#190'l8'#255 - +#190'l8'#255#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#190'l8'#255 - +#190'l8'#255#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255 - +#0#190'l8'#255#190'l8'#255#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0 - +#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255 - +#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#190'l8'#255#190'l8'#255 - +#255#255#255#0#255#255#255#0#190'l8'#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#218#165#129#255#190'l8'#255 - +#255#255#255#0#190'l8'#255#218#165#129#255#255#255#255#0#255#255#255#0#190'l' - +'8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#0#255 - ,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#190'l8'#255#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#190'l8'#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#190'l8'#255#190'l8'#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#254#254#254#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0 -]); -LazarusResources.Add('tlrlistbox','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#254#252#252#0#254#252#252#0 - +#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254 - +#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252 - +#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0 - +#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#255#255#255#0#255 - +#255#255#0#254#252#252#0#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 - +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' - +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#146'ww'#255#146'ww'#255#254#252#252#0#254#252#252#0#255#255#255#0#255#255 - +#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 - +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 - +#239#239#255#146'ww'#255#193#192#194#255#193#192#194#255#193#192#194#255#193 - +#192#194#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252 - +#252#0#146'ww'#255#237#239#239#255#237#239#239#255'311'#255'311'#255'311'#255 - +'311'#255'311'#255'311'#255'311'#255'311'#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#146'ww'#255#237#239#239#255'zzz'#255#137#137#137#255#193#192 - +#194#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0 - +#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#146'ww' - +#255#237#239#239#255#1#1#1#255#6#8#8#255#193#192#194#255#146'ww'#255#254#252 - +#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255 - +#237#239#239#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311' - +#255'311'#255'311'#255#237#239#239#255#237#239#239#255#146'ww'#255#237#239 - +#239#255#237#239#239#255#237#239#239#255#193#192#194#255#146'ww'#255#254#252 - +#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 - +#239#255#237#239#239#255#237#239#239#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#146'ww'#255#146'ww'#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255 - +#0#254#252#252#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239 - +#239#255#146'ww'#255#249#252#250#255#187#195#194#255#242#250#249#255#185#187 - +#187#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0 - +#146'ww'#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255 - +#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189 - +#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#146'ww' - +#255#201#188#186#255#255#254#254#255#198#193#192#255#255#251#252#255#146'ww' - +#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#188 - +#187#189#255#188#187#189#255'311'#255'311'#255'311'#255'311'#255'311'#255'31' - +'1'#255'311'#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189 - +#255#146'ww'#255#255#252#251#255#209#193#194#255#255#251#251#255#204#196#197 - +#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146 - +'ww'#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188 - +#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255 - +#188#187#189#255#188#187#189#255#188#187#189#255#188#187#189#255#146'ww'#255 - +#213#204#201#255#254#244#244#255#208#200#200#255#255#254#255#255#146'ww'#255 - +#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239 - +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 - +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - ,#237#239#239#255#237#239#239#255#237#239#239#255#146'ww'#255#255#255#252#255 - +#189#184#183#255#255#254#253#255#192#192#192#255#146'ww'#255#254#252#252#0 - +#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237 - +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#237#239#239#255#237#239#239#255#146'ww'#255#197#188#185#255#255#255#254 - +#255#183#188#186#255#251#255#255#255#146'ww'#255#254#252#252#0#255#255#255#0 - +#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237#239#239#255'311' - +#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255 - +#237#239#239#255#237#239#239#255#146'ww'#255#255#255#254#255#187#192#190#255 - +#248#255#255#255#184#190#189#255#146'ww'#255#254#252#252#0#255#255#255#0#255 - +#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237#239#239#255#237#239 - +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 - +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww' - +#255#237#239#239#255#237#239#239#255'311'#255'311'#255'311'#255'311'#255'311' - +#255'311'#255'311'#255'311'#255#237#239#239#255#237#239#239#255#237#239#239 - +#255#146'ww'#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194 - +#255#146'ww'#255#254#252#252#0#255#255#255#0#255#255#255#0#254#252#252#0#146 - +'ww'#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 - +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#146'ww'#255 - +#237#239#239#255#1#5#6#255#4#6#7#255#193#192#194#255#146'ww'#255#254#252#252 - +#0#255#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237 - +#239#239#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255 - +'311'#255'311'#255#237#239#239#255#237#239#239#255#146'ww'#255#237#239#239 - +#255'zzz'#255#137#137#137#255#193#192#194#255#146'ww'#255#254#252#252#0#255 - +#255#255#0#255#255#255#0#254#252#252#0#146'ww'#255#237#239#239#255#237#239 - +#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237 - +#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#237#239#239#255#146'ww'#255#237#239#239#255#237#239#239#255 - +#237#239#239#255#193#192#194#255#146'ww'#255#254#252#252#0#255#255#255#0#255 - +#255#255#0#254#252#252#0#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 - +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' - +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#146'ww'#255#146'ww'#255#254#252#252#0#254#252#252#0#255#255#255#0#255#255 - +#255#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0 - +#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254 - +#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252 - +#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0#254#252#252#0 - +#254#252#252#0#255#255#255#0#254#254#254#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlrmemo','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#161#157#157#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241 - +#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239 - +#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#226 - +#239#241#255#226#239#241#255#226#239#241#255#226#239#241#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161 - +#157#157#255'doq'#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255 - +#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255 - +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255 - +#255#255#252#255#255#255#252#255#226#239#241#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161#157#157#255'doq' - +#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255 - +#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255 - +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#242#253#250#255 - +#255#255#252#255#226#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255 - +#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255 - +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255 - +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 - +#255#226#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#7#1#2 - +#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#7 - +#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#255#255#252#255#255#255#252#255#226 - +#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255 - +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 - +#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255 - +#252#255#255#255#252#255#255#255#252#255#255#255#252#255#226#239#241#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#161#157#157#255'doq'#255#255#255#252#255#7#1#2#255#7#1#2#255#7#1#2#255 - +#7#1#2#255#7#1#2#255#255#255#252#255#255#255#252#255#255#255#252#255#7#1#2 - +#255#7#1#2#255#7#1#2#255#255#255#252#255#255#255#252#255#255#255#252#255#226 - +#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255 - +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#24'BY'#255 - +'+a'#136#255'L'#137#189#255'o'#163#194#255#255#255#252#255#255#255#252#255 - +#255#255#252#255#255#255#252#255#255#255#252#255#226#239#241#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161 - +#157#157#255'doq'#255#255#255#252#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255 - +#7#1#2#255'.g'#132#255#148#199#249#255#145#201#249#255'A'#133#201#255'''j' - +#172#255#7#1#2#255'1'#9#10#255#255#255#252#255#255#255#252#255#226#239#241 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255#255 - +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255'C'#137#170#255 - +#224#242#255#255'T'#154#216#255#26'z'#190#255'I'#152#197#255'H'#140#195#255 - +#220#234#247#255#255#255#252#255#255#255#252#255#226#239#241#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161 - +#157#157#255'doq'#255#255#255#252#255#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255 - +#7#1#2#255#167#188#201#255'z'#182#213#255#144#183#209#255'U'#201#228#255'[' - +#223#245#255'x'#208#237#255'Q'#157#221#255#255#255#252#255#255#255#252#255 - +#226#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252 - ,#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255 - +#252#255#180#215#231#255'v'#186#215#255#194#246#253#255'c'#223#247#255']'#226 - +#248#255'y'#211#240#255'I'#150#216#255#233#241#249#255#226#239#241#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#161#157#157#255'doq'#255#255#255#252#255#7#1#2#255#7#1#2#255#7#1#2#255 - +#7#1#2#255#7#1#2#255#7#1#2#255#7#1#2#255#205#237#248#255'w'#203#231#255#199 - +#247#253#255'^'#220#245#255'Z'#225#247#255'{'#212#241#255'U'#159#224#255#221 - +#236#249#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255 - +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 - +#255#255#255#252#255#255#255#252#255#205#237#248#255'y'#211#238#255#199#247 - +#253#255'_'#220#245#255'['#226#247#255'z'#214#242#255'`'#170#229#255#226#238 - +#248#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255 - +#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255#255#255#252#255 - +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 - +#255#255#255#252#255#255#255#252#255#206#240#249#255#127#213#239#255#196#246 - +#253#255'l'#221#246#255'm'#202#237#255'c'#163#215#255't'#169#216#255#233#242 - +#249#191#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#161#157#157 - +#255'doq'#255#255#255#252#255#7#1#2#255#7#1#2#255#25#0#4#255#7#1#2#255#255 - +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255 - +#255#255#252#255#198#236#248#255#132#215#239#255#178#227#249#255#139#192#231 - +#255#174#211#246#255#196#224#252#255'p'#165#214#255#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255 - +#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255 - +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 - +#255#255#255#252#255#195#236#248#255'w'#190#231#255#180#210#240#255#229#243 - +#255#255#172#210#239#255'g'#159#209#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#161#157#157#255'doq'#255#255#255#252#255#255#255#252#255 - +#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252 - +#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255#252#255#255#255 - +#252#255#255#255#252#255#203#235#247#255'X'#165#216#255#133#177#219#255'F' - +#157#208#255#196#226#242#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#161#157#157#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq' - +#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255'doq'#255 - +'doq'#255'doq'#255#226#239#241#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#161#157#157#255#161#157#157#255 - +#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157 - +#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157 - +#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161#157#157#255#161 - +#157#157#255#161#157#157#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlrradiobutton','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#165#165#165#255'qqq'#255'JJJ'#255'qqq'#255#165#165 - +#165#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254 - +#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#177#177#177#255'HHH'#255#136#136#136#255#197#197#197#255 - +#227#231#231#255#199#199#199#255#137#137#137#255'HHH'#255#177#177#177#255#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#177#177#177#255'xxx'#255#193#193 - +#193#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227 - +#231#231#255#199#199#199#255'|||'#255#177#177#177#255#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0'HHH'#255#190#190#190#255#227#231#231#255#227#231#231#255#227#231 - +#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#199 - +#199#199#255'HHH'#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#165#165#165#255#131#131#131#255#227 - +#231#231#255#227#231#231#255#227#231#231#255#246#217#188#255#190'l8'#255#246 - +#217#188#255#227#231#231#255#227#231#231#255#227#231#231#255#137#137#137#255 - +#165#165#165#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0'qqq'#255#185#185#185#255#227#231#231#255#227#231#231#255 - +#246#217#188#255#190'l8'#255#190'l8'#255#190'l8'#255#246#217#188#255#227#231 - +#231#255#227#231#231#255#199#199#199#255'qqq'#255#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'JJJ'#255#227#231#231#255 - +#227#231#231#255#227#231#231#255#221#150'j'#255#221#150'j'#255#221#150'j'#255 - +#190'l8'#255#190'l8'#255#227#231#231#255#227#231#231#255#227#231#231#255'JJJ' - +#255#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0'qqq'#255#181#181#181#255#227#231#231#255#227#231#231#255#246#217 - ,#188#255#221#150'j'#255#221#150'j'#255#190'l8'#255#246#217#188#255#227#231 - +#231#255#227#231#231#255#197#197#197#255'qqq'#255#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#165#165#165#255#127#127 - +#127#255#227#231#231#255#227#231#231#255#227#231#231#255#246#217#188#255#221 - +#150'j'#255#246#217#188#255#227#231#231#255#227#231#231#255#227#231#231#255 - +#136#136#136#255#165#165#165#255#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0'HHH'#255#180#180#180#255 - +#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231 - +#255#227#231#231#255#227#231#231#255#193#193#193#255'HHH'#255#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#177#177#177#255'sss'#255#180#180#180#255#227#231#231#255 - +#227#231#231#255#227#231#231#255#227#231#231#255#227#231#231#255#190#190#190 - +#255'xxx'#255#177#177#177#255#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#177#177#177#255'HHH'#255#127#127#127#255#181#181#181#255#227#231#231#255#185 - +#185#185#255#131#131#131#255'HHH'#255#177#177#177#255#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#165#165 - +#165#255'qqq'#255'JJJ'#255'qqq'#255#165#165#165#255#254#254#254#0#254#254#254 - +#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#253#253#253#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 - +#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254 - +#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254 - +#254#0#254#254#254#0#254#254#254#0#254#254#254#0#254#254#254#0 -]); -LazarusResources.Add('tlrradiogroup','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194 - +#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192 - +#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193 - +#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#146'ww' - +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 - +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#193#192#194#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255 - +#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192 - +#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193 - +#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255#193#192#194#255 - +#193#192#194#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219 - +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 - +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 - +#223#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219#223#223 - +#255#219#223#223#255#128#128#128#255#219#223#223#255#219#223#223#255#219#223 - +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 - +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219#223#223#255#128#128 - +#128#255#221#150'j'#255#128#128#128#255#219#223#223#255'311'#255'311'#255'31' - +'1'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255#219#223#223#255 - +#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219#223#223#255#219#223 - +#223#255#128#128#128#255#219#223#223#255#219#223#223#255#219#223#223#255#219 - +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#193#192#194 - +#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#146'ww'#255#255#255#255#255#219#223#223#255#219#223#223#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 - +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 - +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#193#192#194#255#146 - +'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#146'ww'#255#255#255#255#255#219#223#223#255#219#223#223#255#128#128 - +#128#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 - +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#193#192#194#255#146'ww'#255 - +#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146 - +'ww'#255#255#255#255#255#219#223#223#255#128#128#128#255#221#150'j'#255#128 - +#128#128#255#219#223#223#255'311'#255'311'#255'311'#255'311'#255'311'#255'31' - +'1'#255'311'#255'311'#255#219#223#223#255#219#223#223#255#193#192#194#255#146 - +'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#146'ww'#255#255#255#255#255#219#223#223#255#219#223#223#255#128#128 - +#128#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 - +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#193#192#194#255#146'ww'#255 - +#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146 - ,'ww'#255#255#255#255#255#219#223#223#255#219#223#223#255#219#223#223#255#219 - +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 - +#255#219#223#223#255#219#223#223#255#193#192#194#255#146'ww'#255#193#192#194 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255 - +#255#255#255#219#223#223#255#219#223#223#255#128#128#128#255#219#223#223#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 - +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 - +#223#255#219#223#223#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255 - +#219#223#223#255#128#128#128#255#221#150'j'#255#128#128#128#255#219#223#223 - +#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255'311'#255 - +'311'#255#219#223#223#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255 - +#219#223#223#255#219#223#223#255#128#128#128#255#219#223#223#255#219#223#223 - +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 - +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 - +#223#223#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219#223 - +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 - +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 - +#255#193#192#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#146'ww'#255#255#255#255#255#219#223#223#255#219 - +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 - +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#193#192 - +#194#255#146'ww'#255#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#146'ww'#255#255#255#255#255#255#255#255#255#221#150'j'#255 - +#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255 - +#221#150'j'#255#221#150'j'#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#146'ww' - +#255#193#192#194#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#146'ww'#255#146'ww'#255#146'ww'#255#221#150'j'#255#221#150'j'#255#221#150'j' - +#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j' - +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#146'ww'#255#146'ww'#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#221#150'j'#255 - +#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255 - +#221#150'j'#255#221#150'j'#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#254 - +#254#254#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlrdateedit','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#195#193#192#255#195#193#192#255#195#193#192#255#195#193 - +#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195 - +#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255 - +#195#193#192#255#195#193#192#255#195#193#192#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'w' - +'w'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' - +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#146'ww'#255#146'ww'#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#146'ww'#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 - +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 - +#223#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#219 - +#223#223#255#219#223#223#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255 - +#190'l8'#255#219#223#223#255#219#223#223#255#190'l8'#255#190'l8'#255#219#223 - +#223#255#219#223#223#255#219#223#223#255#146'ww'#255#195#193#192#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#146'ww'#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#221#172#140#255#190'l8'#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#190'l8'#255#221#172#140#255#221#172#140#255#190'l8'#255#219#223#223#255#219 - +#223#223#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#221#172#140#255#190'l8'#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#221#172#140#255#219#223#223 - +#255#221#172#140#255#190'l8'#255#219#223#223#255#219#223#223#255#146'ww'#255 - +#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#219#223#223#255#219#223 - +#223#255#219#223#223#255#221#172#140#255#190'l8'#255#219#223#223#255#219#223 - +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#221#172#140#255#190 - +'l8'#255#219#223#223#255#219#223#223#255#146'ww'#255#195#193#192#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#146'ww'#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#221#172#140#255#190'l8'#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#190'l8'#255#190'l8'#255#190'l8'#255#219#223#223#255#219#223#223#255#219#223 - +#223#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#219 - +#223#223#255#219#223#223#255#190'l8'#255#190'l8'#255#190'l8'#255#219#223#223 - +#255#219#223#223#255#219#223#223#255#190'l8'#255#221#172#140#255#219#223#223 - +#255#219#223#223#255#219#223#223#255#219#223#223#255#146'ww'#255#195#193#192 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#146'ww'#255#219#223#223#255#219#223#223#255#219 - +#223#223#255#190'l8'#255#190'l8'#255#219#223#223#255#219#223#223#255#219#223 - +#223#255#190'l8'#255#190'l8'#255#190'l8'#255#190'l8'#255#219#223#223#255#219 - +#223#223#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255 - +#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223 - +#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 - +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#146 - +'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#219#223#223#255 - +#219#223#223#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#219#223#223#255 - +#219#223#223#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww' - ,#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223 - +#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219 - +#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255#219#223#223#255 - +#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#146'ww'#255#146'ww'#255 - +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 - +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' - +#255#146'ww'#255#195#193#192#255#255#255#255#0#255#255#255#0#146'ww'#255#146 - +'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#221#150'j'#255#221 - +#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221#150'j'#255#221 - +#150'j'#255#164#164#255#255'Y'#0#179#255#164#164#255#255'Y'#0#179#255#164#164 - +#255#255'Y'#0#179#255#164#164#255#255#146'ww'#255#195#193#192#255#255#255#255 - +#0#255#255#255#0#146'ww'#255#195#193#192#255#195#193#192#255#195#193#192#255 - +#195#193#192#255#146'ww'#255#244#221#206#255#244#221#206#255#244#221#206#255 - +#244#221#206#255#244#221#206#255#244#221#206#255#244#221#206#255#244#221#206 - +#255#164#164#255#255#244#221#206#255#164#164#255#255#244#221#206#255#164#164 - +#255#255#244#221#206#255#146'ww'#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#146'ww'#255#195#193#192#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#195#193#192#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww' - +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#146'ww'#255#146'ww'#255#146'ww'#255#195#193#192#255'~J'#20#255#255#255#255#0 - +#255#255#255#0#146'ww'#255#195#193#192#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#250#252 - +#252#255#195#193#192#255't<'#0#255#231#218#217#255#231#218#217#255#231#218 - +#217#255#231#218#217#255#231#218#217#255'~J'#20#255#255#255#255#0#255#255#255 - +#0#146'ww'#255#195#193#192#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#250#252#252#255#195 - +#193#192#255't<'#0#255#242#232#230#255#242#232#230#255#242#232#230#255#242 - +#232#230#255#242#232#230#255#127'L'#21#255#255#255#255#0#255#255#255#0#146'w' - +'w'#255#195#193#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#250#252#252#255#195#193#192 - +#255't<'#0#255#253#247#246#255#253#247#246#255#253#247#246#255#253#247#246 - +#255#253#247#246#255#128'M'#22#255#255#255#255#0#255#255#255#0#146'ww'#255 - +#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192 - +#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193 - +#192#255#195#193#192#255#195#193#192#255#195#193#192#255#195#193#192#255't<' - +#0#255#253#253#253#255#253#253#253#255#253#253#253#255#253#253#253#255#253 - +#253#253#255#128'N'#23#255#255#255#255#0#255#255#255#0#146'ww'#255#146'ww' - +#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255 - +#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146'ww'#255#146 - +'ww'#255#255#255#255#0't<'#0#255't<'#0#255't<'#0#255't<'#0#255't<'#0#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 -]); + +*) diff --git a/components/lazreport/source/addons/SqlDB/lr_ibconnection.pas b/components/lazreport/source/addons/SqlDB/lr_ibconnection.pas index a411bb1240..d57c437026 100644 --- a/components/lazreport/source/addons/SqlDB/lr_ibconnection.pas +++ b/components/lazreport/source/addons/SqlDB/lr_ibconnection.pas @@ -54,133 +54,8 @@ end; initialization InitLRComp; -// RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); -// RegisterPropertyEditor(TypeInfo(string), TLRIBConnection, 'Protocol', TLRZConnectionProtocolProperty); finalization if Assigned(lrBMP_IBConnection) then FreeAndNil(lrBMP_IBConnection); end. -unit LR_IBConnection; -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, LResources, Graphics, LR_Class, LR_DBComponent, sqldb, - IBConnection, lr_SQLQuery; - -type - TLR_IBConnection = class(TComponent) - end; - - { TIBPQConnection } - - TLRIBConnection = class(TLRSQLConnection) - public - constructor Create(AOwnerPage:TfrPage); override; - end; - - -procedure Register; - -implementation - -procedure Register; -begin - RegisterComponents('LazReport',[TLR_IBConnection]); -end; - -var - lrBMP_IBConnection:TBitmap = nil; - -procedure InitLRComp; -begin - if not assigned(lrBMP_IBConnection) then - begin - lrBMP_IBConnection := TbitMap.Create; - lrBMP_IBConnection.LoadFromLazarusResource('TLRIBConnection'); - frRegisterObject(TLRIBConnection, lrBMP_IBConnection, 'TLRIBConnection', nil, otlUIControl, nil); - end; -end; - -{ TLRIBConnection } - -constructor TLRIBConnection.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'LRIBConnection'; - FConnection:=TIBConnection.Create(OwnerForm); - FConnection.Transaction:=FSQLTransaction; -end; - -initialization - InitLRComp; -// RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); -// RegisterPropertyEditor(TypeInfo(string), TLRIBConnection, 'Protocol', TLRZConnectionProtocolProperty); -finalization - if Assigned(lrBMP_IBConnection) then - FreeAndNil(lrBMP_IBConnection); -end. -unit LR_IBConnection; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, LResources, Graphics, LR_Class, LR_DBComponent, sqldb, - IBConnection, lr_SQLQuery; - -type - TLR_IBConnection = class(TComponent) - end; - - { TIBPQConnection } - - TLRIBConnection = class(TLRSQLConnection) - public - constructor Create(AOwnerPage:TfrPage); override; - end; - - -procedure Register; - -implementation - -procedure Register; -begin - RegisterComponents('LazReport',[TLR_IBConnection]); -end; - -var - lrBMP_IBConnection:TBitmap = nil; - -procedure InitLRComp; -begin - if not assigned(lrBMP_IBConnection) then - begin - lrBMP_IBConnection := TbitMap.Create; - lrBMP_IBConnection.LoadFromLazarusResource('TLRIBConnection'); - frRegisterObject(TLRIBConnection, lrBMP_IBConnection, 'TLRIBConnection', nil, otlUIControl, nil); - end; -end; - -{ TLRIBConnection } - -constructor TLRIBConnection.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'LRIBConnection'; - FConnection:=TIBConnection.Create(OwnerForm); - FConnection.Transaction:=FSQLTransaction; -end; - -initialization - InitLRComp; -// RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); -// RegisterPropertyEditor(TypeInfo(string), TLRIBConnection, 'Protocol', TLRZConnectionProtocolProperty); -finalization - if Assigned(lrBMP_IBConnection) then - FreeAndNil(lrBMP_IBConnection); -end. diff --git a/components/lazreport/source/addons/SqlDB/lr_pqconnection.pas b/components/lazreport/source/addons/SqlDB/lr_pqconnection.pas index 85b75113b3..9d89f2c7b4 100644 --- a/components/lazreport/source/addons/SqlDB/lr_pqconnection.pas +++ b/components/lazreport/source/addons/SqlDB/lr_pqconnection.pas @@ -53,131 +53,8 @@ end; initialization InitLRComp; -// RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); -// RegisterPropertyEditor(TypeInfo(string), TLRPQConnection, 'Protocol', TLRZConnectionProtocolProperty); finalization if Assigned(lrBMP_PQConnection) then FreeAndNil(lrBMP_PQConnection); end. -unit LR_PQConnection; -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, LResources, Graphics, LR_Class, LR_DBComponent, sqldb, - pqconnection, lr_SQLQuery; - -type - TLR_PQConnection = class(TComponent) - end; - - { TLRPQConnection } - - TLRPQConnection = class(TLRSQLConnection) - public - constructor Create(AOwnerPage:TfrPage); override; - end; - -procedure Register; - -implementation - -procedure Register; -begin - RegisterComponents('LazReport',[TLR_PQConnection]); -end; - -var - lrBMP_PQConnection:TBitmap = nil; - -procedure InitLRComp; -begin - if not assigned(lrBMP_PQConnection) then - begin - lrBMP_PQConnection := TbitMap.Create; - lrBMP_PQConnection.LoadFromLazarusResource('TLRPQConnection'); - frRegisterObject(TLRPQConnection, lrBMP_PQConnection, 'TLRPQConnection', nil, otlUIControl, nil); - end; -end; - -{ TLRPQConnection } -constructor TLRPQConnection.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'LRPQConnection'; - FConnection:=TPQConnection.Create(OwnerForm); - FConnection.Transaction:=FSQLTransaction; -end; - - -initialization - InitLRComp; -// RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); -// RegisterPropertyEditor(TypeInfo(string), TLRPQConnection, 'Protocol', TLRZConnectionProtocolProperty); -finalization - if Assigned(lrBMP_PQConnection) then - FreeAndNil(lrBMP_PQConnection); -end. -unit LR_PQConnection; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, LResources, Graphics, LR_Class, LR_DBComponent, sqldb, - pqconnection, lr_SQLQuery; - -type - TLR_PQConnection = class(TComponent) - end; - - { TLRPQConnection } - - TLRPQConnection = class(TLRSQLConnection) - public - constructor Create(AOwnerPage:TfrPage); override; - end; - -procedure Register; - -implementation - -procedure Register; -begin - RegisterComponents('LazReport',[TLR_PQConnection]); -end; - -var - lrBMP_PQConnection:TBitmap = nil; - -procedure InitLRComp; -begin - if not assigned(lrBMP_PQConnection) then - begin - lrBMP_PQConnection := TbitMap.Create; - lrBMP_PQConnection.LoadFromLazarusResource('TLRPQConnection'); - frRegisterObject(TLRPQConnection, lrBMP_PQConnection, 'TLRPQConnection', nil, otlUIControl, nil); - end; -end; - -{ TLRPQConnection } -constructor TLRPQConnection.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'LRPQConnection'; - FConnection:=TPQConnection.Create(OwnerForm); - FConnection.Transaction:=FSQLTransaction; -end; - - -initialization - InitLRComp; -// RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); -// RegisterPropertyEditor(TypeInfo(string), TLRPQConnection, 'Protocol', TLRZConnectionProtocolProperty); -finalization - if Assigned(lrBMP_PQConnection) then - FreeAndNil(lrBMP_PQConnection); -end. diff --git a/components/lazreport/source/addons/SqlDB/lr_sqldb.lpk b/components/lazreport/source/addons/SqlDB/lr_sqldb.lpk index 24160f63a2..c31e0531f3 100644 --- a/components/lazreport/source/addons/SqlDB/lr_sqldb.lpk +++ b/components/lazreport/source/addons/SqlDB/lr_sqldb.lpk @@ -2,6 +2,7 @@ + @@ -14,7 +15,10 @@ - + + + @@ -22,13 +26,17 @@ - + + + + + diff --git a/components/lazreport/source/addons/SqlDB/lr_sqlquery.pas b/components/lazreport/source/addons/SqlDB/lr_sqlquery.pas index 3b7bac91f9..b32f77a084 100644 --- a/components/lazreport/source/addons/SqlDB/lr_sqlquery.pas +++ b/components/lazreport/source/addons/SqlDB/lr_sqlquery.pas @@ -71,7 +71,7 @@ type implementation -uses LR_Utils; +uses LR_Utils, DBPropEdits, PropEdits; var lrBMP_SQLQuery:TBitmap = nil; @@ -271,570 +271,28 @@ begin XML.SetValue(Path+'Database/Value', FDatabase); end; -initialization - {$I lrsqldb_img.inc} - InitLRComp; - -// RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); -finalization - if Assigned(lrBMP_SQLQuery) then - FreeAndNil(lrBMP_SQLQuery); -end. - -unit lr_SQLQuery; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, LResources, Graphics, LR_Class, LR_DBComponent, sqldb; - type - { TLRSQLQuery } + { TLRZConnectionProtocolProperty } - TLRSQLQuery = class(TLRDataSetControl) - private - FDatabase: string; - procedure SetDatabase(AValue: string); - protected - function GetSQL: TStringList;virtual; - procedure SetSQL(AValue: TStringList);virtual; - procedure AfterLoad;override; + TLRSQLConnectionProtocolProperty = class(TFieldProperty) public - constructor Create(AOwnerPage:TfrPage); override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property SQL:TStringList read GetSQL write SetSQL; - property Database:string read FDatabase write SetDatabase; + procedure FillValues(const Values: TStringList); override; end; - { TLRSQLConnection } +{ TLRZConnectionProtocolProperty } - TLRSQLConnection = class(TfrNonVisualControl) - private - FConnected:boolean; - function GetCharSet: string; - function GetConnected: Boolean; - function GetDatabase: string; - function GetHostName: string; - function GetLoginPrompt: Boolean; - function GetPassword: string; - function GetUserName: string; - procedure SetCharSet(AValue: string); - procedure SetConnected(AValue: Boolean); - procedure SetDatabase(AValue: string); - procedure SetHostName(AValue: string); - procedure SetLoginPrompt(AValue: Boolean); - procedure SetPassword(AValue: string); - procedure SetUserName(AValue: string); - protected - FConnection: TSQLConnection; - FSQLTransaction:TSQLTransaction; - procedure SetName(const AValue: string); override; - procedure AfterLoad;override; - public - constructor Create(AOwnerPage:TfrPage); override; - destructor Destroy; override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property CharSet: string read GetCharSet write SetCharSet; - property Connected: Boolean read GetConnected write SetConnected; - property LoginPrompt: Boolean read GetLoginPrompt write SetLoginPrompt; - property HostName: string read GetHostName write SetHostName; - property DatabaseName: string read GetDatabase write SetDatabase; - property UserName: string read GetUserName write SetUserName; - property Password: string read GetPassword write SetPassword; - end; - - -implementation -uses LR_Utils; - -var - lrBMP_SQLQuery:TBitmap = nil; - -procedure InitLRComp; +procedure TLRSQLConnectionProtocolProperty.FillValues(const Values: TStringList); begin - if not assigned(lrBMP_SQLQuery) then - begin - lrBMP_SQLQuery := TbitMap.Create; - lrBMP_SQLQuery.LoadFromLazarusResource('TLRSQLQuery'); - frRegisterObject(TLRSQLQuery, lrBMP_SQLQuery, 'TLRSQLQuery', nil, otlUIControl, nil); - end; -end; - -{ TLRSQLConnection } - -function TLRSQLConnection.GetCharSet: string; -begin - Result:=FConnection.CharSet; -end; - -function TLRSQLConnection.GetConnected: Boolean; -begin - Result:=FConnection.Connected; -end; - -function TLRSQLConnection.GetDatabase: string; -begin - Result:=FConnection.DatabaseName; -end; - -function TLRSQLConnection.GetHostName: string; -begin - Result:=FConnection.HostName; -end; - -function TLRSQLConnection.GetLoginPrompt: Boolean; -begin - Result:=FConnection.LoginPrompt; -end; - -function TLRSQLConnection.GetPassword: string; -begin - Result:=FConnection.Password; -end; - -function TLRSQLConnection.GetUserName: string; -begin - Result:=FConnection.UserName; -end; - -procedure TLRSQLConnection.SetCharSet(AValue: string); -begin - FConnection.CharSet:=AValue; -end; - -procedure TLRSQLConnection.SetConnected(AValue: Boolean); -begin - FConnection.Connected:=AValue; -end; - -procedure TLRSQLConnection.SetDatabase(AValue: string); -begin - FConnection.DatabaseName:=AValue; -end; - -procedure TLRSQLConnection.SetHostName(AValue: string); -begin - FConnection.HostName:=AValue; -end; - -procedure TLRSQLConnection.SetLoginPrompt(AValue: Boolean); -begin - FConnection.LoginPrompt:=AValue; -end; - -procedure TLRSQLConnection.SetPassword(AValue: string); -begin - FConnection.Password:=AValue; -end; - -procedure TLRSQLConnection.SetUserName(AValue: string); -begin - FConnection.UserName:=AValue; -end; - -procedure TLRSQLConnection.SetName(const AValue: string); -begin - inherited SetName(AValue); - FConnection.Name:=Name; -end; - -procedure TLRSQLConnection.AfterLoad; -begin - inherited AfterLoad; - FConnection.Connected:=FConnected; -end; - -constructor TLRSQLConnection.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - FSQLTransaction:=TSQLTransaction.Create(OwnerForm); -end; - -destructor TLRSQLConnection.Destroy; -begin - if not (Assigned(OwnerPage) and (OwnerPage is TfrPageDialog)) then - begin - FreeAndNil(FSQLTransaction); - FreeAndNil(FConnection); - end; - inherited Destroy; -end; - -procedure TLRSQLConnection.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - FConnection.LoginPrompt:=XML.GetValue(Path + 'LoginPrompt/Value'{%H-}, false); - FConnection.CharSet:=XML.GetValue(Path + 'CharSet/Value'{%H-}, ''); - - FConnection.HostName:=XML.GetValue(Path + 'HostName/Value'{%H-}, ''); - FConnection.DatabaseName:=XML.GetValue(Path + 'Database/Value'{%H-}, ''); - FConnection.UserName:=XML.GetValue(Path + 'User/Value'{%H-}, ''); - FConnection.Password:=XML.GetValue(Path + 'Password/Value'{%H-}, ''); - - FConnected:=XML.GetValue(Path + 'Connected/Value'{%H-}, false); -end; - -procedure TLRSQLConnection.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path + 'LoginPrompt/Value'{%H-}, FConnection.LoginPrompt); - XML.SetValue(Path + 'CharSet/Value'{%H-}, FConnection.CharSet); - - XML.SetValue(Path + 'HostName/Value'{%H-}, FConnection.HostName); - XML.SetValue(Path + 'Database/Value'{%H-}, FConnection.DatabaseName); - XML.SetValue(Path + 'User/Value'{%H-}, FConnection.UserName); - XML.SetValue(Path + 'Password/Value'{%H-}, FConnection.Password); - XML.SetValue(Path + 'Connected/Value'{%H-}, FConnection.Connected); -end; - -{ TLRSQLQuery } - -procedure TLRSQLQuery.SetDatabase(AValue: string); -var - D:TComponent; -begin - if FDatabase=AValue then Exit; - FDatabase:=AValue; - - DataSet.Active:=false; - D:=frFindComponent(TSQLQuery(DataSet).Owner, FDatabase); - if Assigned(D) and (D is TSQLConnection)then - TSQLQuery(DataSet).DataBase:=TSQLConnection(D); -end; - -function TLRSQLQuery.GetSQL: TStringList; -begin - Result:=TSQLQuery(DataSet).SQL; -end; - -procedure TLRSQLQuery.SetSQL(AValue: TStringList); -begin - TSQLQuery(DataSet).SQL.Assign(AValue); -end; - -procedure TLRSQLQuery.AfterLoad; -var - D:TComponent; -begin - D:=frFindComponent(DataSet.Owner, FDatabase); - if Assigned(D) and (D is TSQLConnection)then - begin - TSQLQuery(DataSet).DataBase:=TSQLConnection(D); - DataSet.Active:=FActive; - end; -end; - -constructor TLRSQLQuery.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrSQLQuery'; - DataSet:=TSQLQuery.Create(OwnerForm); -end; - -procedure TLRSQLQuery.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - SQL.Text := XML.GetValue(Path+'SQL/Value'{%H-}, ''); - FDatabase:= XML.GetValue(Path+'Database/Value'{%H-}, ''); -end; - -procedure TLRSQLQuery.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'SQL/Value', SQL.Text); - XML.SetValue(Path+'Database/Value', FDatabase); + if (GetComponent(0) is TLRSQLQuery) then + frGetComponents(nil, TSQLConnection, Values, nil); end; initialization {$I lrsqldb_img.inc} InitLRComp; -// RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); -finalization - if Assigned(lrBMP_SQLQuery) then - FreeAndNil(lrBMP_SQLQuery); -end. - -unit lr_SQLQuery; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, LResources, Graphics, LR_Class, LR_DBComponent, sqldb; - -type - - { TLRSQLQuery } - - TLRSQLQuery = class(TLRDataSetControl) - private - FDatabase: string; - procedure SetDatabase(AValue: string); - protected - function GetSQL: TStringList;virtual; - procedure SetSQL(AValue: TStringList);virtual; - procedure AfterLoad;override; - public - constructor Create(AOwnerPage:TfrPage); override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property SQL:TStringList read GetSQL write SetSQL; - property Database:string read FDatabase write SetDatabase; - end; - - { TLRSQLConnection } - - TLRSQLConnection = class(TfrNonVisualControl) - private - FConnected:boolean; - function GetCharSet: string; - function GetConnected: Boolean; - function GetDatabase: string; - function GetHostName: string; - function GetLoginPrompt: Boolean; - function GetPassword: string; - function GetUserName: string; - procedure SetCharSet(AValue: string); - procedure SetConnected(AValue: Boolean); - procedure SetDatabase(AValue: string); - procedure SetHostName(AValue: string); - procedure SetLoginPrompt(AValue: Boolean); - procedure SetPassword(AValue: string); - procedure SetUserName(AValue: string); - protected - FConnection: TSQLConnection; - FSQLTransaction:TSQLTransaction; - procedure SetName(const AValue: string); override; - procedure AfterLoad;override; - public - constructor Create(AOwnerPage:TfrPage); override; - destructor Destroy; override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property CharSet: string read GetCharSet write SetCharSet; - property Connected: Boolean read GetConnected write SetConnected; - property LoginPrompt: Boolean read GetLoginPrompt write SetLoginPrompt; - property HostName: string read GetHostName write SetHostName; - property DatabaseName: string read GetDatabase write SetDatabase; - property UserName: string read GetUserName write SetUserName; - property Password: string read GetPassword write SetPassword; - end; - - -implementation -uses LR_Utils; - -var - lrBMP_SQLQuery:TBitmap = nil; - -procedure InitLRComp; -begin - if not assigned(lrBMP_SQLQuery) then - begin - lrBMP_SQLQuery := TbitMap.Create; - lrBMP_SQLQuery.LoadFromLazarusResource('TLRSQLQuery'); - frRegisterObject(TLRSQLQuery, lrBMP_SQLQuery, 'TLRSQLQuery', nil, otlUIControl, nil); - end; -end; - -{ TLRSQLConnection } - -function TLRSQLConnection.GetCharSet: string; -begin - Result:=FConnection.CharSet; -end; - -function TLRSQLConnection.GetConnected: Boolean; -begin - Result:=FConnection.Connected; -end; - -function TLRSQLConnection.GetDatabase: string; -begin - Result:=FConnection.DatabaseName; -end; - -function TLRSQLConnection.GetHostName: string; -begin - Result:=FConnection.HostName; -end; - -function TLRSQLConnection.GetLoginPrompt: Boolean; -begin - Result:=FConnection.LoginPrompt; -end; - -function TLRSQLConnection.GetPassword: string; -begin - Result:=FConnection.Password; -end; - -function TLRSQLConnection.GetUserName: string; -begin - Result:=FConnection.UserName; -end; - -procedure TLRSQLConnection.SetCharSet(AValue: string); -begin - FConnection.CharSet:=AValue; -end; - -procedure TLRSQLConnection.SetConnected(AValue: Boolean); -begin - FConnection.Connected:=AValue; -end; - -procedure TLRSQLConnection.SetDatabase(AValue: string); -begin - FConnection.DatabaseName:=AValue; -end; - -procedure TLRSQLConnection.SetHostName(AValue: string); -begin - FConnection.HostName:=AValue; -end; - -procedure TLRSQLConnection.SetLoginPrompt(AValue: Boolean); -begin - FConnection.LoginPrompt:=AValue; -end; - -procedure TLRSQLConnection.SetPassword(AValue: string); -begin - FConnection.Password:=AValue; -end; - -procedure TLRSQLConnection.SetUserName(AValue: string); -begin - FConnection.UserName:=AValue; -end; - -procedure TLRSQLConnection.SetName(const AValue: string); -begin - inherited SetName(AValue); - FConnection.Name:=Name; -end; - -procedure TLRSQLConnection.AfterLoad; -begin - inherited AfterLoad; - FConnection.Connected:=FConnected; -end; - -constructor TLRSQLConnection.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - FSQLTransaction:=TSQLTransaction.Create(OwnerForm); -end; - -destructor TLRSQLConnection.Destroy; -begin - if not (Assigned(OwnerPage) and (OwnerPage is TfrPageDialog)) then - begin - FreeAndNil(FSQLTransaction); - FreeAndNil(FConnection); - end; - inherited Destroy; -end; - -procedure TLRSQLConnection.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - FConnection.LoginPrompt:=XML.GetValue(Path + 'LoginPrompt/Value'{%H-}, false); - FConnection.CharSet:=XML.GetValue(Path + 'CharSet/Value'{%H-}, ''); - - FConnection.HostName:=XML.GetValue(Path + 'HostName/Value'{%H-}, ''); - FConnection.DatabaseName:=XML.GetValue(Path + 'Database/Value'{%H-}, ''); - FConnection.UserName:=XML.GetValue(Path + 'User/Value'{%H-}, ''); - FConnection.Password:=XML.GetValue(Path + 'Password/Value'{%H-}, ''); - - FConnected:=XML.GetValue(Path + 'Connected/Value'{%H-}, false); -end; - -procedure TLRSQLConnection.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path + 'LoginPrompt/Value'{%H-}, FConnection.LoginPrompt); - XML.SetValue(Path + 'CharSet/Value'{%H-}, FConnection.CharSet); - - XML.SetValue(Path + 'HostName/Value'{%H-}, FConnection.HostName); - XML.SetValue(Path + 'Database/Value'{%H-}, FConnection.DatabaseName); - XML.SetValue(Path + 'User/Value'{%H-}, FConnection.UserName); - XML.SetValue(Path + 'Password/Value'{%H-}, FConnection.Password); - XML.SetValue(Path + 'Connected/Value'{%H-}, FConnection.Connected); -end; - -{ TLRSQLQuery } - -procedure TLRSQLQuery.SetDatabase(AValue: string); -var - D:TComponent; -begin - if FDatabase=AValue then Exit; - FDatabase:=AValue; - - DataSet.Active:=false; - D:=frFindComponent(TSQLQuery(DataSet).Owner, FDatabase); - if Assigned(D) and (D is TSQLConnection)then - TSQLQuery(FDataSet).DataBase:=TSQLConnection(D); -end; - -function TLRSQLQuery.GetSQL: TStringList; -begin - Result:=TSQLQuery(DataSet).SQL; -end; - -procedure TLRSQLQuery.SetSQL(AValue: TStringList); -begin - TSQLQuery(DataSet).SQL.Assign(AValue); -end; - -procedure TLRSQLQuery.AfterLoad; -begin - inherited AfterLoad; -end; - -constructor TLRSQLQuery.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrSQLQuery'; - DataSet:=TSQLQuery.Create(OwnerForm); -end; - -procedure TLRSQLQuery.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - SQL.Text := XML.GetValue(Path+'SQL/Value'{%H-}, ''); - FDatabase:= XML.GetValue(Path+'Database/Value'{%H-}, ''); -end; - -procedure TLRSQLQuery.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'SQL/Value', SQL.Text); - XML.SetValue(Path+'Database/Value', FDatabase); -end; - -initialization - {$I lrsqldb_img.inc} - InitLRComp; - -// RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); + RegisterPropertyEditor(TypeInfo(string), TLRSQLQuery, 'Database', TLRSQLConnectionProtocolProperty); finalization if Assigned(lrBMP_SQLQuery) then FreeAndNil(lrBMP_SQLQuery); diff --git a/components/lazreport/source/addons/SqlDB/lrsqldb_img.inc b/components/lazreport/source/addons/SqlDB/lrsqldb_img.inc index 754ed8ae9b..0c1df1675d 100644 --- a/components/lazreport/source/addons/SqlDB/lrsqldb_img.inc +++ b/components/lazreport/source/addons/SqlDB/lrsqldb_img.inc @@ -808,1623 +808,4 @@ LazarusResources.Add('tlribconnection','BMP',[ +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 +#255#255#255#0 ]); -LazarusResources.Add('tlrmssqlconnection','BMP',[ - 'BM'#138#9#0#0#0#0#0#0#138#0#0#0'|'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0 - +#9#0#0#195#14#0#0#195#14#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0 - +#0#0#255#1#0#0#0#0#0#0#0#0#0#0#0'T'#184#30#252#0#0#0#0#0#0#0#0'fff'#252#0#0#0 - +#0#0#0#0#0#196#245'('#255#0#0#0#0#0#0#0#0#0#0#0#0#4#0#0#0#0#0#0#0#0#0#0#0#0#0 - +#0#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#9#0#235#227 - +#9#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#255#255#255#0#9#0#235#227#9 - +#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#255#255#255#0#9#0 - +#235#227#9#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9 - +#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235 - +#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#9#0#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9#0#235#227#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9 - +#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255 - +#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9 - +#0#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#9#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#9#0 - +#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#9#0#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9#0#235 - +#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235 - +#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#9#0#235#227#9#0#235#227#9#0#235#227#9#0 - +#235#227#9#0#235#227#9#0#235#227#255#255#255#0#9#0#235#227#9#0#235#227#9#0 - +#235#227#9#0#235#227#9#0#235#227#9#0#235#227#255#255#255#0#9#0#235#227#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - ,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#0#0#0#255#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0 - +#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#0#0#0#255#255#255#255#0#255#255#255#0#0#0#0#255#255#255#255#0#255#255 - +#255#0#0#0#0#255#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0 - +#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#0#0#0#255#255#255#255#0#0#0#0#255#255#255#255#0#0#0#0#255#255#255#255 - +#0#0#0#0#255#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#0#0#0#255#0#0#0#255#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#255#255#255#0#255#255 - +#255#0#255#255#255#0#0#0#0#255#0#0#0#255#255#255#255#0#0#0#0#255#0#0#0#255#0 - +#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0 -]); -LazarusResources.Add('tlrmysqlconnection','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#253 - +#253#253#0#255#255#255#0#252#252#252#0#255#255#253#0#236#233#236#170#191#167 - +#160#255#243#221#206#255#237#218#204#255#240#222#212#255#233#206#189#255#235 - +#209#192#255#236#216#204#255#245#230#220#255#255#255#255#255#200#185#184#255 - +#166#145#145#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#253#253 - +#253#0#253#252#252#0#250#248#250#0#182#162#160#255#226#200#184#255#238#215 - +#201#255#238#219#206#255#237#214#200#255#230#200#178#255#232#208#191#255#245 - +#225#210#255#232#218#208#255#162#139#137#255#177#159#159#255#247#246#246#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#253#253#253#0#253#253#253#0#251#251#251#0#255#255 - +#255#0#183#167#167#255#203#174#160#255#241#215#197#255#233#210#195#255#238 - +#218#204#255#231#201#181#255#229#196#175#255#240#214#196#255#222#202#190#255 - +#146'yx'#255#196#183#183#255#255#255#255#0#252#252#252#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#253#253 - +#253#0#255#255#255#0#251#251#251#0#255#255#255#0#204#194#196#255#177#146#136 - +#255#241#212#191#255#231#204#188#255#236#213#197#255#236#210#195#255#225#189 - +#166#255#231#200#180#255#232#208#192#255#131'gf'#255#195#182#183#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#253#253#253#0 - +#255#255#255#0#253#253#253#0#251#251#251#0#253#252#252#0#252#252#252#0#253 - +#253#253#0#231#226#227#255#161#133#128#255#232#200#178#255#231#202#183#255 - +#232#206#188#255#237#213#198#255#229#195#174#255#225#188#163#255#232#202#182 - +#255#230#206#190#255#182#159#154#255#163#141#139#255#162#140#140#255#178#161 - +#161#255#241#237#237'f'#255#255#255#0#253#253#253#0#255#255#255#0#253#253#253 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#252#252#252#0#251#252#252#0#166 - +#143#142#255#212#176#157#255#233#202#180#255#230#201#182#255#233#208#191#255 - +#233#206#189#255#222#182#155#255#226#191#169#255#231#202#183#255#235#212#196 - +#255#251#235#221#255#255#252#245#255#198#182#180#255#150#127#127#255#245#241 - +#241#0#255#255#255#0#255#255#255#0#253#253#253#0#253#252#252#0#248#247#247#0 - +#174#157#158#255#216#208#208#255#255#255#255#0#188#174#175#255#188#152#136 - +#255#236#201#176#255#227#196#176#255#232#202#183#255#235#209#194#255#224#185 - +#161#255#222#182#157#255#227#194#173#255#235#207#189#255#247#227#212#255#233 - +#218#207#255#183#163#160#255#188#171#171#255#251#251#251#0#255#255#255#0#255 - +#255#255#0#253#253#253#0#252#252#252#0#255#255#255#0#182#163#162#255#147'la' - +#255#188#171#170#255#227#222#225#255#166#133'{'#255#232#196#170#255#226#194 - +#171#255#230#198#178#255#233#207#190#255#227#195#173#255#219#175#147#255#224 - +#188#163#255#233#202#181#255#225#198#184#255#181#157#150#255#158#133#133#255 - +#201#189#189#255#255#255#255#0#253#253#253#0#253#253#253#0#255#255#255#0#252 - +#252#252#0#255#255#255#0#236#232#235#204#161#130'y'#255#221#177#149#255#153 - +#130#129#255#158#133#132#255#215#177#154#255#229#194#171#255#227#195#174#255 - +#232#203#185#255#231#202#183#255#219#174#145#255#221#181#154#255#232#197#174 - +#255#213#184#169#255#137'nn'#255#182#166#167#255#243#241#242#0#255#255#255#0 - +#253#253#253#0#253#253#253#0#255#255#255#0#255#255#255#0#252#251#251#0#255 - +#253#253#0#206#196#198#255#174#137'|'#255#235#195#166#255#137'lj'#255#175#141 - +#130#255#236#201#175#255#226#192#170#255#231#201#181#255#232#204#185#255#220 - +#177#149#255#220#176#147#255#224#187#163#255#237#206#184#255#155#128'{'#255 - +#208#198#200#255#255#255#255#0#255#255#255#0#252#252#252#0#255#255#255#0#255 - +#255#255#0#253#253#253#0#255#255#255#0#251#250#250#0#253#253#253#0#191#178 - +#180#255#183#146#130#255#235#197#169#255#210#176#157#255#220#185#166#255#230 - +#196#174#255#231#200#180#255#232#204#187#255#220#177#150#255#218#171#142#255 - +#222#184#159#255#233#201#177#255#204#175#161#255#159#137#139#255#255#255#255 - +#0#251#250#250#0#253#253#253#0#255#255#255#0#253#253#253#0#253#253#253#0#255 - +#255#255#0#255#255#255#0#251#251#251#0#255#255#255#0#195#182#183#255#183#149 - +#133#255#235#200#175#255#229#195#171#255#230#197#176#255#230#198#180#255#232 - +#206#188#255#221#180#153#255#216#169#140#255#222#183#157#255#225#189#167#255 - +#240#210#190#255#159#130#127#255#210#201#202#255#253#253#253#0#252#251#251#0 - +#255#255#255#0#253#253#253#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#252#252#252#0#255#255#255#0#220#214#215#255#173#143#134#255#237 - +#204#181#255#227#196#176#255#230#200#181#255#233#207#189#255#222#183#158#255 - +#216#169#139#255#222#182#155#255#225#189#166#255#235#204#183#255#213#185#171 - ,#255#150#127#127#255#251#251#251#0#253#253#253#0#253#253#253#0#253#253#253#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#253#253#253#0#253 - +#253#253#0#253#253#253#0#242#241#242#0#159#133#130#255#230#200#181#255#232 - +#203#184#255#233#209#192#255#227#192#170#255#218#170#141#255#222#182#157#255 - +#226#190#167#255#227#196#175#255#245#219#201#255#164#137#132#255#195#182#183 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#253#253#253#0#252#252#252#0#253 - +#253#253#0#233#230#231#255#147'xv'#255#232#206#188#255#235#210#194#255#232 - +#204#187#255#220#177#150#255#222#183#158#255#226#190#167#255#229#197#177#255 - +#237#210#192#255#222#200#187#255#147'zz'#255#247#245#245#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#252#251#251#0#255#255#255#0#183#167#168 - +#255#189#161#151#255#245#221#206#255#236#213#198#255#225#188#163#255#224#184 - +#159#255#227#194#171#255#230#200#181#255#231#204#188#255#250#230#214#255#159 - +#133#130#255#201#189#189#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#252#252#252#0#253#253#253#0#240#236#237'D'#161#136#133#255#238#216#201 - +#255#238#219#206#255#231#201#182#255#225#189#164#255#229#197#176#255#232#203 - +#184#255#232#206#190#255#251#231#216#255#190#167#160#255#160#140#140#255#255 - +#255#255#0#251#251#251#0#255#255#255#0#253#252#252#0#255#255#255#0#174#155 - +#155#255#174#155#155#255#159#136#136#255#255#255#255#0#255#255#255#0#250#248 - +#248#0#253#253#253#0#200#188#188#255#189#163#155#255#250#232#220#255#242#220 - +#204#255#231#197#176#255#231#201#182#255#233#207#189#255#232#208#194#255#251 - +#233#220#255#209#190#182#255#143'ww'#255#243#241#241#0#252#252#252#0#255#255 - +#255#0#255#255#255#0#198#185#185#255#174#155#155#255#174#155#155#255#174#155 - +#155#255#159#136#136#255#207#197#197#255#207#197#197#255#251#251#251#0#255 - +#255#255#0#167#145#145#255#222#203#194#255#250#233#222#255#196#169#157#255 - +#147'la'#255#238#214#197#255#235#213#200#255#253#238#225#255#208#189#183#255 - +#141'ss'#255#231#226#226#255#255#255#255#0#174#155#155#255#174#155#155#255 - +#174#155#155#255#174#155#155#255#174#155#155#255#198#185#185#255#198#185#185 - +#255#159#136#136#255#159#136#136#255#159#136#136#255#255#255#255#0#219#212 - +#212#255#176#153#150#255#251#240#230#255#236#215#202#255#147'la'#255#196#169 - +#157#255#250#232#220#255#252#238#227#255#191#171#166#255#142'uu'#255#230#224 - +#224#255#255#255#255#0#198#185#185#255#198#185#185#255#198#185#185#255#198 - +#185#185#255#198#185#185#255#174#155#155#255#198#185#185#255#159#136#136#255 - +#159#136#136#255#255#255#255#0#255#255#255#0#243#241#241#0#166#144#144#255 - +#230#216#210#255#248#235#225#255#247#229#215#255#255#238#226#255#240#224#214 - +#255#213#195#189#255#161#137#135#255#162#141#141#255#242#240#240#0#255#255 - +#255#0#159#136#136#255#159#136#136#255#159#136#136#255#159#136#136#255#159 - +#136#136#255#159#136#136#255#174#155#155#255#198#185#185#255#159#136#136#255 - +#159#136#136#255#159#136#136#255#159#136#136#255#158#135#135#255#213#198#195 - +#255#255#255#250#255#237#222#213#255#190#168#163#255#158#133#131#255#154#131 - +#130#255#163#143#143#255#213#202#203#255#255#255#255#0#255#255#255#0#252#252 - +#252#0#255#255#255#0#253#253#253#0#253#253#253#0#255#255#255#0#255#255#255#0 - +#198#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255#159#136#136 - +#255#207#197#197#255#207#197#197#255#144'wv'#255#227#218#214#255#204#189#185 - +#255#152#128#128#255#169#151#151#255#216#208#208#255#243#241#241#0#255#255 - +#255#0#255#255#255#0#252#252#252#0#253#253#253#0#255#255#255#0#253#253#253#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#159#136#136#255#159#136#136#255#159#136#136#255#255#255#255#0#255 - +#255#255#0#189#175#175#255#139'oo'#255#132'hi'#255#213#203#203#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#251#250#250#0#251#250#250#0#253#253#253#0 - +#253#253#253#0#253#253#253#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlrodbcconnection','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#174#155#155#255#174#155#155#255#159 - +#136#136#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#198#185#185#255#174#155 - +#155#255#174#155#155#255#174#155#155#255#159#136#136#255#207#197#197#255#207 - +#197#197#255#255#255#255#0#255#255#255#0#214#187#171#255#200#163#140#255#176 - +'Y '#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#176 - +'Y '#255#200#163#140#255#214#187#171#255#232#217#208#255#255#255#255#0#174 - +#155#155#255#174#155#155#255#174#155#155#255#174#155#155#255#198#185#185#255 - +#198#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255#255#255#255 - +#0#214#187#171#255#176'Y '#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4' - +#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#176 - +'Y '#255#186'rB'#255#232#217#208#255#255#255#255#0#198#185#185#255#198#185 - +#185#255#174#155#155#255#198#185#185#255#159#136#136#255#159#136#136#255#255 - +#255#255#0#255#255#255#0#232#217#208#255#176'Y '#255#130'4'#0#255#214#187#171 - +#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#232#217#208#255#200#163#140#255#186'rB'#255#130'4'#0#255#176 - +'Y '#255#200#163#140#255#159#136#136#255#159#136#136#255#174#155#155#255#198 - +#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255#159#136#136#255 - +#232#217#208#255#130'4'#0#255#214#187#171#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#232#217#208#255#200#163#140#255#130'4'#0 - +#255#176'Y '#255#198#185#185#255#159#136#136#255#159#136#136#255#159#136#136 - +#255#159#136#136#255#207#197#197#255#207#197#197#255#232#217#208#255#130'4'#0 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#232#217#208#255#200#163#140#255#130'4' - +#0#255#232#217#208#255#159#136#136#255#159#136#136#255#159#136#136#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#186#186#248#255#0#0#172#255#0#0#172#255#0#0#172#255#186#186#248#255#255#255 - +#255#0#201#201#201#255'==='#255'==='#255'==='#255'==='#255#255#255#255#0'===' - +#255'==='#255'==='#255'==='#255#201#201#201#255#255#255#255#0#186#186#248#255 - +#0#0#172#255#0#0#172#255'xx'#241#255#255#255#255#0#255#255#255#0#0#0#172#255 - +#0#0#172#255#255#255#255#0#0#0#172#255#0#0#172#255#255#255#255#0'==='#255'==' - +'='#255#255#255#255#0'==='#255'==='#255#255#255#255#0'==='#255'==='#255#255 - +#255#255#0'==='#255'==='#255#255#255#255#0#0#0#172#255#0#0#172#255#255#255 - +#255#0#0#0#172#255#255#255#255#0#255#255#255#0#0#0#172#255#0#0#172#255#255 - +#255#255#0#0#0#172#255#0#0#172#255#255#255#255#0'==='#255'==='#255#255#255 - +#255#0'==='#255'==='#255#255#255#255#0'==='#255'==='#255#255#255#255#0'===' - +#255'==='#255#255#255#255#0#0#0#172#255#0#0#172#255#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#0#0#172#255#0#0#172#255#255#255#255#0#0#0#172 - +#255#0#0#172#255#255#255#255#0'==='#255'==='#255#255#255#255#0'==='#255'===' - +#255#255#255#255#0'==='#255'==='#255#255#255#255#0'==='#255'==='#255#255#255 - +#255#0#0#0#172#255#0#0#172#255#255#255#255#0#0#0#172#255#255#255#255#0#255 - +#255#255#0#186#186#248#255#0#0#172#255#0#0#172#255#0#0#172#255#186#186#248 - +#255#255#255#255#0#201#201#201#255'==='#255'==='#255'==='#255'==='#255#255 - +#255#255#0'==='#255'==='#255'==='#255'==='#255#201#201#201#255#255#255#255#0 - +#186#186#248#255#0#0#172#255#0#0#172#255'xx'#241#255#255#255#255#0#255#255 - ,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'==='#255'==='#255 - +#255#255#255#0'==='#255'==='#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#232#217#208#255#200#163 - +#140#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0'==='#255'==='#255#255#255#255#0'==='#255'==='#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#214#187 - +#171#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#232#217#208#255#130'4'#0#255#232#217#208#255#255#255#255 - +#0#255#255#255#0#255#255#255#0'==='#255'==='#255#255#255#255#0'==='#255'===' - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#232#217#208#255#200#163#140#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#232#217#208#255#130 - +'4'#0#255#200#163#140#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#130'4' - +#0#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#232#217#208#255#176'Y '#255#130'4'#0#255#200 - +#163#140#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#214#187#171#255#130'4'#0#255#232#217#208#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#232#217#208#255#200#163#140#255#176'Y '#255#130'4'#0#255#186'rB' - +#255#200#163#140#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#232#217#208#255#214#187#171#255#130'4'#0#255 - +#176'Y '#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#232#217#208#255#186'rB'#255#176'Y '#255#130'4'#0#255#130'4'#0#255#130 - +'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255 - +#130'4'#0#255#176'Y '#255#214#187#171#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#232#217#208#255#214#187#171#255 - +#200#163#140#255#176'Y '#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0 - +#255#130'4'#0#255#176'Y '#255#200#163#140#255#214#187#171#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0 -]); -LazarusResources.Add('tlroracleconnection','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#205#205#255#255'OO'#255#255#131#134#255#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#205#205#255#255'MM'#255#255'ee'#255#255'}}'#255#255 - +#153#153#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#129#132#255#255'MM' - +#255#255'ss'#255#255'55'#255#255#157#157#255#255'uu'#255#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#205#205#255 - +#255'kk'#255#255'SS'#255#255'++'#255#255'55'#255#255#155#155#255#255'!!'#255 - +#255#165#165#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#205#205#255#255'SS'#255#255'__'#255#255#179#179#255#255#19#19#255#255 - +'11'#255#255'!!'#255#255#161#161#255#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#205#205#255#255'UU'#255#255']]'#255#255#205#205#255 - +#255#255#255#255#0#193#193#255#255#161#161#255#255#189#189#255#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#205#205#255#255#149#149 - +#255#255#31#31#255#255#133#133#255#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#205#205#255#255'YY'#255#255'[['#255#255#183#183#255#255'##'#255#255 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#207#207#255#255']]'#255#255'YY'#255#255#203#203 - +#255#255#255#255#255#0#181#181#255#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#207#207#255#255#157#157 - +#255#255'##'#255#255#201#201#255#255#255#255#255#0#179#179#255#255'--'#255 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#171#171#255#255'--'#255#255#31#31#255#255#171#171#255 - +#255#171#171#255#255#31#31#255#255#155#155#255#255#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#203#203#255#255'SS'#255#255 - +#11#11#255#255#139#139#255#255'!!'#255#255'##'#255#255#155#155#255#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#203 - +#203#255#255'yy'#255#255'UU'#255#255'))'#255#255#175#175#255#255#207#207#255 - +#255#207#207#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#207#207#255#255#139#139#255#255#23#23#255#255'##'#255#255'ee'#255#255 - ,'55'#255#255#129#129#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0'qq'#255#255#157#157#255#255#193 - +#193#255#255#161#161#255#255'qq'#255#255'AA'#255#255#159#159#255#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0'55'#255#255'//'#255#255'!!'#255#255#161#161#255#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#147#147#255#255#199#199#255#255'++'#255#255'mm'#255#255#133#133 - +#255#255'GG'#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#174 - +#155#155#255#174#155#155#255#159#136#136#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#201#201#255#255'UU'#255#255'KK'#255 - +#255#143#143#255#255#185#185#255#255'%%'#255#255#149#149#255#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#198#185#185#255#174#155#155#255#174#155#155#255#174#155#155#255 - +#159#136#136#255#207#197#197#255#207#197#197#255#255#255#255#0#207#207#255 - +#255'ss'#255#255'!!'#255#255'11'#255#255';;'#255#255'EE'#255#255'%%'#255#255 - +#141#141#255#255#255#255#255#0#255#255#255#0#174#155#155#255#174#155#155#255 - +#174#155#155#255#174#155#155#255#174#155#155#255#174#155#155#255#174#155#155 - +#255#174#155#155#255#198#185#185#255#198#185#185#255#159#136#136#255#159#136 - +#136#255#159#136#136#255#255#255#255#0'oo'#255#255'GG'#255#255#187#187#255 - +#255'{{'#255#255'AA'#255#255'WW'#255#255#139#139#255#255#255#255#255#0#255 - +#255#255#0#198#185#185#255#198#185#185#255#198#185#185#255#198#185#185#255 - +#198#185#185#255#198#185#185#255#198#185#185#255#198#185#185#255#174#155#155 - +#255#198#185#185#255#159#136#136#255#159#136#136#255#255#255#255#0#255#255 - +#255#0'uu'#255#255'EE'#255#255#199#199#255#255#255#255#255#0#167#167#255#255 - +'55'#255#255#205#205#255#255#255#255#255#0#255#255#255#0#159#136#136#255#159 - +#136#136#255#159#136#136#255#159#136#136#255#159#136#136#255#159#136#136#255 - +#159#136#136#255#159#136#136#255#159#136#136#255#174#155#155#255#198#185#185 - +#255#159#136#136#255#159#136#136#255#159#136#136#255#159#136#136#255#27#27 - +#255#255#195#195#255#255#255#255#255#0#187#187#255#255'))'#255#255#143#143 - +#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#198#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255 - +#159#136#136#255#207#197#197#255#207#197#197#255'!!'#255#255#155#155#255#255 - +#181#181#255#255'))'#255#255#133#133#255#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#159#136#136#255#159#136#136#255#159#136#136#255#255#255#255#0 - +#255#255#255#0#169#169#255#255''''''#255#255'!!'#255#255#139#139#255#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlrpqconnection','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#250#246#241#0#233#214#195#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#174#155#155#255#174#155#155#255#159 - +#136#136#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#243#234#226 - +#255#217#183#153#255#214#178#148#255#224#196#170#255#241#230#219#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#198#185#185 - +#255#174#155#155#255#174#155#155#255#174#155#155#255#159#136#136#255#207#197 - +#197#255#207#197#197#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#251#249#246#0#209#168#130#255#194#138'f' - +#255#196#142'f'#255#195#141'f'#255#234#217#199#255#255#255#255#0#174#155#155 - +#255#174#155#155#255#174#155#155#255#174#155#155#255#174#155#155#255#174#155 - +#155#255#198#185#185#255#198#185#185#255#159#136#136#255#159#136#136#255#159 - +#136#136#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#238#225#213#255#198#147'f'#255#199#149'g'#255#200#152'j' - +#255#193#139'f'#255#228#205#184#255#255#255#255#0#198#185#185#255#198#185#185 - +#255#198#185#185#255#198#185#185#255#198#185#185#255#174#155#155#255#198#185 - +#185#255#159#136#136#255#159#136#136#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#251#249#246#0 - +#228#208#187#255#197#148'g'#255#196#147'f'#255#197#149'g'#255#193#140'f'#255 - +#223#197#174#255#255#255#255#0#159#136#136#255#159#136#136#255#159#136#136 - +#255#159#136#136#255#159#136#136#255#174#155#155#255#198#185#185#255#159#136 - +#136#255#159#136#136#255#159#136#136#255#159#136#136#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#226#203 - +#180#255#194#145'f'#255#196#148'f'#255#196#148'g'#255#192#140'f'#255#221#194 - +#168#255#237#223#210#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#198#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255#159 - +#136#136#255#207#197#197#255#207#197#197#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#242#233#222#255#255#255#255#0#218#186#157#255#192 - +#140'f'#255#196#147'g'#255#196#147'g'#255#191#138'f'#255#223#199#175#255#242 - +#231#221#255#230#209#190#255#232#213#196#255#240#231#220#255#255#255#255#0 - +#246#241#235#170#244#236#229#255#159#136#136#255#159#136#136#255#159#136#136 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#245#238#231#255#246#240#234 - +#204#228#207#187#255#217#187#165#255#241#231#222#255#215#184#155#255#190#137 - +'f'#255#195#148'g'#255#196#148'h'#255#189#136'f'#255#232#214#198#255#232#215 - +#199#255#210#175#141#255#230#211#193#255#228#207#187#255#240#229#217#255#213 - +#179#148#255#201#158'x'#255#241#231#222#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#230#212#195#255#245#238#232#255#238 - +#227#216#255#228#208#192#255#233#217#203#255#204#164#130#255#192#141'f'#255 - +#194#146'f'#255#195#146'f'#255#192#141'f'#255#210#173#141#255#238#226#214#255 - +#247#243#239#255#222#196#172#255#226#203#184#255#214#182#153#255#191#139'f' - +#255#190#138'f'#255#216#184#156#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#243#233#225#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#240#230#222#255#193#143'f'#255#193#145'f'#255#194#146'f'#255#194 - +#146'f'#255#194#147'g'#255#188#135'f'#255#217#188#161#255#233#217#204#255#219 - +#191#169#255#244#237#231#255#196#149'l'#255#193#144'f'#255#193#144'g'#255#194 - +#147'i'#255#240#229#220#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#245#239#232#255#233#216#202#255#242#232 - +#223#255#216#186#157#255#190#138'f'#255#194#146'f'#255#193#145'f'#255#193#145 - +'f'#255#191#141'f'#255#230#211#194#255#206#169#135#255#182'}f'#255#217#188 - +#162#255#224#199#178#255#189#137'f'#255#195#148'i'#255#190#138'f'#255#220#193 - +#169#255#247#241#235#170#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#232#215#200#255#222#196#174#255#211#178#148#255#232#215 - +#200#255#197#151'p'#255#191#142'f'#255#193#145'f'#255#191#142'f'#255#199#155 - +'t'#255#231#213#197#255#193#146'j'#255#191#142'g'#255#198#155't'#255#229#209 - ,#192#255#192#144'f'#255#192#145'f'#255#190#141'f'#255#202#162#127#255#246#240 - +#235#170#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#251#248#246 - +#0#207#171#139#255#216#184#157#255#206#169#136#255#216#187#160#255#222#196 - +#175#255#187#136'f'#255#193#146'h'#255#189#138'f'#255#208#172#141#255#222#199 - +#178#255#188#138'g'#255#191#143'g'#255#199#158'x'#255#227#204#185#255#190#141 - +'f'#255#192#144'f'#255#192#143'f'#255#191#143'f'#255#240#230#222#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#244#237#231#255#188#138'g' - +#255#214#184#159#255#214#181#154#255#189#140'f'#255#235#220#207#255#193#146 - +'j'#255#191#143'f'#255#188#138'f'#255#205#167#134#255#221#196#175#255#181'~f' - +#255#187#137'f'#255#199#158'y'#255#221#195#173#255#186#135'f'#255#192#145'g' - +#255#191#143'f'#255#190#141'f'#255#226#205#184#255#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#223#200#179#255#184#132'f'#255#217#187#162#255 - +#219#194#171#255#215#186#162#255#236#222#210#255#197#155'u'#255#189#140'f' - +#255#190#141'f'#255#196#152'p'#255#234#218#204#255#227#207#192#255#203#164 - +#132#255#199#158'{'#255#224#201#181#255#187#137'f'#255#191#144'g'#255#191#145 - +'g'#255#186#136'f'#255#211#180#151#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#245#239#232#255#209#176#147#255#183#131'f'#255#225#202#184#255#248#245 - +#241#255#255#255#255#255#231#215#200#255#190#143'j'#255#190#142'f'#255#190 - +#142'f'#255#189#141'g'#255#228#209#192#255#255#255#255#255#240#228#218#255 - +#237#224#214#255#226#206#189#255#186#135'f'#255#191#144'g'#255#190#144'g'#255 - +#186#136'f'#255#206#169#139#255#240#231#221#255#255#255#255#0#255#255#255#0 - +#240#229#219#255#203#166#133#255#182#131'f'#255#222#200#180#255#236#223#211 - +#255#208#174#148#255#193#149'm'#255#188#140'f'#255#190#143'f'#255#190#143'f' - +#255#188#141'f'#255#192#145'i'#255#206#170#139#255#202#164#135#255#216#188 - +#163#255#222#199#179#255#184#133'f'#255#190#144'g'#255#190#144'f'#255#186#137 - +'f'#255#204#168#136#255#240#230#220#255#255#255#255#0#255#255#255#0#244#237 - +#231#255#195#151'r'#255#185#136'f'#255#198#158'}'#255#232#217#202#255#187#138 - +'f'#255#187#138'f'#255#190#144'g'#255#189#141'f'#255#189#142'f'#255#189#142 - +'f'#255#189#141'f'#255#188#139'f'#255#180'~f'#255#221#197#177#255#214#185#160 - +#255#184#134'f'#255#189#143'g'#255#189#143'g'#255#186#136'f'#255#204#169#138 - +#255#245#237#231#255#255#255#255#0#255#255#255#0#244#237#229#255#201#164#132 - +#255#184#134'f'#255#186#137'f'#255#215#188#166#255#232#217#203#255#186#138'g' - +#255#185#137'f'#255#189#142'f'#255#189#143'g'#255#190#143'g'#255#190#143'h' - +#255#186#137'f'#255#192#148'p'#255#233#219#207#255#191#147'n'#255#188#141'h' - +#255#189#143'g'#255#189#142'g'#255#183#132'f'#255#214#185#160#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#230#213#199#255#196#156'|'#255 - +#185#136'f'#255#179#127'f'#255#216#188#165#255#228#209#192#255#194#152'{'#255 - +#185#137'f'#255#184#135'f'#255#183#134'f'#255#183#133'f'#255#192#148't'#255 - +#232#216#202#255#213#183#158#255#182#130'f'#255#184#134'f'#255#184#134'f'#255 - +#185#136'f'#255#204#167#137#255#244#236#229#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#241#233#225#255#218#192#172#255 - +#205#172#145#255#200#160#131#255#225#204#187#255#246#241#237#255#232#218#207 - +#255#212#182#158#255#206#173#148#255#214#186#165#255#240#230#220#255#255#255 - +#255#0#227#210#193#255#223#199#181#255#209#178#152#255#211#183#158#255#225 - +#204#189#255#242#233#226#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#252#250#248#0#255#255#255#0#246#240 - +#235#170#243#235#226#255#233#218#206#255#241#232#225#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#245#238 - +#232#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#245#238#232 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0 -]); -LazarusResources.Add('tlrsqlquery','BMP',[ - 'BM'#138#9#0#0#0#0#0#0#138#0#0#0'|'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0 - +#9#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0 - +#0#255#1#0#0#0#0#0#0#0#0#0#0#0'T'#184#30#252#0#0#0#0#0#0#0#0'fff'#252#0#0#0#0 - +#0#0#0#0#196#245'('#255#0#0#0#0#0#0#0#0#0#0#0#0#4#0#0#0#0#0#0#0#0#0#0#0#0#0#0 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#238#204#183#255'l? '#255'l?' - +' '#255'l? '#255'l? '#255'l? '#255'l? '#255'l? '#255'l? '#255'l? '#255'l? ' - +#255'l? '#255'l? '#255'l? '#255'l? '#255'l? '#255'l? '#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#238#204#183#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155 - +'s'#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155 - +'s'#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155 - +'s'#255#223#155's'#255'l? '#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#238#204#183#255#223#155 - +'s'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#205#175#255#223 - +#155's'#255#223#155's'#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#223#155's'#255#255#255#255#255#255#255#255#255#255#255#255#255#223#155's' - +#255'l? '#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#238#204#183#255#223#155's'#255#223#155's' - +#255#223#155's'#255#223#155's'#255#255#255#255#255#223#155's'#255#255#255#255 - +#255#223#155's'#255#255#255#255#255#255#255#255#255#223#155's'#255#255#255 - +#255#255#223#155's'#255#223#155's'#255#223#155's'#255'l? '#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#238#204#183#255#223#155's'#255#255#205#175#255#255#255#255#255#255 - +#255#255#255#255#205#175#255#223#155's'#255#255#255#255#255#223#155's'#255 - +#223#155's'#255#255#255#255#255#223#155's'#255#255#255#255#255#223#155's'#255 - +#223#155's'#255#223#155's'#255'l? '#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#238#204#183 - +#255#223#155's'#255#255#255#255#255#223#155's'#255#223#155's'#255#223#155's' - +#255#223#155's'#255#255#255#255#255#223#155's'#255#223#155's'#255#255#255#255 - +#255#223#155's'#255#255#255#255#255#223#155's'#255#223#155's'#255#223#155's' - +#255'l? '#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#238#204#183#255#223#155's'#255#255#205#175 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#223#155's'#255#223#155 - +'s'#255#255#255#255#255#255#255#255#255#223#155's'#255#223#155's'#255#255#255 - +#255#255#223#155's'#255#223#155's'#255#223#155's'#255'l? '#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#238#204#183#255#223#155's'#255#223#155's'#255#223#155's'#255#223 - +#155's'#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155's'#255#0#0 - +#172#255#0#0#172#255#0#0#172#255#223#155's'#255#223#155's'#255#223#155's'#255 - +#223#155's'#255'l? '#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#230#194#167#255#196'vB'#255#238#204#183#255#238#204#183 - +#255#238#204#183#255#238#204#183#255#238#204#183#255#238#204#183#255#238#204 - +#183#255#238#204#183#255#238#204#183#255#0#0#172#255#0#0#172#255#0#0#172#255 - +#238#204#183#255#238#204#183#255#238#204#183#255#238#204#183#255#238#204#183 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#230#194#167#255#197'xE'#255 - +#196'vB'#255#236#209#189#255#255#255#255#255#243#225#211#255#236#209#189#255 - +#230#194#167#255#223#178#145#255#196'vB'#255#196'vB'#255#236#209#189#255#255 - +#255#255#0#0#0#172#255#0#0#172#255#0#0#172#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#197'xE'#255#217#163'{'#255#223#178#145#255#236#209#189#255#255#255 - +#255#255#243#225#211#255#236#209#189#255#230#194#167#255#223#178#145#255#217 - +#163'{'#255#214#155'p'#255#196'vB'#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#210#147'd'#255#217 - +#163'{'#255#223#178#145#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255 - +#196'vB'#255#196'vB'#255#217#163'{'#255#214#155'p'#255#210#147'd'#255#255#255 - +#255#0#0#0#172#255#0#0#172#255#0#0#172#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#210#147'd'#255#197'xE'#255#196'vB'#255#236#209#189#255#255#255#255#255 - ,#243#225#211#255#236#209#189#255#230#194#167#255#223#178#145#255#196'vB'#255 - +#196'vB'#255#210#147'd'#255#255#255#255#0#0#0#172#255#0#0#172#255#0#0#172#255 - +#218#218#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#196'vB'#255#217#163'{'#255#223#178#145 - +#255#236#209#189#255#255#255#255#255#243#225#211#255#236#209#189#255#230#194 - +#167#255#223#178#145#255#217#163'{'#255#214#155'p'#255#196'vB'#255#255#255 - +#255#0#218#218#255#255#0#0#172#255#0#0#172#255#0#0#172#255#218#218#255#255 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#210#147'd'#255#217#163'{'#255#223#178#145#255#196'vB'#255#196'vB' - +#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#217#163'{'#255#214#155 - +'p'#255#210#147'd'#255#255#255#255#0#255#255#255#0#218#218#255#255#0#0#172 - +#255#0#0#172#255#0#0#172#255#218#218#255#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#210#147'd'#255#197'xE'#255#196'vB'#255 - +#236#209#189#255#255#255#255#255#243#225#211#255#236#209#189#255#230#194#167 - +#255#223#178#145#255#196'vB'#255#196'vB'#255#210#147'd'#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#218#218#255#255#0#0#172#255#0#0#172#255#0#0#172#255 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#196'v' - +'B'#255#217#163'{'#255#223#178#145#255#236#209#189#255#255#255#255#255#243 - +#225#211#255#236#209#189#255#230#194#167#255#223#178#145#255#217#163'{'#255#0 - +#0#172#255#0#0#172#255#0#0#172#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#0#0#172#255#0#0#172#255#0#0#172#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#210#147'd'#255#217#163'{'#255#223#178#145#255 - +#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#217 - +#163'{'#255#0#0#172#255#0#0#172#255#0#0#172#255#218#218#255#255#255#255#255#0 - +#218#218#255#255#0#0#172#255#0#0#172#255#0#0#172#255#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#210#147'd'#255#196'vB'#255 - +#196'vB'#255#230#194#167#255#236#209#189#255#230#194#167#255#223#178#145#255 - +#217#163'{'#255#214#155'p'#255#196'vB'#255#193#193#255#255#0#0#172#255#0#0 - +#172#255#0#0#172#255#0#0#172#255#0#0#172#255#0#0#172#255#0#0#172#255#218#218 - +#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255 - +#0#196'vB'#255#214#155'p'#255#223#178#145#255#236#209#189#255#243#225#211#255 - +#236#209#189#255#230#194#167#255#223#178#145#255#217#163'{'#255#214#155'p' - +#255#210#147'd'#255#193#193#255#255#0#0#172#255#0#0#172#255#0#0#172#255#0#0 - +#172#255#0#0#172#255#218#218#255#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#230#194#167#255#196'vB'#255#196 - +'vB'#255#243#225#211#255#255#255#255#255#243#225#211#255#236#209#189#255#230 - +#194#167#255#223#178#145#255#196'vB'#255#196'vB'#255#230#194#167#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#230#194#167#255#196'vB'#255#196'vB' - +#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#230#194#167#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlribconnection','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#254#254#254#0#255#255#255#0#254#254#254#0 - +#252#252#253#0#255#255#255#0#246#245#254#0#246#244#250#0#236#235#251'f'#133 - +'{'#233#255'F4'#221#255'>*'#220#255'N='#222#255'uh'#229#255#194#190#244#255 - +#254#253#254#0#255#255#254#0#253#253#253#0#254#254#254#0#255#255#255#0#254 - +#254#254#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#254#254#254#0#253#253#254#0#255#255#255#0#190#190#247#255#134#129#208 - +#255#152#156#214#255'=A'#222#255'"%'#217#255'*-'#218#255'*-'#219#255'),'#219 - +#255'(+'#218#255'"$'#217#255'RV'#226#255#188#191#243#255#254#254#254#0#254 - +#254#254#0#253#253#254#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#252#252#254#0#253#253#254#0#254#254#254#0#162#171#244 - +#255':A'#202#255#143#150#201#255'=R'#228#255'#;'#221#255'+B'#219#255'*A'#220 - +#255'*A'#220#255'*A'#220#255'*A'#220#255'*B'#220#255'#:'#218#255'%;'#219#255 - +#151#163#237#255#250#251#254#0#253#253#254#0#253#253#254#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#252#252#254#0#255#255#255#0#167#180 - +#238#255#24'8'#226#255'z'#135#198#255't'#138#222#255'!H'#225#255'*P'#220#255 - +')N'#221#255')O'#221#255')N'#221#255')N'#221#255')O'#221#255')N'#221#255',Q' - +#221#255')N'#221#255#30'E'#219#255#151#170#238#255#254#254#254#0#253#253#254 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#202 - +#212#244#255'.['#231#255'(Q'#205#255#158#172#207#255';l'#232#255'%Z'#222#255 - +'''\'#223#255'(\'#223#255'(\'#223#255'(\'#223#255')]'#224#255''']'#227#255'(' - +']'#226#255'*]'#224#255'+^'#222#255'&['#223#255'''Z'#223#255#192#208#246#255 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#243 - +#246#250#0'i'#147#237#255#15'N'#217#255#146#165#204#255#188#205#234#255')j' - +#229#255'$e'#224#255'''g'#225#255'''g'#224#255'''f'#223#255'%g'#224#255'"f' - +#227#255')g'#223#255'$e'#222#255#29'b'#226#255'$h'#229#255'+j'#223#255#30'a' - +#225#255'Y'#137#228#255#253#254#253#0#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#193#212#244#255'#m'#234#255'M|'#200#255#239#234#225#255#164 - +#201#254#255'$o'#224#255'$q'#226#255'&r'#226#255'&q'#225#255'%r'#228#255'%p' - +#227#255'_'#134#195#255#163#174#190#255#144#165#197#255'_'#140#209#255')q' - +#219#255#31'q'#233#255'(t'#226#255'!o'#226#255#200#208#219#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0'x'#177#250#255'#s'#217#255#161#179 - +#203#255#255#255#255#255#165#203#248#255'"~'#232#255'!z'#224#255'#}'#228#255 - +'#|'#226#255' |'#231#255'-'#127#222#255#201#206#210#255#255#255#255#255#255 - +#255#255#255#255#249#239#255#173#189#205#255'5~'#213#255#28'{'#231#255'"'#128 - +#238#255'z'#154#189#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255 - +#0':'#148#240#255'E'#141#213#255#234#228#221#255#254#254#254#255#230#239#247 - +#255'8'#141#221#255#27#135#237#255'#'#134#227#255'$'#134#228#255'#'#134#228 - +#255#29#131#227#255't'#179#239#255#246#249#252#255#249#250#251#255#250#253 - +#255#255#255#255#254#255#179#200#219#255'('#136#227#255'!'#137#238#255'M'#140 - +#200#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'!'#136#223 - +#255'l'#160#204#255#255#255#254#255#251#252#253#255#255#255#253#255#183#200 - +#213#255'+'#140#216#255#24#145#239#255#25#143#232#255' '#143#229#255#29#143 - +#230#255#24#141#231#255#168#211#245#255#255#255#254#255#249#251#253#255#251 - +#252#254#255#252#254#255#255'_'#174#234#255#17#139#232#255'4'#145#216#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'%'#148#223#255#138#174 - +#199#255#254#254#255#255#251#251#252#255#253#254#254#255#255#255#253#255#216 - +#220#221#255'q'#161#191#255'/'#152#220#255#26#152#233#255#30#153#230#255#17 - +#151#236#255'P'#166#220#255#237#238#239#255#254#254#254#255#247#250#252#255 - +#255#255#255#255#146#206#244#255#19#151#233#255'0'#152#215#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0':'#167#225#255#142#179#198#255#254 - +#254#254#255#251#251#252#255#254#254#254#255#255#255#253#255#255#255#255#255 - +#255#255#255#255#210#220#224#255''''#165#230#255#23#158#230#255#29#169#244 - +#255'#'#152#212#255#207#221#228#255#255#255#254#255#247#250#253#255#254#254 - +#254#255#173#220#245#255#30#168#240#255'D'#153#197#255#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0'_'#187#230#255'w'#179#206#255#255#255#255 - +#255#250#252#253#255#254#255#255#255#181#233#254#255't'#204#242#255#182#229 - +#249#255#135#214#247#255#31#172#234#255#24#170#236#255#9#170#239#255'G'#157 - +#195#255#235#234#233#255#254#255#255#255#249#251#252#255#255#255#254#255#184 - +#227#246#255' '#181#248#255'q'#161#181#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#165#227#250#255'T'#189#228#255#249#241#238#255#253 - +#254#254#255#255#254#253#255'~'#194#218#255#0#171#237#255#26#184#241#255#15 - ,#176#236#255#15#178#237#255#17#178#236#255'M'#171#206#255#214#223#226#255#255 - +#255#253#255#253#254#254#255#250#252#253#255#254#254#255#255#170#228#249#255 - +#12#172#230#255#196#205#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#236#248#251#136'c'#199#228#255#174#225#241#255#255#255#254#255#250 - +#254#254#255#241#242#242#255#156#190#199#255'4'#182#220#255#29#175#218#255#24 - +#180#223#255'!'#174#215#255'z'#176#190#255#161#204#215#255#232#243#246#255 - +#254#254#254#255#248#252#254#255#255#254#251#255'd'#221#254#255'5'#162#193 - +#255#253#250#249#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#254#0#190#221#228#255'V'#201#230#255#242#255#255#255#255#253#252#255 - +#251#254#255#255#255#255#253#255#182#222#231#255'X'#178#199#255#159#186#193 - +#255#227#226#226#255#252#253#253#255#244#246#247#255#250#250#250#255#250#254 - +#254#255#255#254#252#255#208#250#255#255' '#184#221#255#180#207#212#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#252#253 - +#253#0#255#247#244#0#148#197#207#255'i'#218#238#255#247#255#255#255#255#253 - +#252#255#252#254#254#255#255#255#254#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#254#254#254#255#255#255#255#255#251#253#253#255#255#254#252#255 - +#235#255#255#255'<'#207#234#255#130#186#196#255#255#246#243#0#174#155#155#255 - +#174#155#155#255#159#136#136#255#255#255#255#0#255#255#255#0#252#253#253#0 - +#252#254#255#0#253#243#241#0#145#197#204#255't'#215#227#255#225#255#255#255 - +#255#255#255#255#254#254#255#255#252#254#254#255#253#253#253#255#254#254#254 - +#255#255#255#255#255#255#254#254#255#255#255#255#255#199#254#255#255'G'#203 - +#220#255'~'#186#194#255#198#185#185#255#174#155#155#255#174#155#155#255#174 - +#155#155#255#159#136#136#255#207#197#197#255#207#197#197#255#255#255#255#0 - +#253#253#253#0#253#255#255#0#255#247#245#0#185#215#219#255#135#200#206#255 - +#180#240#246#255#244#254#254#255#254#254#254#255#253#254#254#255#253#254#254 - +#255#254#254#254#255#224#253#255#255#136#232#240#255'`'#185#194#255#173#207 - +#212#255#255#255#255#0#174#155#155#255#174#155#155#255#198#185#185#255#198 - +#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255#254#254#254#0 - +#255#255#255#0#253#253#253#0#254#255#255#0#255#255#255#0#225#232#233#255#177 - +#206#209#255#171#207#209#255#171#207#209#255#171#207#209#255#171#207#209#255 - +#171#207#209#255#129#187#190#255#151#196#200#255#223#229#229#255#255#255#254 - +#0#198#185#185#255#198#185#185#255#174#155#155#255#198#185#185#255#159#136 - +#136#255#159#136#136#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#225#232#233#255#225#232#233#255#225#232#233#255#225#232#233 - +#255#225#232#233#255#255#255#255#0#255#255#255#0#159#136#136#255#159#136#136 - +#255#159#136#136#255#174#155#155#255#198#185#185#255#159#136#136#255#159#136 - +#136#255#159#136#136#255#159#136#136#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#198#185#185#255#159#136 - +#136#255#159#136#136#255#159#136#136#255#159#136#136#255#207#197#197#255#207 - +#197#197#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#159#136#136#255#159#136 - +#136#255#159#136#136#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0 -]); -LazarusResources.Add('tlrmssqlconnection','BMP',[ - 'BM'#138#9#0#0#0#0#0#0#138#0#0#0'|'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0 - +#9#0#0#195#14#0#0#195#14#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0 - +#0#0#255#1#0#0#0#0#0#0#0#0#0#0#0'T'#184#30#252#0#0#0#0#0#0#0#0'fff'#252#0#0#0 - +#0#0#0#0#0#196#245'('#255#0#0#0#0#0#0#0#0#0#0#0#0#4#0#0#0#0#0#0#0#0#0#0#0#0#0 - +#0#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#9#0#235#227 - +#9#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#255#255#255#0#9#0#235#227#9 - +#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#255#255#255#0#9#0 - +#235#227#9#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9 - +#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235 - +#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#9#0#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9#0#235#227#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9 - +#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255 - +#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9 - +#0#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#9#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#9#0#235#227#9#0 - +#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#9#0#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9#0#235 - +#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235#227#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9#0#235 - +#227#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#9#0#235#227#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#9#0#235#227#255#255#255#0#9#0#235#227#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#9#0#235#227#9#0#235#227#9#0#235#227#9#0 - +#235#227#9#0#235#227#9#0#235#227#255#255#255#0#9#0#235#227#9#0#235#227#9#0 - +#235#227#9#0#235#227#9#0#235#227#9#0#235#227#255#255#255#0#9#0#235#227#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - ,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#0#0#0#255#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0 - +#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#0#0#0#255#255#255#255#0#255#255#255#0#0#0#0#255#255#255#255#0#255#255 - +#255#0#0#0#0#255#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0 - +#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#0#0#0#255#255#255#255#0#0#0#0#255#255#255#255#0#0#0#0#255#255#255#255 - +#0#0#0#0#255#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#0#0#0#255#0#0#0#255#255#255#255#0#0#0#0#255#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#255#255#255#0#255#255 - +#255#0#255#255#255#0#0#0#0#255#0#0#0#255#255#255#255#0#0#0#0#255#0#0#0#255#0 - +#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0 -]); -LazarusResources.Add('tlrmysqlconnection','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#253 - +#253#253#0#255#255#255#0#252#252#252#0#255#255#253#0#236#233#236#170#191#167 - +#160#255#243#221#206#255#237#218#204#255#240#222#212#255#233#206#189#255#235 - +#209#192#255#236#216#204#255#245#230#220#255#255#255#255#255#200#185#184#255 - +#166#145#145#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#253#253 - +#253#0#253#252#252#0#250#248#250#0#182#162#160#255#226#200#184#255#238#215 - +#201#255#238#219#206#255#237#214#200#255#230#200#178#255#232#208#191#255#245 - +#225#210#255#232#218#208#255#162#139#137#255#177#159#159#255#247#246#246#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#253#253#253#0#253#253#253#0#251#251#251#0#255#255 - +#255#0#183#167#167#255#203#174#160#255#241#215#197#255#233#210#195#255#238 - +#218#204#255#231#201#181#255#229#196#175#255#240#214#196#255#222#202#190#255 - +#146'yx'#255#196#183#183#255#255#255#255#0#252#252#252#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#253#253 - +#253#0#255#255#255#0#251#251#251#0#255#255#255#0#204#194#196#255#177#146#136 - +#255#241#212#191#255#231#204#188#255#236#213#197#255#236#210#195#255#225#189 - +#166#255#231#200#180#255#232#208#192#255#131'gf'#255#195#182#183#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#253#253#253#0 - +#255#255#255#0#253#253#253#0#251#251#251#0#253#252#252#0#252#252#252#0#253 - +#253#253#0#231#226#227#255#161#133#128#255#232#200#178#255#231#202#183#255 - +#232#206#188#255#237#213#198#255#229#195#174#255#225#188#163#255#232#202#182 - +#255#230#206#190#255#182#159#154#255#163#141#139#255#162#140#140#255#178#161 - +#161#255#241#237#237'f'#255#255#255#0#253#253#253#0#255#255#255#0#253#253#253 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#252#252#252#0#251#252#252#0#166 - +#143#142#255#212#176#157#255#233#202#180#255#230#201#182#255#233#208#191#255 - +#233#206#189#255#222#182#155#255#226#191#169#255#231#202#183#255#235#212#196 - +#255#251#235#221#255#255#252#245#255#198#182#180#255#150#127#127#255#245#241 - +#241#0#255#255#255#0#255#255#255#0#253#253#253#0#253#252#252#0#248#247#247#0 - +#174#157#158#255#216#208#208#255#255#255#255#0#188#174#175#255#188#152#136 - +#255#236#201#176#255#227#196#176#255#232#202#183#255#235#209#194#255#224#185 - +#161#255#222#182#157#255#227#194#173#255#235#207#189#255#247#227#212#255#233 - +#218#207#255#183#163#160#255#188#171#171#255#251#251#251#0#255#255#255#0#255 - +#255#255#0#253#253#253#0#252#252#252#0#255#255#255#0#182#163#162#255#147'la' - +#255#188#171#170#255#227#222#225#255#166#133'{'#255#232#196#170#255#226#194 - +#171#255#230#198#178#255#233#207#190#255#227#195#173#255#219#175#147#255#224 - +#188#163#255#233#202#181#255#225#198#184#255#181#157#150#255#158#133#133#255 - +#201#189#189#255#255#255#255#0#253#253#253#0#253#253#253#0#255#255#255#0#252 - +#252#252#0#255#255#255#0#236#232#235#204#161#130'y'#255#221#177#149#255#153 - +#130#129#255#158#133#132#255#215#177#154#255#229#194#171#255#227#195#174#255 - +#232#203#185#255#231#202#183#255#219#174#145#255#221#181#154#255#232#197#174 - +#255#213#184#169#255#137'nn'#255#182#166#167#255#243#241#242#0#255#255#255#0 - +#253#253#253#0#253#253#253#0#255#255#255#0#255#255#255#0#252#251#251#0#255 - +#253#253#0#206#196#198#255#174#137'|'#255#235#195#166#255#137'lj'#255#175#141 - +#130#255#236#201#175#255#226#192#170#255#231#201#181#255#232#204#185#255#220 - +#177#149#255#220#176#147#255#224#187#163#255#237#206#184#255#155#128'{'#255 - +#208#198#200#255#255#255#255#0#255#255#255#0#252#252#252#0#255#255#255#0#255 - +#255#255#0#253#253#253#0#255#255#255#0#251#250#250#0#253#253#253#0#191#178 - +#180#255#183#146#130#255#235#197#169#255#210#176#157#255#220#185#166#255#230 - +#196#174#255#231#200#180#255#232#204#187#255#220#177#150#255#218#171#142#255 - +#222#184#159#255#233#201#177#255#204#175#161#255#159#137#139#255#255#255#255 - +#0#251#250#250#0#253#253#253#0#255#255#255#0#253#253#253#0#253#253#253#0#255 - +#255#255#0#255#255#255#0#251#251#251#0#255#255#255#0#195#182#183#255#183#149 - +#133#255#235#200#175#255#229#195#171#255#230#197#176#255#230#198#180#255#232 - +#206#188#255#221#180#153#255#216#169#140#255#222#183#157#255#225#189#167#255 - +#240#210#190#255#159#130#127#255#210#201#202#255#253#253#253#0#252#251#251#0 - +#255#255#255#0#253#253#253#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#252#252#252#0#255#255#255#0#220#214#215#255#173#143#134#255#237 - +#204#181#255#227#196#176#255#230#200#181#255#233#207#189#255#222#183#158#255 - +#216#169#139#255#222#182#155#255#225#189#166#255#235#204#183#255#213#185#171 - ,#255#150#127#127#255#251#251#251#0#253#253#253#0#253#253#253#0#253#253#253#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#253#253#253#0#253 - +#253#253#0#253#253#253#0#242#241#242#0#159#133#130#255#230#200#181#255#232 - +#203#184#255#233#209#192#255#227#192#170#255#218#170#141#255#222#182#157#255 - +#226#190#167#255#227#196#175#255#245#219#201#255#164#137#132#255#195#182#183 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#253#253#253#0#252#252#252#0#253 - +#253#253#0#233#230#231#255#147'xv'#255#232#206#188#255#235#210#194#255#232 - +#204#187#255#220#177#150#255#222#183#158#255#226#190#167#255#229#197#177#255 - +#237#210#192#255#222#200#187#255#147'zz'#255#247#245#245#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#252#251#251#0#255#255#255#0#183#167#168 - +#255#189#161#151#255#245#221#206#255#236#213#198#255#225#188#163#255#224#184 - +#159#255#227#194#171#255#230#200#181#255#231#204#188#255#250#230#214#255#159 - +#133#130#255#201#189#189#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#252#252#252#0#253#253#253#0#240#236#237'D'#161#136#133#255#238#216#201 - +#255#238#219#206#255#231#201#182#255#225#189#164#255#229#197#176#255#232#203 - +#184#255#232#206#190#255#251#231#216#255#190#167#160#255#160#140#140#255#255 - +#255#255#0#251#251#251#0#255#255#255#0#253#252#252#0#255#255#255#0#174#155 - +#155#255#174#155#155#255#159#136#136#255#255#255#255#0#255#255#255#0#250#248 - +#248#0#253#253#253#0#200#188#188#255#189#163#155#255#250#232#220#255#242#220 - +#204#255#231#197#176#255#231#201#182#255#233#207#189#255#232#208#194#255#251 - +#233#220#255#209#190#182#255#143'ww'#255#243#241#241#0#252#252#252#0#255#255 - +#255#0#255#255#255#0#198#185#185#255#174#155#155#255#174#155#155#255#174#155 - +#155#255#159#136#136#255#207#197#197#255#207#197#197#255#251#251#251#0#255 - +#255#255#0#167#145#145#255#222#203#194#255#250#233#222#255#196#169#157#255 - +#147'la'#255#238#214#197#255#235#213#200#255#253#238#225#255#208#189#183#255 - +#141'ss'#255#231#226#226#255#255#255#255#0#174#155#155#255#174#155#155#255 - +#174#155#155#255#174#155#155#255#174#155#155#255#198#185#185#255#198#185#185 - +#255#159#136#136#255#159#136#136#255#159#136#136#255#255#255#255#0#219#212 - +#212#255#176#153#150#255#251#240#230#255#236#215#202#255#147'la'#255#196#169 - +#157#255#250#232#220#255#252#238#227#255#191#171#166#255#142'uu'#255#230#224 - +#224#255#255#255#255#0#198#185#185#255#198#185#185#255#198#185#185#255#198 - +#185#185#255#198#185#185#255#174#155#155#255#198#185#185#255#159#136#136#255 - +#159#136#136#255#255#255#255#0#255#255#255#0#243#241#241#0#166#144#144#255 - +#230#216#210#255#248#235#225#255#247#229#215#255#255#238#226#255#240#224#214 - +#255#213#195#189#255#161#137#135#255#162#141#141#255#242#240#240#0#255#255 - +#255#0#159#136#136#255#159#136#136#255#159#136#136#255#159#136#136#255#159 - +#136#136#255#159#136#136#255#174#155#155#255#198#185#185#255#159#136#136#255 - +#159#136#136#255#159#136#136#255#159#136#136#255#158#135#135#255#213#198#195 - +#255#255#255#250#255#237#222#213#255#190#168#163#255#158#133#131#255#154#131 - +#130#255#163#143#143#255#213#202#203#255#255#255#255#0#255#255#255#0#252#252 - +#252#0#255#255#255#0#253#253#253#0#253#253#253#0#255#255#255#0#255#255#255#0 - +#198#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255#159#136#136 - +#255#207#197#197#255#207#197#197#255#144'wv'#255#227#218#214#255#204#189#185 - +#255#152#128#128#255#169#151#151#255#216#208#208#255#243#241#241#0#255#255 - +#255#0#255#255#255#0#252#252#252#0#253#253#253#0#255#255#255#0#253#253#253#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#159#136#136#255#159#136#136#255#159#136#136#255#255#255#255#0#255 - +#255#255#0#189#175#175#255#139'oo'#255#132'hi'#255#213#203#203#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#251#250#250#0#251#250#250#0#253#253#253#0 - +#253#253#253#0#253#253#253#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlrodbcconnection','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#174#155#155#255#174#155#155#255#159 - +#136#136#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#198#185#185#255#174#155 - +#155#255#174#155#155#255#174#155#155#255#159#136#136#255#207#197#197#255#207 - +#197#197#255#255#255#255#0#255#255#255#0#214#187#171#255#200#163#140#255#176 - +'Y '#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#176 - +'Y '#255#200#163#140#255#214#187#171#255#232#217#208#255#255#255#255#0#174 - +#155#155#255#174#155#155#255#174#155#155#255#174#155#155#255#198#185#185#255 - +#198#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255#255#255#255 - +#0#214#187#171#255#176'Y '#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4' - +#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#176 - +'Y '#255#186'rB'#255#232#217#208#255#255#255#255#0#198#185#185#255#198#185 - +#185#255#174#155#155#255#198#185#185#255#159#136#136#255#159#136#136#255#255 - +#255#255#0#255#255#255#0#232#217#208#255#176'Y '#255#130'4'#0#255#214#187#171 - +#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#232#217#208#255#200#163#140#255#186'rB'#255#130'4'#0#255#176 - +'Y '#255#200#163#140#255#159#136#136#255#159#136#136#255#174#155#155#255#198 - +#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255#159#136#136#255 - +#232#217#208#255#130'4'#0#255#214#187#171#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#232#217#208#255#200#163#140#255#130'4'#0 - +#255#176'Y '#255#198#185#185#255#159#136#136#255#159#136#136#255#159#136#136 - +#255#159#136#136#255#207#197#197#255#207#197#197#255#232#217#208#255#130'4'#0 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#232#217#208#255#200#163#140#255#130'4' - +#0#255#232#217#208#255#159#136#136#255#159#136#136#255#159#136#136#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#186#186#248#255#0#0#172#255#0#0#172#255#0#0#172#255#186#186#248#255#255#255 - +#255#0#201#201#201#255'==='#255'==='#255'==='#255'==='#255#255#255#255#0'===' - +#255'==='#255'==='#255'==='#255#201#201#201#255#255#255#255#0#186#186#248#255 - +#0#0#172#255#0#0#172#255'xx'#241#255#255#255#255#0#255#255#255#0#0#0#172#255 - +#0#0#172#255#255#255#255#0#0#0#172#255#0#0#172#255#255#255#255#0'==='#255'==' - +'='#255#255#255#255#0'==='#255'==='#255#255#255#255#0'==='#255'==='#255#255 - +#255#255#0'==='#255'==='#255#255#255#255#0#0#0#172#255#0#0#172#255#255#255 - +#255#0#0#0#172#255#255#255#255#0#255#255#255#0#0#0#172#255#0#0#172#255#255 - +#255#255#0#0#0#172#255#0#0#172#255#255#255#255#0'==='#255'==='#255#255#255 - +#255#0'==='#255'==='#255#255#255#255#0'==='#255'==='#255#255#255#255#0'===' - +#255'==='#255#255#255#255#0#0#0#172#255#0#0#172#255#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#0#0#172#255#0#0#172#255#255#255#255#0#0#0#172 - +#255#0#0#172#255#255#255#255#0'==='#255'==='#255#255#255#255#0'==='#255'===' - +#255#255#255#255#0'==='#255'==='#255#255#255#255#0'==='#255'==='#255#255#255 - +#255#0#0#0#172#255#0#0#172#255#255#255#255#0#0#0#172#255#255#255#255#0#255 - +#255#255#0#186#186#248#255#0#0#172#255#0#0#172#255#0#0#172#255#186#186#248 - +#255#255#255#255#0#201#201#201#255'==='#255'==='#255'==='#255'==='#255#255 - +#255#255#0'==='#255'==='#255'==='#255'==='#255#201#201#201#255#255#255#255#0 - +#186#186#248#255#0#0#172#255#0#0#172#255'xx'#241#255#255#255#255#0#255#255 - ,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'==='#255'==='#255 - +#255#255#255#0'==='#255'==='#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#232#217#208#255#200#163 - +#140#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0'==='#255'==='#255#255#255#255#0'==='#255'==='#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#214#187 - +#171#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#232#217#208#255#130'4'#0#255#232#217#208#255#255#255#255 - +#0#255#255#255#0#255#255#255#0'==='#255'==='#255#255#255#255#0'==='#255'===' - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#232#217#208#255#200#163#140#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#232#217#208#255#130 - +'4'#0#255#200#163#140#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#130'4' - +#0#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#232#217#208#255#176'Y '#255#130'4'#0#255#200 - +#163#140#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#214#187#171#255#130'4'#0#255#232#217#208#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#232#217#208#255#200#163#140#255#176'Y '#255#130'4'#0#255#186'rB' - +#255#200#163#140#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#232#217#208#255#214#187#171#255#130'4'#0#255 - +#176'Y '#255#232#217#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#232#217#208#255#186'rB'#255#176'Y '#255#130'4'#0#255#130'4'#0#255#130 - +'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0#255 - +#130'4'#0#255#176'Y '#255#214#187#171#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#232#217#208#255#214#187#171#255 - +#200#163#140#255#176'Y '#255#130'4'#0#255#130'4'#0#255#130'4'#0#255#130'4'#0 - +#255#130'4'#0#255#176'Y '#255#200#163#140#255#214#187#171#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0 -]); -LazarusResources.Add('tlroracleconnection','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#205#205#255#255'OO'#255#255#131#134#255#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#205#205#255#255'MM'#255#255'ee'#255#255'}}'#255#255 - +#153#153#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#129#132#255#255'MM' - +#255#255'ss'#255#255'55'#255#255#157#157#255#255'uu'#255#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#205#205#255 - +#255'kk'#255#255'SS'#255#255'++'#255#255'55'#255#255#155#155#255#255'!!'#255 - +#255#165#165#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#205#205#255#255'SS'#255#255'__'#255#255#179#179#255#255#19#19#255#255 - +'11'#255#255'!!'#255#255#161#161#255#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#205#205#255#255'UU'#255#255']]'#255#255#205#205#255 - +#255#255#255#255#0#193#193#255#255#161#161#255#255#189#189#255#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#205#205#255#255#149#149 - +#255#255#31#31#255#255#133#133#255#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#205#205#255#255'YY'#255#255'[['#255#255#183#183#255#255'##'#255#255 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#207#207#255#255']]'#255#255'YY'#255#255#203#203 - +#255#255#255#255#255#0#181#181#255#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#207#207#255#255#157#157 - +#255#255'##'#255#255#201#201#255#255#255#255#255#0#179#179#255#255'--'#255 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#171#171#255#255'--'#255#255#31#31#255#255#171#171#255 - +#255#171#171#255#255#31#31#255#255#155#155#255#255#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#203#203#255#255'SS'#255#255 - +#11#11#255#255#139#139#255#255'!!'#255#255'##'#255#255#155#155#255#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#203 - +#203#255#255'yy'#255#255'UU'#255#255'))'#255#255#175#175#255#255#207#207#255 - +#255#207#207#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#207#207#255#255#139#139#255#255#23#23#255#255'##'#255#255'ee'#255#255 - ,'55'#255#255#129#129#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0'qq'#255#255#157#157#255#255#193 - +#193#255#255#161#161#255#255'qq'#255#255'AA'#255#255#159#159#255#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0'55'#255#255'//'#255#255'!!'#255#255#161#161#255#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#147#147#255#255#199#199#255#255'++'#255#255'mm'#255#255#133#133 - +#255#255'GG'#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#174 - +#155#155#255#174#155#155#255#159#136#136#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#201#201#255#255'UU'#255#255'KK'#255 - +#255#143#143#255#255#185#185#255#255'%%'#255#255#149#149#255#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#198#185#185#255#174#155#155#255#174#155#155#255#174#155#155#255 - +#159#136#136#255#207#197#197#255#207#197#197#255#255#255#255#0#207#207#255 - +#255'ss'#255#255'!!'#255#255'11'#255#255';;'#255#255'EE'#255#255'%%'#255#255 - +#141#141#255#255#255#255#255#0#255#255#255#0#174#155#155#255#174#155#155#255 - +#174#155#155#255#174#155#155#255#174#155#155#255#174#155#155#255#174#155#155 - +#255#174#155#155#255#198#185#185#255#198#185#185#255#159#136#136#255#159#136 - +#136#255#159#136#136#255#255#255#255#0'oo'#255#255'GG'#255#255#187#187#255 - +#255'{{'#255#255'AA'#255#255'WW'#255#255#139#139#255#255#255#255#255#0#255 - +#255#255#0#198#185#185#255#198#185#185#255#198#185#185#255#198#185#185#255 - +#198#185#185#255#198#185#185#255#198#185#185#255#198#185#185#255#174#155#155 - +#255#198#185#185#255#159#136#136#255#159#136#136#255#255#255#255#0#255#255 - +#255#0'uu'#255#255'EE'#255#255#199#199#255#255#255#255#255#0#167#167#255#255 - +'55'#255#255#205#205#255#255#255#255#255#0#255#255#255#0#159#136#136#255#159 - +#136#136#255#159#136#136#255#159#136#136#255#159#136#136#255#159#136#136#255 - +#159#136#136#255#159#136#136#255#159#136#136#255#174#155#155#255#198#185#185 - +#255#159#136#136#255#159#136#136#255#159#136#136#255#159#136#136#255#27#27 - +#255#255#195#195#255#255#255#255#255#0#187#187#255#255'))'#255#255#143#143 - +#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#198#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255 - +#159#136#136#255#207#197#197#255#207#197#197#255'!!'#255#255#155#155#255#255 - +#181#181#255#255'))'#255#255#133#133#255#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#159#136#136#255#159#136#136#255#159#136#136#255#255#255#255#0 - +#255#255#255#0#169#169#255#255''''''#255#255'!!'#255#255#139#139#255#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlrpqconnection','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#250#246#241#0#233#214#195#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#174#155#155#255#174#155#155#255#159 - +#136#136#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#243#234#226 - +#255#217#183#153#255#214#178#148#255#224#196#170#255#241#230#219#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#198#185#185 - +#255#174#155#155#255#174#155#155#255#174#155#155#255#159#136#136#255#207#197 - +#197#255#207#197#197#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#251#249#246#0#209#168#130#255#194#138'f' - +#255#196#142'f'#255#195#141'f'#255#234#217#199#255#255#255#255#0#174#155#155 - +#255#174#155#155#255#174#155#155#255#174#155#155#255#174#155#155#255#174#155 - +#155#255#198#185#185#255#198#185#185#255#159#136#136#255#159#136#136#255#159 - +#136#136#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#238#225#213#255#198#147'f'#255#199#149'g'#255#200#152'j' - +#255#193#139'f'#255#228#205#184#255#255#255#255#0#198#185#185#255#198#185#185 - +#255#198#185#185#255#198#185#185#255#198#185#185#255#174#155#155#255#198#185 - +#185#255#159#136#136#255#159#136#136#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#251#249#246#0 - +#228#208#187#255#197#148'g'#255#196#147'f'#255#197#149'g'#255#193#140'f'#255 - +#223#197#174#255#255#255#255#0#159#136#136#255#159#136#136#255#159#136#136 - +#255#159#136#136#255#159#136#136#255#174#155#155#255#198#185#185#255#159#136 - +#136#255#159#136#136#255#159#136#136#255#159#136#136#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#226#203 - +#180#255#194#145'f'#255#196#148'f'#255#196#148'g'#255#192#140'f'#255#221#194 - +#168#255#237#223#210#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#198#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255#159 - +#136#136#255#207#197#197#255#207#197#197#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#242#233#222#255#255#255#255#0#218#186#157#255#192 - +#140'f'#255#196#147'g'#255#196#147'g'#255#191#138'f'#255#223#199#175#255#242 - +#231#221#255#230#209#190#255#232#213#196#255#240#231#220#255#255#255#255#0 - +#246#241#235#170#244#236#229#255#159#136#136#255#159#136#136#255#159#136#136 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#245#238#231#255#246#240#234 - +#204#228#207#187#255#217#187#165#255#241#231#222#255#215#184#155#255#190#137 - +'f'#255#195#148'g'#255#196#148'h'#255#189#136'f'#255#232#214#198#255#232#215 - +#199#255#210#175#141#255#230#211#193#255#228#207#187#255#240#229#217#255#213 - +#179#148#255#201#158'x'#255#241#231#222#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#230#212#195#255#245#238#232#255#238 - +#227#216#255#228#208#192#255#233#217#203#255#204#164#130#255#192#141'f'#255 - +#194#146'f'#255#195#146'f'#255#192#141'f'#255#210#173#141#255#238#226#214#255 - +#247#243#239#255#222#196#172#255#226#203#184#255#214#182#153#255#191#139'f' - +#255#190#138'f'#255#216#184#156#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#243#233#225#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#240#230#222#255#193#143'f'#255#193#145'f'#255#194#146'f'#255#194 - +#146'f'#255#194#147'g'#255#188#135'f'#255#217#188#161#255#233#217#204#255#219 - +#191#169#255#244#237#231#255#196#149'l'#255#193#144'f'#255#193#144'g'#255#194 - +#147'i'#255#240#229#220#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#245#239#232#255#233#216#202#255#242#232 - +#223#255#216#186#157#255#190#138'f'#255#194#146'f'#255#193#145'f'#255#193#145 - +'f'#255#191#141'f'#255#230#211#194#255#206#169#135#255#182'}f'#255#217#188 - +#162#255#224#199#178#255#189#137'f'#255#195#148'i'#255#190#138'f'#255#220#193 - +#169#255#247#241#235#170#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#232#215#200#255#222#196#174#255#211#178#148#255#232#215 - +#200#255#197#151'p'#255#191#142'f'#255#193#145'f'#255#191#142'f'#255#199#155 - +'t'#255#231#213#197#255#193#146'j'#255#191#142'g'#255#198#155't'#255#229#209 - ,#192#255#192#144'f'#255#192#145'f'#255#190#141'f'#255#202#162#127#255#246#240 - +#235#170#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#251#248#246 - +#0#207#171#139#255#216#184#157#255#206#169#136#255#216#187#160#255#222#196 - +#175#255#187#136'f'#255#193#146'h'#255#189#138'f'#255#208#172#141#255#222#199 - +#178#255#188#138'g'#255#191#143'g'#255#199#158'x'#255#227#204#185#255#190#141 - +'f'#255#192#144'f'#255#192#143'f'#255#191#143'f'#255#240#230#222#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#244#237#231#255#188#138'g' - +#255#214#184#159#255#214#181#154#255#189#140'f'#255#235#220#207#255#193#146 - +'j'#255#191#143'f'#255#188#138'f'#255#205#167#134#255#221#196#175#255#181'~f' - +#255#187#137'f'#255#199#158'y'#255#221#195#173#255#186#135'f'#255#192#145'g' - +#255#191#143'f'#255#190#141'f'#255#226#205#184#255#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#223#200#179#255#184#132'f'#255#217#187#162#255 - +#219#194#171#255#215#186#162#255#236#222#210#255#197#155'u'#255#189#140'f' - +#255#190#141'f'#255#196#152'p'#255#234#218#204#255#227#207#192#255#203#164 - +#132#255#199#158'{'#255#224#201#181#255#187#137'f'#255#191#144'g'#255#191#145 - +'g'#255#186#136'f'#255#211#180#151#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#245#239#232#255#209#176#147#255#183#131'f'#255#225#202#184#255#248#245 - +#241#255#255#255#255#255#231#215#200#255#190#143'j'#255#190#142'f'#255#190 - +#142'f'#255#189#141'g'#255#228#209#192#255#255#255#255#255#240#228#218#255 - +#237#224#214#255#226#206#189#255#186#135'f'#255#191#144'g'#255#190#144'g'#255 - +#186#136'f'#255#206#169#139#255#240#231#221#255#255#255#255#0#255#255#255#0 - +#240#229#219#255#203#166#133#255#182#131'f'#255#222#200#180#255#236#223#211 - +#255#208#174#148#255#193#149'm'#255#188#140'f'#255#190#143'f'#255#190#143'f' - +#255#188#141'f'#255#192#145'i'#255#206#170#139#255#202#164#135#255#216#188 - +#163#255#222#199#179#255#184#133'f'#255#190#144'g'#255#190#144'f'#255#186#137 - +'f'#255#204#168#136#255#240#230#220#255#255#255#255#0#255#255#255#0#244#237 - +#231#255#195#151'r'#255#185#136'f'#255#198#158'}'#255#232#217#202#255#187#138 - +'f'#255#187#138'f'#255#190#144'g'#255#189#141'f'#255#189#142'f'#255#189#142 - +'f'#255#189#141'f'#255#188#139'f'#255#180'~f'#255#221#197#177#255#214#185#160 - +#255#184#134'f'#255#189#143'g'#255#189#143'g'#255#186#136'f'#255#204#169#138 - +#255#245#237#231#255#255#255#255#0#255#255#255#0#244#237#229#255#201#164#132 - +#255#184#134'f'#255#186#137'f'#255#215#188#166#255#232#217#203#255#186#138'g' - +#255#185#137'f'#255#189#142'f'#255#189#143'g'#255#190#143'g'#255#190#143'h' - +#255#186#137'f'#255#192#148'p'#255#233#219#207#255#191#147'n'#255#188#141'h' - +#255#189#143'g'#255#189#142'g'#255#183#132'f'#255#214#185#160#255#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#230#213#199#255#196#156'|'#255 - +#185#136'f'#255#179#127'f'#255#216#188#165#255#228#209#192#255#194#152'{'#255 - +#185#137'f'#255#184#135'f'#255#183#134'f'#255#183#133'f'#255#192#148't'#255 - +#232#216#202#255#213#183#158#255#182#130'f'#255#184#134'f'#255#184#134'f'#255 - +#185#136'f'#255#204#167#137#255#244#236#229#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#241#233#225#255#218#192#172#255 - +#205#172#145#255#200#160#131#255#225#204#187#255#246#241#237#255#232#218#207 - +#255#212#182#158#255#206#173#148#255#214#186#165#255#240#230#220#255#255#255 - +#255#0#227#210#193#255#223#199#181#255#209#178#152#255#211#183#158#255#225 - +#204#189#255#242#233#226#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#252#250#248#0#255#255#255#0#246#240 - +#235#170#243#235#226#255#233#218#206#255#241#232#225#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#245#238 - +#232#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#245#238#232 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0 -]); -LazarusResources.Add('tlrsqlquery','BMP',[ - 'BM'#138#9#0#0#0#0#0#0#138#0#0#0'|'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0 - +#9#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0 - +#0#255#1#0#0#0#0#0#0#0#0#0#0#0'T'#184#30#252#0#0#0#0#0#0#0#0'fff'#252#0#0#0#0 - +#0#0#0#0#196#245'('#255#0#0#0#0#0#0#0#0#0#0#0#0#4#0#0#0#0#0#0#0#0#0#0#0#0#0#0 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#238#204#183#255'l? '#255'l?' - +' '#255'l? '#255'l? '#255'l? '#255'l? '#255'l? '#255'l? '#255'l? '#255'l? ' - +#255'l? '#255'l? '#255'l? '#255'l? '#255'l? '#255'l? '#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#238#204#183#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155 - +'s'#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155 - +'s'#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155 - +'s'#255#223#155's'#255'l? '#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#238#204#183#255#223#155 - +'s'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#205#175#255#223 - +#155's'#255#223#155's'#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#223#155's'#255#255#255#255#255#255#255#255#255#255#255#255#255#223#155's' - +#255'l? '#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#238#204#183#255#223#155's'#255#223#155's' - +#255#223#155's'#255#223#155's'#255#255#255#255#255#223#155's'#255#255#255#255 - +#255#223#155's'#255#255#255#255#255#255#255#255#255#223#155's'#255#255#255 - +#255#255#223#155's'#255#223#155's'#255#223#155's'#255'l? '#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#238#204#183#255#223#155's'#255#255#205#175#255#255#255#255#255#255 - +#255#255#255#255#205#175#255#223#155's'#255#255#255#255#255#223#155's'#255 - +#223#155's'#255#255#255#255#255#223#155's'#255#255#255#255#255#223#155's'#255 - +#223#155's'#255#223#155's'#255'l? '#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#238#204#183 - +#255#223#155's'#255#255#255#255#255#223#155's'#255#223#155's'#255#223#155's' - +#255#223#155's'#255#255#255#255#255#223#155's'#255#223#155's'#255#255#255#255 - +#255#223#155's'#255#255#255#255#255#223#155's'#255#223#155's'#255#223#155's' - +#255'l? '#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#238#204#183#255#223#155's'#255#255#205#175 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#223#155's'#255#223#155 - +'s'#255#255#255#255#255#255#255#255#255#223#155's'#255#223#155's'#255#255#255 - +#255#255#223#155's'#255#223#155's'#255#223#155's'#255'l? '#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#238#204#183#255#223#155's'#255#223#155's'#255#223#155's'#255#223 - +#155's'#255#223#155's'#255#223#155's'#255#223#155's'#255#223#155's'#255#0#0 - +#172#255#0#0#172#255#0#0#172#255#223#155's'#255#223#155's'#255#223#155's'#255 - +#223#155's'#255'l? '#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#230#194#167#255#196'vB'#255#238#204#183#255#238#204#183 - +#255#238#204#183#255#238#204#183#255#238#204#183#255#238#204#183#255#238#204 - +#183#255#238#204#183#255#238#204#183#255#0#0#172#255#0#0#172#255#0#0#172#255 - +#238#204#183#255#238#204#183#255#238#204#183#255#238#204#183#255#238#204#183 - +#255#255#255#255#0#255#255#255#0#255#255#255#0#230#194#167#255#197'xE'#255 - +#196'vB'#255#236#209#189#255#255#255#255#255#243#225#211#255#236#209#189#255 - +#230#194#167#255#223#178#145#255#196'vB'#255#196'vB'#255#236#209#189#255#255 - +#255#255#0#0#0#172#255#0#0#172#255#0#0#172#255#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#197'xE'#255#217#163'{'#255#223#178#145#255#236#209#189#255#255#255 - +#255#255#243#225#211#255#236#209#189#255#230#194#167#255#223#178#145#255#217 - +#163'{'#255#214#155'p'#255#196'vB'#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#210#147'd'#255#217 - +#163'{'#255#223#178#145#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255 - +#196'vB'#255#196'vB'#255#217#163'{'#255#214#155'p'#255#210#147'd'#255#255#255 - +#255#0#0#0#172#255#0#0#172#255#0#0#172#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#210#147'd'#255#197'xE'#255#196'vB'#255#236#209#189#255#255#255#255#255 - ,#243#225#211#255#236#209#189#255#230#194#167#255#223#178#145#255#196'vB'#255 - +#196'vB'#255#210#147'd'#255#255#255#255#0#0#0#172#255#0#0#172#255#0#0#172#255 - +#218#218#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#196'vB'#255#217#163'{'#255#223#178#145 - +#255#236#209#189#255#255#255#255#255#243#225#211#255#236#209#189#255#230#194 - +#167#255#223#178#145#255#217#163'{'#255#214#155'p'#255#196'vB'#255#255#255 - +#255#0#218#218#255#255#0#0#172#255#0#0#172#255#0#0#172#255#218#218#255#255 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#210#147'd'#255#217#163'{'#255#223#178#145#255#196'vB'#255#196'vB' - +#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#217#163'{'#255#214#155 - +'p'#255#210#147'd'#255#255#255#255#0#255#255#255#0#218#218#255#255#0#0#172 - +#255#0#0#172#255#0#0#172#255#218#218#255#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#210#147'd'#255#197'xE'#255#196'vB'#255 - +#236#209#189#255#255#255#255#255#243#225#211#255#236#209#189#255#230#194#167 - +#255#223#178#145#255#196'vB'#255#196'vB'#255#210#147'd'#255#255#255#255#0#255 - +#255#255#0#255#255#255#0#218#218#255#255#0#0#172#255#0#0#172#255#0#0#172#255 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#196'v' - +'B'#255#217#163'{'#255#223#178#145#255#236#209#189#255#255#255#255#255#243 - +#225#211#255#236#209#189#255#230#194#167#255#223#178#145#255#217#163'{'#255#0 - +#0#172#255#0#0#172#255#0#0#172#255#255#255#255#0#255#255#255#0#255#255#255#0 - +#0#0#172#255#0#0#172#255#0#0#172#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#210#147'd'#255#217#163'{'#255#223#178#145#255 - +#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#217 - +#163'{'#255#0#0#172#255#0#0#172#255#0#0#172#255#218#218#255#255#255#255#255#0 - +#218#218#255#255#0#0#172#255#0#0#172#255#0#0#172#255#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#210#147'd'#255#196'vB'#255 - +#196'vB'#255#230#194#167#255#236#209#189#255#230#194#167#255#223#178#145#255 - +#217#163'{'#255#214#155'p'#255#196'vB'#255#193#193#255#255#0#0#172#255#0#0 - +#172#255#0#0#172#255#0#0#172#255#0#0#172#255#0#0#172#255#0#0#172#255#218#218 - +#255#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255 - +#0#196'vB'#255#214#155'p'#255#223#178#145#255#236#209#189#255#243#225#211#255 - +#236#209#189#255#230#194#167#255#223#178#145#255#217#163'{'#255#214#155'p' - +#255#210#147'd'#255#193#193#255#255#0#0#172#255#0#0#172#255#0#0#172#255#0#0 - +#172#255#0#0#172#255#218#218#255#255#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#230#194#167#255#196'vB'#255#196 - +'vB'#255#243#225#211#255#255#255#255#255#243#225#211#255#236#209#189#255#230 - +#194#167#255#223#178#145#255#196'vB'#255#196'vB'#255#230#194#167#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#230#194#167#255#196'vB'#255#196'vB' - +#255#196'vB'#255#196'vB'#255#196'vB'#255#196'vB'#255#230#194#167#255#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0 -]); -LazarusResources.Add('tlribconnection','BMP',[ - 'BMz'#9#0#0#0#0#0#0'z'#0#0#0'l'#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#3#0#0#0#0#9#0 - +#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#255#0#0#255#0#0#255#0#0#0#0#0#0 - +#255#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0 - +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#254#254#254#0#255#255#255#0#254#254#254#0 - +#252#252#253#0#255#255#255#0#246#245#254#0#246#244#250#0#236#235#251'f'#133 - +'{'#233#255'F4'#221#255'>*'#220#255'N='#222#255'uh'#229#255#194#190#244#255 - +#254#253#254#0#255#255#254#0#253#253#253#0#254#254#254#0#255#255#255#0#254 - +#254#254#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#254#254#254#0#253#253#254#0#255#255#255#0#190#190#247#255#134#129#208 - +#255#152#156#214#255'=A'#222#255'"%'#217#255'*-'#218#255'*-'#219#255'),'#219 - +#255'(+'#218#255'"$'#217#255'RV'#226#255#188#191#243#255#254#254#254#0#254 - +#254#254#0#253#253#254#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#252#252#254#0#253#253#254#0#254#254#254#0#162#171#244 - +#255':A'#202#255#143#150#201#255'=R'#228#255'#;'#221#255'+B'#219#255'*A'#220 - +#255'*A'#220#255'*A'#220#255'*A'#220#255'*B'#220#255'#:'#218#255'%;'#219#255 - +#151#163#237#255#250#251#254#0#253#253#254#0#253#253#254#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#252#252#254#0#255#255#255#0#167#180 - +#238#255#24'8'#226#255'z'#135#198#255't'#138#222#255'!H'#225#255'*P'#220#255 - +')N'#221#255')O'#221#255')N'#221#255')N'#221#255')O'#221#255')N'#221#255',Q' - +#221#255')N'#221#255#30'E'#219#255#151#170#238#255#254#254#254#0#253#253#254 - +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#202 - +#212#244#255'.['#231#255'(Q'#205#255#158#172#207#255';l'#232#255'%Z'#222#255 - +'''\'#223#255'(\'#223#255'(\'#223#255'(\'#223#255')]'#224#255''']'#227#255'(' - +']'#226#255'*]'#224#255'+^'#222#255'&['#223#255'''Z'#223#255#192#208#246#255 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#243 - +#246#250#0'i'#147#237#255#15'N'#217#255#146#165#204#255#188#205#234#255')j' - +#229#255'$e'#224#255'''g'#225#255'''g'#224#255'''f'#223#255'%g'#224#255'"f' - +#227#255')g'#223#255'$e'#222#255#29'b'#226#255'$h'#229#255'+j'#223#255#30'a' - +#225#255'Y'#137#228#255#253#254#253#0#255#255#255#0#255#255#255#0#255#255#255 - +#0#255#255#255#0#193#212#244#255'#m'#234#255'M|'#200#255#239#234#225#255#164 - +#201#254#255'$o'#224#255'$q'#226#255'&r'#226#255'&q'#225#255'%r'#228#255'%p' - +#227#255'_'#134#195#255#163#174#190#255#144#165#197#255'_'#140#209#255')q' - +#219#255#31'q'#233#255'(t'#226#255'!o'#226#255#200#208#219#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0'x'#177#250#255'#s'#217#255#161#179 - +#203#255#255#255#255#255#165#203#248#255'"~'#232#255'!z'#224#255'#}'#228#255 - +'#|'#226#255' |'#231#255'-'#127#222#255#201#206#210#255#255#255#255#255#255 - +#255#255#255#255#249#239#255#173#189#205#255'5~'#213#255#28'{'#231#255'"'#128 - +#238#255'z'#154#189#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255 - +#0':'#148#240#255'E'#141#213#255#234#228#221#255#254#254#254#255#230#239#247 - +#255'8'#141#221#255#27#135#237#255'#'#134#227#255'$'#134#228#255'#'#134#228 - +#255#29#131#227#255't'#179#239#255#246#249#252#255#249#250#251#255#250#253 - +#255#255#255#255#254#255#179#200#219#255'('#136#227#255'!'#137#238#255'M'#140 - +#200#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'!'#136#223 - +#255'l'#160#204#255#255#255#254#255#251#252#253#255#255#255#253#255#183#200 - +#213#255'+'#140#216#255#24#145#239#255#25#143#232#255' '#143#229#255#29#143 - +#230#255#24#141#231#255#168#211#245#255#255#255#254#255#249#251#253#255#251 - +#252#254#255#252#254#255#255'_'#174#234#255#17#139#232#255'4'#145#216#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'%'#148#223#255#138#174 - +#199#255#254#254#255#255#251#251#252#255#253#254#254#255#255#255#253#255#216 - +#220#221#255'q'#161#191#255'/'#152#220#255#26#152#233#255#30#153#230#255#17 - +#151#236#255'P'#166#220#255#237#238#239#255#254#254#254#255#247#250#252#255 - +#255#255#255#255#146#206#244#255#19#151#233#255'0'#152#215#255#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0':'#167#225#255#142#179#198#255#254 - +#254#254#255#251#251#252#255#254#254#254#255#255#255#253#255#255#255#255#255 - +#255#255#255#255#210#220#224#255''''#165#230#255#23#158#230#255#29#169#244 - +#255'#'#152#212#255#207#221#228#255#255#255#254#255#247#250#253#255#254#254 - +#254#255#173#220#245#255#30#168#240#255'D'#153#197#255#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0'_'#187#230#255'w'#179#206#255#255#255#255 - +#255#250#252#253#255#254#255#255#255#181#233#254#255't'#204#242#255#182#229 - +#249#255#135#214#247#255#31#172#234#255#24#170#236#255#9#170#239#255'G'#157 - +#195#255#235#234#233#255#254#255#255#255#249#251#252#255#255#255#254#255#184 - +#227#246#255' '#181#248#255'q'#161#181#255#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#165#227#250#255'T'#189#228#255#249#241#238#255#253 - +#254#254#255#255#254#253#255'~'#194#218#255#0#171#237#255#26#184#241#255#15 - ,#176#236#255#15#178#237#255#17#178#236#255'M'#171#206#255#214#223#226#255#255 - +#255#253#255#253#254#254#255#250#252#253#255#254#254#255#255#170#228#249#255 - +#12#172#230#255#196#205#208#255#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#236#248#251#136'c'#199#228#255#174#225#241#255#255#255#254#255#250 - +#254#254#255#241#242#242#255#156#190#199#255'4'#182#220#255#29#175#218#255#24 - +#180#223#255'!'#174#215#255'z'#176#190#255#161#204#215#255#232#243#246#255 - +#254#254#254#255#248#252#254#255#255#254#251#255'd'#221#254#255'5'#162#193 - +#255#253#250#249#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#254#0#190#221#228#255'V'#201#230#255#242#255#255#255#255#253#252#255 - +#251#254#255#255#255#255#253#255#182#222#231#255'X'#178#199#255#159#186#193 - +#255#227#226#226#255#252#253#253#255#244#246#247#255#250#250#250#255#250#254 - +#254#255#255#254#252#255#208#250#255#255' '#184#221#255#180#207#212#255#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#252#253 - +#253#0#255#247#244#0#148#197#207#255'i'#218#238#255#247#255#255#255#255#253 - +#252#255#252#254#254#255#255#255#254#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#254#254#254#255#255#255#255#255#251#253#253#255#255#254#252#255 - +#235#255#255#255'<'#207#234#255#130#186#196#255#255#246#243#0#174#155#155#255 - +#174#155#155#255#159#136#136#255#255#255#255#0#255#255#255#0#252#253#253#0 - +#252#254#255#0#253#243#241#0#145#197#204#255't'#215#227#255#225#255#255#255 - +#255#255#255#255#254#254#255#255#252#254#254#255#253#253#253#255#254#254#254 - +#255#255#255#255#255#255#254#254#255#255#255#255#255#199#254#255#255'G'#203 - +#220#255'~'#186#194#255#198#185#185#255#174#155#155#255#174#155#155#255#174 - +#155#155#255#159#136#136#255#207#197#197#255#207#197#197#255#255#255#255#0 - +#253#253#253#0#253#255#255#0#255#247#245#0#185#215#219#255#135#200#206#255 - +#180#240#246#255#244#254#254#255#254#254#254#255#253#254#254#255#253#254#254 - +#255#254#254#254#255#224#253#255#255#136#232#240#255'`'#185#194#255#173#207 - +#212#255#255#255#255#0#174#155#155#255#174#155#155#255#198#185#185#255#198 - +#185#185#255#159#136#136#255#159#136#136#255#159#136#136#255#254#254#254#0 - +#255#255#255#0#253#253#253#0#254#255#255#0#255#255#255#0#225#232#233#255#177 - +#206#209#255#171#207#209#255#171#207#209#255#171#207#209#255#171#207#209#255 - +#171#207#209#255#129#187#190#255#151#196#200#255#223#229#229#255#255#255#254 - +#0#198#185#185#255#198#185#185#255#174#155#155#255#198#185#185#255#159#136 - +#136#255#159#136#136#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#225#232#233#255#225#232#233#255#225#232#233#255#225#232#233 - +#255#225#232#233#255#255#255#255#0#255#255#255#0#159#136#136#255#159#136#136 - +#255#159#136#136#255#174#155#155#255#198#185#185#255#159#136#136#255#159#136 - +#136#255#159#136#136#255#159#136#136#255#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#198#185#185#255#159#136 - +#136#255#159#136#136#255#159#136#136#255#159#136#136#255#207#197#197#255#207 - +#197#197#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#159#136#136#255#159#136 - +#136#255#159#136#136#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 - +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 - +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 - +#255#255#255#0 -]); + diff --git a/components/lazreport/source/addons/TDbfDB/lr_tdbf.lpk b/components/lazreport/source/addons/TDbfDB/lr_tdbf.lpk index 301456bb50..654c18838a 100644 --- a/components/lazreport/source/addons/TDbfDB/lr_tdbf.lpk +++ b/components/lazreport/source/addons/TDbfDB/lr_tdbf.lpk @@ -2,6 +2,7 @@ + @@ -14,6 +15,9 @@ + + diff --git a/components/lazreport/source/addons/TDbfDB/lrtdbfdata.pas b/components/lazreport/source/addons/TDbfDB/lrtdbfdata.pas index 5637333094..6fa16bfe30 100644 --- a/components/lazreport/source/addons/TDbfDB/lrtdbfdata.pas +++ b/components/lazreport/source/addons/TDbfDB/lrtdbfdata.pas @@ -148,303 +148,4 @@ finalization if Assigned(lrBMP_TDbf) then FreeAndNil(lrBMP_TDbf); end. -unit lrTDbfData; -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, LResources, Graphics, LR_Class, LR_DBComponent, dbf; - -type - TlrTDbfData = class(TComponent) - end; - -type - - { TLRDbf } - - TLRDbf = class(TLRDataSetControl) - private - function GetFilePath: string; - function GetIndexName: string; - function GetShowDeleted: Boolean; - function GetTableName: string; - procedure SetFilePath(AValue: string); - procedure SetIndexName(AValue: string); - procedure SetShowDeleted(AValue: Boolean); - procedure SetTableName(AValue: string); - protected - procedure AfterLoad;override; - public - constructor Create(AOwnerPage:TfrPage); override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property ShowDeleted: Boolean read GetShowDeleted write SetShowDeleted; - property TableName: string read GetTableName write SetTableName; - property IndexName: string read GetIndexName write SetIndexName; - property FilePath: string read GetFilePath write SetFilePath; - end; - -procedure Register; - -implementation - -var - lrBMP_TDbf:TBitmap = nil; - -procedure InitLRComp; -begin - if not assigned(lrBMP_TDbf) then - begin - lrBMP_TDbf := TbitMap.Create; - lrBMP_TDbf.LoadFromLazarusResource('TLRDbf'); - frRegisterObject(TLRDbf, lrBMP_TDbf, 'TLRDbf', nil, otlUIControl, nil); - end; -end; - -procedure Register; -begin - RegisterComponents('LazReport',[TlrTDbfData]); -end; - -{ TLRDbf } - -procedure TLRDbf.SetIndexName(AValue: string); -begin - TDbf(DataSet).IndexName:=AValue -end; - -function TLRDbf.GetFilePath: string; -begin - Result:=TDbf(DataSet).FilePath; -end; - -function TLRDbf.GetIndexName: string; -begin - Result:=TDbf(DataSet).IndexName; -end; - -function TLRDbf.GetShowDeleted: Boolean; -begin - Result:=TDbf(DataSet).ShowDeleted; -end; - -function TLRDbf.GetTableName: string; -begin - Result:=TDbf(DataSet).TableName; -end; - -procedure TLRDbf.SetFilePath(AValue: string); -begin - TDbf(DataSet).FilePath:=AValue -end; - -procedure TLRDbf.SetShowDeleted(AValue: Boolean); -begin - TDbf(DataSet).ShowDeleted:=AValue -end; - -procedure TLRDbf.SetTableName(AValue: string); -begin - TDbf(DataSet).TableName:=AValue -end; - -procedure TLRDbf.AfterLoad; -begin - try - if FileExists(TDbf(DataSet).FilePathFull + TDbf(DataSet).TableName) then - DataSet.Active:=FActive; - finally - end; -end; - -constructor TLRDbf.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrDbf'; - DataSet:=TDbf.Create(OwnerForm); -end; - -procedure TLRDbf.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - TableName := XML.GetValue(Path+'TableName/Value'{%H-}, ''); - IndexName := XML.GetValue(Path+'IndexName/Value'{%H-}, ''); - ShowDeleted:= XML.GetValue(Path+'ShowDeleted/Value'{%H-}, false); - FilePath:= XML.GetValue(Path+'FilePath/Value'{%H-}, ''); -end; - -procedure TLRDbf.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'TableName/Value'{%H-}, TableName); - XML.SetValue(Path+'IndexName/Value'{%H-}, IndexName); - XML.SetValue(Path+'ShowDeleted/Value'{%H-}, ShowDeleted); - XML.SetValue(Path+'FilePath/Value'{%H-}, FilePath); -end; - -initialization - {$I lrtdbfdata_img.inc} - InitLRComp; - -{ RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); - RegisterPropertyEditor(TypeInfo(string), TLRZConnection, 'Protocol', TLRZConnectionProtocolProperty); -} -finalization - if Assigned(lrBMP_TDbf) then - FreeAndNil(lrBMP_TDbf); -end. -unit lrTDbfData; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, LResources, Graphics, LR_Class, LR_DBComponent, dbf; - -type - TlrTDbfData = class(TComponent) - end; - -type - - { TLRDbf } - - TLRDbf = class(TLRDataSetControl) - private - function GetFilePath: string; - function GetIndexName: string; - function GetShowDeleted: Boolean; - function GetTableName: string; - procedure SetFilePath(AValue: string); - procedure SetIndexName(AValue: string); - procedure SetShowDeleted(AValue: Boolean); - procedure SetTableName(AValue: string); - protected - procedure AfterLoad;override; - public - constructor Create(AOwnerPage:TfrPage); override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property ShowDeleted: Boolean read GetShowDeleted write SetShowDeleted; - property TableName: string read GetTableName write SetTableName; - property IndexName: string read GetIndexName write SetIndexName; - property FilePath: string read GetFilePath write SetFilePath; - end; - -procedure Register; - -implementation - -var - lrBMP_TDbf:TBitmap = nil; - -procedure InitLRComp; -begin - if not assigned(lrBMP_TDbf) then - begin - lrBMP_TDbf := TbitMap.Create; - lrBMP_TDbf.LoadFromLazarusResource('TLRDbf'); - frRegisterObject(TLRDbf, lrBMP_TDbf, 'TLRDbf', nil, otlUIControl, nil); - end; -end; - -procedure Register; -begin - RegisterComponents('LazReport',[TlrTDbfData]); -end; - -{ TLRDbf } - -procedure TLRDbf.SetIndexName(AValue: string); -begin - TDbf(DataSet).IndexName:=AValue -end; - -function TLRDbf.GetFilePath: string; -begin - Result:=TDbf(DataSet).FilePath; -end; - -function TLRDbf.GetIndexName: string; -begin - Result:=TDbf(DataSet).IndexName; -end; - -function TLRDbf.GetShowDeleted: Boolean; -begin - Result:=TDbf(DataSet).ShowDeleted; -end; - -function TLRDbf.GetTableName: string; -begin - Result:=TDbf(DataSet).TableName; -end; - -procedure TLRDbf.SetFilePath(AValue: string); -begin - TDbf(DataSet).FilePath:=AValue -end; - -procedure TLRDbf.SetShowDeleted(AValue: Boolean); -begin - TDbf(DataSet).ShowDeleted:=AValue -end; - -procedure TLRDbf.SetTableName(AValue: string); -begin - TDbf(DataSet).TableName:=AValue -end; - -procedure TLRDbf.AfterLoad; -begin - try - if FileExists(TDbf(DataSet).FilePathFull + TDbf(DataSet).TableName) then - DataSet.Active:=FActive; - finally - end; -end; - -constructor TLRDbf.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrDbf'; - DataSet:=TDbf.Create(OwnerForm); -end; - -procedure TLRDbf.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - TableName := XML.GetValue(Path+'TableName/Value'{%H-}, ''); - IndexName := XML.GetValue(Path+'IndexName/Value'{%H-}, ''); - ShowDeleted:= XML.GetValue(Path+'ShowDeleted/Value'{%H-}, false); - FilePath:= XML.GetValue(Path+'FilePath/Value'{%H-}, ''); -end; - -procedure TLRDbf.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'TableName/Value'{%H-}, TableName); - XML.SetValue(Path+'IndexName/Value'{%H-}, IndexName); - XML.SetValue(Path+'ShowDeleted/Value'{%H-}, ShowDeleted); - XML.SetValue(Path+'FilePath/Value'{%H-}, FilePath); -end; - -initialization - {$I lrtdbfdata_img.inc} - InitLRComp; - -{ RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); - RegisterPropertyEditor(TypeInfo(string), TLRZConnection, 'Protocol', TLRZConnectionProtocolProperty); -} -finalization - if Assigned(lrBMP_TDbf) then - FreeAndNil(lrBMP_TDbf); -end. diff --git a/components/lazreport/source/addons/TDbfDB/lrtdbfdata_img.inc b/components/lazreport/source/addons/TDbfDB/lrtdbfdata_img.inc index 0345c9aa81..492474f08f 100644 --- a/components/lazreport/source/addons/TDbfDB/lrtdbfdata_img.inc +++ b/components/lazreport/source/addons/TDbfDB/lrtdbfdata_img.inc @@ -83,173 +83,4 @@ LazarusResources.Add('TLRDbf','BMP',[ +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 +#255#255#255#255#255#255#255#255#255#255#255#255#255 ]); -LazarusResources.Add('TLRDbf','BMP',[ - 'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0 - +#192#6#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'l? '#173#219#255 - +#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h' - +#11'?h'#11'?h'#11'?h'#11'?h'#11'?hl? '#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#238#204#183#173#219#255#0#144#255#0#144#255#0#144 - +#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0 - +#144#255#0#144#255#0#144#255#0#144#255#0#144#255#11'?hl? '#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#238#204#183#173#219#255#0#144 - +#255#255#255#255#255#255#255#224#224#224#0#144#255#0#144#255#255#255#255#255 - +#255#255#224#224#224#0#144#255#0#144#255#255#255#255#0#144#255#0#144#255#0 - +#144#255#11'?hl? '#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#238#204#183#173#219#255#0#144#255#255#255#255','#163#255','#163#255#255 - +#255#255#0#144#255#255#255#255','#163#255','#163#255#255#255#255#0#144#255 - +#255#255#255#0#144#255#0#144#255#0#144#255#11'?hl? '#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#238#204#183#173#219#255#0#144#255#255 - +#255#255','#163#255','#163#255#255#255#255#0#144#255#255#255#255#255#255#255 - +#224#224#224#0#144#255#0#144#255#255#255#255#255#255#255#255#255#255#0#144 - +#255#11'?hl? '#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#238#204#183#173#219#255#0#144#255#255#255#255','#163#255','#163#255#255#255 - +#255#0#144#255#255#255#255','#163#255','#163#255#255#255#255#0#144#255#255 - +#255#255#0#144#255#0#144#255#0#144#255#11'?hl? '#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#238#204#183#173#219#255#0#144#255#255#255 - +#255#255#255#255#224#224#224#0#144#255#0#144#255#255#255#255#255#255#255#224 - +#224#224#0#144#255#0#144#255#255#255#255#255#255#255#255#255#255#0#144#255#11 - +'?hl? '#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#230#194 - +#167#173#219#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255 - +#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144 - +#255#0#144#255#11'?hl? '#255#255#255#255#255#255#255#255#255#230#194#167#197 - +'xE'#197'xE'#173#219#255#173#219#255#173#219#255#173#219#255#173#219#255#173 - +#219#255#173#219#255#173#219#255#173#219#255#173#219#255#173#219#255#173#219 - +#255#173#219#255#173#219#255#173#219#255#173#219#255#173#219#255'l? '#255#255 - +#255#255#255#255#255#255#255#197'xE'#217#163'{'#223#178#145#236#209#189#255 - +#255#255#243#225#211#236#209#189#230#194#167#223#178#145#217#163'{'#214#155 - +'p'#196'vB'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#210#147'd'#217#163'{'#223#178#145#196'vB'#196'vB'#196'vB'#196'vB'#196'v' - +'B'#196'vB'#217#163'{'#215#158't4~'#25#0'w'#0#0'w'#0#0#168#0#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#210#147'd'#197'xE'#196'vB'#236#209#189#255#255#255#243#225 - +#211#236#209#189#230#194#167#223#178#145#196'vB'#196'vB'#0'w'#0#0#196#0#0#168 - +#0#0'w'#0#0#168#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#196'vB'#217#163'{'#223#178#145#236#209 - +#189#255#255#255#243#225#211#236#209#189#230#194#167#223#178#145#217#163'{' - +#218#164'}'#0'w'#0#0#196#0#0#196#0#0#168#0#0'w'#0#0#168#0#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#210#147'd' - +#217#163'{'#223#178#145#196'vB'#196'vB'#196'vB'#196'vB'#196'vB'#196'vB'#217 - +#163'{'#218#164'}'#0'w'#0#0#196#0#0#196#0#0#196#0#0#168#0#0'w'#0#0#168#0#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#210#147 - +'d'#197'xE'#196'vB'#236#209#189#255#255#255#243#225#211#236#209#189#230#194 - +#167#223#178#145#196'vB'#196'vB'#0'w'#0#0#196#0#0#196#0#0#196#0#0#196#0#0#168 - +#0#0'w'#0#0#168#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#196'vB'#217#163'{'#223#178#145#236#209#189#255#255#255#243#225#211#236#209 - +#189#230#194#167#223#178#145#217#163'{'#215#159'v'#0'w'#0#0#196#0#0#196#0#0 - +#196#0#0#168#0#0'w'#0#0#168#0#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#210#147'd'#217#163'{'#223#178#145#196'vB'#196'vB' - +#196'vB'#196'vB'#196'vB'#196'vB'#217#163'{'#214#155'p'#23'z'#10#0#196#0#0#196 - ,#0#0#168#0#0'w'#0#0#168#0#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#210#147'd'#196'vB'#196'vB'#230#194#167#236 - +#209#189#230#194#167#223#178#145#217#163'{'#214#155'p'#196'vB'#196'vB'#16'y' - +#7#0#196#0#0#168#0#0'w'#0#0#168#0#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#196'vB'#214#155'p'#223 - +#178#145#236#209#189#243#225#211#236#209#189#230#194#167#223#178#145#217#163 - +'{'#214#155'p'#210#147'd'#0'w'#0#0'w'#0#0'w'#0#0#168#0#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#230#194#167#196'vB'#196'vB'#243#225#211#255#255#255#243#225#211 - +#236#209#189#230#194#167#223#178#145#196'vB'#196'vB'#230#194#167#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#230#194#167#196'vB'#196'vB'#196'vB'#196'vB'#196'vB'#196'vB'#230#194#167 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255 -]); -LazarusResources.Add('TLRDbf','BMP',[ - 'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0 - +#192#6#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'l? '#173#219#255 - +#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h'#11'?h' - +#11'?h'#11'?h'#11'?h'#11'?h'#11'?hl? '#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#238#204#183#173#219#255#0#144#255#0#144#255#0#144 - +#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0 - +#144#255#0#144#255#0#144#255#0#144#255#0#144#255#11'?hl? '#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#238#204#183#173#219#255#0#144 - +#255#255#255#255#255#255#255#224#224#224#0#144#255#0#144#255#255#255#255#255 - +#255#255#224#224#224#0#144#255#0#144#255#255#255#255#0#144#255#0#144#255#0 - +#144#255#11'?hl? '#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#238#204#183#173#219#255#0#144#255#255#255#255','#163#255','#163#255#255 - +#255#255#0#144#255#255#255#255','#163#255','#163#255#255#255#255#0#144#255 - +#255#255#255#0#144#255#0#144#255#0#144#255#11'?hl? '#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#238#204#183#173#219#255#0#144#255#255 - +#255#255','#163#255','#163#255#255#255#255#0#144#255#255#255#255#255#255#255 - +#224#224#224#0#144#255#0#144#255#255#255#255#255#255#255#255#255#255#0#144 - +#255#11'?hl? '#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#238#204#183#173#219#255#0#144#255#255#255#255','#163#255','#163#255#255#255 - +#255#0#144#255#255#255#255','#163#255','#163#255#255#255#255#0#144#255#255 - +#255#255#0#144#255#0#144#255#0#144#255#11'?hl? '#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#238#204#183#173#219#255#0#144#255#255#255 - +#255#255#255#255#224#224#224#0#144#255#0#144#255#255#255#255#255#255#255#224 - +#224#224#0#144#255#0#144#255#255#255#255#255#255#255#255#255#255#0#144#255#11 - +'?hl? '#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#230#194 - +#167#173#219#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255 - +#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144#255#0#144 - +#255#0#144#255#11'?hl? '#255#255#255#255#255#255#255#255#255#230#194#167#197 - +'xE'#197'xE'#173#219#255#173#219#255#173#219#255#173#219#255#173#219#255#173 - +#219#255#173#219#255#173#219#255#173#219#255#173#219#255#173#219#255#173#219 - +#255#173#219#255#173#219#255#173#219#255#173#219#255#173#219#255'l? '#255#255 - +#255#255#255#255#255#255#255#197'xE'#217#163'{'#223#178#145#236#209#189#255 - +#255#255#243#225#211#236#209#189#230#194#167#223#178#145#217#163'{'#214#155 - +'p'#196'vB'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#210#147'd'#217#163'{'#223#178#145#196'vB'#196'vB'#196'vB'#196'vB'#196'v' - +'B'#196'vB'#217#163'{'#215#158't4~'#25#0'w'#0#0'w'#0#0#168#0#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#210#147'd'#197'xE'#196'vB'#236#209#189#255#255#255#243#225 - +#211#236#209#189#230#194#167#223#178#145#196'vB'#196'vB'#0'w'#0#0#196#0#0#168 - +#0#0'w'#0#0#168#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#196'vB'#217#163'{'#223#178#145#236#209 - +#189#255#255#255#243#225#211#236#209#189#230#194#167#223#178#145#217#163'{' - +#218#164'}'#0'w'#0#0#196#0#0#196#0#0#168#0#0'w'#0#0#168#0#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#210#147'd' - +#217#163'{'#223#178#145#196'vB'#196'vB'#196'vB'#196'vB'#196'vB'#196'vB'#217 - +#163'{'#218#164'}'#0'w'#0#0#196#0#0#196#0#0#196#0#0#168#0#0'w'#0#0#168#0#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#210#147 - +'d'#197'xE'#196'vB'#236#209#189#255#255#255#243#225#211#236#209#189#230#194 - +#167#223#178#145#196'vB'#196'vB'#0'w'#0#0#196#0#0#196#0#0#196#0#0#196#0#0#168 - +#0#0'w'#0#0#168#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#196'vB'#217#163'{'#223#178#145#236#209#189#255#255#255#243#225#211#236#209 - +#189#230#194#167#223#178#145#217#163'{'#215#159'v'#0'w'#0#0#196#0#0#196#0#0 - +#196#0#0#168#0#0'w'#0#0#168#0#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#210#147'd'#217#163'{'#223#178#145#196'vB'#196'vB' - +#196'vB'#196'vB'#196'vB'#196'vB'#217#163'{'#214#155'p'#23'z'#10#0#196#0#0#196 - ,#0#0#168#0#0'w'#0#0#168#0#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#210#147'd'#196'vB'#196'vB'#230#194#167#236 - +#209#189#230#194#167#223#178#145#217#163'{'#214#155'p'#196'vB'#196'vB'#16'y' - +#7#0#196#0#0#168#0#0'w'#0#0#168#0#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#196'vB'#214#155'p'#223 - +#178#145#236#209#189#243#225#211#236#209#189#230#194#167#223#178#145#217#163 - +'{'#214#155'p'#210#147'd'#0'w'#0#0'w'#0#0'w'#0#0#168#0#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#230#194#167#196'vB'#196'vB'#243#225#211#255#255#255#243#225#211 - +#236#209#189#230#194#167#223#178#145#196'vB'#196'vB'#230#194#167#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#230#194#167#196'vB'#196'vB'#196'vB'#196'vB'#196'vB'#196'vB'#230#194#167 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255 -]); + diff --git a/components/lazreport/source/addons/ZeosDB/languages/lrdbzeosconst.po b/components/lazreport/source/addons/ZeosDB/languages/lrdbzeosconst.po new file mode 100644 index 0000000000..fecfa3a70d --- /dev/null +++ b/components/lazreport/source/addons/ZeosDB/languages/lrdbzeosconst.po @@ -0,0 +1,23 @@ +msgid "" +msgstr "Content-Type: text/plain; charset=UTF-8" + +#: lrdbzeosconst.slreditparamsform_caption +msgid "Edit query param list" +msgstr "" + +#: lrdbzeosconst.slreditparamsform_paramslist +msgid "Params list" +msgstr "" + +#: lrdbzeosconst.slreditparamsform_paramtype +msgid "Param type" +msgstr "" + +#: lrdbzeosconst.slreditparamsform_paramvalue +msgid "Param value" +msgstr "" + +#: lrdbzeosconst.slreditparamsform_selectexpresion +msgid "Select expresion" +msgstr "" + diff --git a/components/lazreport/source/addons/ZeosDB/languages/lrdbzeosconst.ru.po b/components/lazreport/source/addons/ZeosDB/languages/lrdbzeosconst.ru.po new file mode 100644 index 0000000000..723c8b08a6 --- /dev/null +++ b/components/lazreport/source/addons/ZeosDB/languages/lrdbzeosconst.ru.po @@ -0,0 +1,23 @@ +msgid "" +msgstr "Content-Type: text/plain; charset=UTF-8" + +#: lrdbzeosconst.slreditparamsform_caption +msgid "Edit query param list" +msgstr "Изменить список параметров" + +#: lrdbzeosconst.slreditparamsform_paramslist +msgid "Params list" +msgstr "Список параметров" + +#: lrdbzeosconst.slreditparamsform_paramtype +msgid "Param type" +msgstr "Тип параметра" + +#: lrdbzeosconst.slreditparamsform_paramvalue +msgid "Param value" +msgstr "Значение параметра" + +#: lrdbzeosconst.slreditparamsform_selectexpresion +msgid "Select expresion" +msgstr "Выбрать выражение" + diff --git a/components/lazreport/source/addons/ZeosDB/lr_db_zeos.pas b/components/lazreport/source/addons/ZeosDB/lr_db_zeos.pas index 32797bda1a..231afd82e5 100644 --- a/components/lazreport/source/addons/ZeosDB/lr_db_zeos.pas +++ b/components/lazreport/source/addons/ZeosDB/lr_db_zeos.pas @@ -6,7 +6,7 @@ interface uses Classes, SysUtils, LResources, Graphics, DB, LR_Class, ZDataset, LR_DBComponent, - LR_Intrp, ZConnection; + LR_Intrp, ZConnection, contnrs; type TlrZeosData = class(TComponent) @@ -14,20 +14,33 @@ type end; type + TQueryParam = class + ParamType:TFieldType; + ParamName:string; + ParamValue:string; + end; + + { TQueryParamList } + + TQueryParamList = class(TFPObjectList) + function ParamByName(AParamName:string):TQueryParam; + function Add(AParamType:TFieldType; const AParamName, AParamValue:string):TQueryParam; + end; + { TLRZQuery } TLRZQuery = class(TLRDataSetControl) private FDatabase: string; - FParams: TfrVariables; + FParams: TQueryParamList; procedure SetDatabase(AValue: string); procedure ZQueryBeforeOpen(ADataSet: TDataSet); procedure DoMakeParams; procedure DoEditParams; protected - function GetSQL: TStringList;virtual; - procedure SetSQL(AValue: TStringList);virtual; + function GetSQL: string; + procedure SetSQL(AValue: string); procedure AfterLoad;override; public constructor Create(AOwnerPage:TfrPage); override; @@ -36,9 +49,9 @@ type procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; published - property SQL:TStringList read GetSQL write SetSQL; + property SQL:string read GetSQL write SetSQL; property Database:string read FDatabase write SetDatabase; - property Params:TfrVariables read FParams write FParams; + property Params:TQueryParamList read FParams write FParams; end; { TLRZConnection } @@ -86,7 +99,7 @@ type procedure Register; implementation uses LR_Utils, DBPropEdits, PropEdits, LazarusPackageIntf, ZDbcIntfs, types, - LR_EditVariables, Forms, Controls, variants; + lr_EditParams, Forms, Controls, variants, Dialogs; var lrBMP_ZQuery:TBitmap = nil; @@ -108,6 +121,34 @@ begin end; end; +{ TQueryParamList } + +function TQueryParamList.ParamByName(AParamName: string): TQueryParam; +var + i:integer; +begin + Result:=nil; + AParamName:=UpperCase(AParamName); + for i:=0 to Count - 1 do + begin + if UpperCase(TQueryParam(Items[i]).ParamName) = AParamName then + begin + Result:=TQueryParam(Items[i]); + exit; + end; + end; +end; + +function TQueryParamList.Add(AParamType: TFieldType; const AParamName, + AParamValue: string): TQueryParam; +begin + Result:=TQueryParam.Create; + inherited Add(Result); + Result.ParamType:=AParamType; + Result.ParamName:=AParamName; + Result.ParamValue:=AParamValue; +end; + { TLRZConnection } procedure TLRZConnection.SetDatabase(AValue: string); @@ -248,11 +289,13 @@ end; { TLRZQuery } -procedure TLRZQuery.SetSQL(AValue: TStringList); +procedure TLRZQuery.SetSQL(AValue: string); begin - if TZQuery(DataSet).SQL = AValue then Exit; - TZQuery(DataSet).SQL.Assign(AValue); + DataSet.Active:=false; + TZQuery(DataSet).SQL.Text:=AValue; DoMakeParams; +{ if Assigned(frDesigner) then + frDesigner.Modified:=true;} end; procedure TLRZQuery.AfterLoad; @@ -288,6 +331,7 @@ var SavePage: TfrPage; SaveBand: TfrBand; Q:TZQuery; + P:TQueryParam; begin Q:=TZQuery(DataSet); SaveView := CurView; @@ -300,9 +344,19 @@ begin for i := 0 to Q.Params.Count - 1 do begin - s := Trim(VarToStr(FParams[Q.Params[i].Name])); - if (s <> '') and (DocMode = dmPrinting) then - Q.Params[i].AsString := frParser.Calc(s); + P:=FParams.ParamByName(Q.Params[i].Name); + if (P.ParamValue <> '') and (DocMode = dmPrinting) then + begin + case P.ParamType of + ftDate, + ftDateTime:Q.Params[i].AsDateTime := frParser.Calc(P.ParamValue); + ftInteger:Q.Params[i].AsInteger := frParser.Calc(P.ParamValue); + ftFloat:Q.Params[i].AsFloat := frParser.Calc(P.ParamValue); + ftString:Q.Params[i].AsString := frParser.Calc(P.ParamValue); + else + Q.Params[i].Value := frParser.Calc(P.ParamValue); + end; + end; end; if Assigned(Q.Connection) then @@ -323,13 +377,17 @@ begin begin //Add new params... for i:=0 to Q.Params.Count-1 do - if FParams.IndexOf(Q.Params[i].Name)<0 then - FParams[Q.Params[i].Name]:=''; + begin + if not Assigned(FParams.ParamByName(Q.Params[i].Name)) then + FParams.Add(ftUnknown, Q.Params[i].Name, ''); + end; //Delete not exists params for i:=FParams.Count-1 downto 0 do - if not Assigned(Q.Params.FindParam(FParams.Name[i])) then + begin + if not Assigned(Q.Params.FindParam(TQueryParam(FParams[i]).ParamName)) then FParams.Delete(i); + end; end else FParams.Clear; @@ -337,26 +395,27 @@ end; procedure TLRZQuery.DoEditParams; begin - lrEditVariablesForm:=TlrEditVariablesForm.Create(Application); - lrEditVariablesForm.LoadParamList(FParams); - if lrEditVariablesForm.ShowModal = mrOk then + lrEditParamsForm:=TlrEditParamsForm.Create(Application); + lrEditParamsForm.LoadParamList(FParams); + if lrEditParamsForm.ShowModal = mrOk then begin - lrEditVariablesForm.SaveParamList(FParams); - frDesigner.Modified:=true; + lrEditParamsForm.SaveParamList(FParams); + if Assigned(frDesigner) then + frDesigner.Modified:=true; end; - lrEditVariablesForm.Free; + lrEditParamsForm.Free; end; -function TLRZQuery.GetSQL: TStringList; +function TLRZQuery.GetSQL: string; begin - Result:=TZQuery(DataSet).SQL as TStringList; + Result:=TZQuery(DataSet).SQL.Text; end; constructor TLRZQuery.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); BaseName := 'lrZQuery'; - FParams:=TfrVariables.Create; + FParams:=TQueryParamList.Create; DataSet:=TZQuery.Create(OwnerForm); DataSet.BeforeOpen:=@ZQueryBeforeOpen; @@ -368,33 +427,56 @@ begin inherited Destroy; end; +function StrToFieldType(AStrTypeName:string):TFieldType; +var + i:TFieldType; +begin + Result:=ftUnknown; + AStrTypeName:=UpperCase(AStrTypeName); + for i in TFieldType do + begin + if UpperCase(Fieldtypenames[i]) = AStrTypeName then + begin + Result:=i; + exit; + end; + end; +end; + procedure TLRZQuery.LoadFromXML(XML: TLrXMLConfig; const Path: String); var C, I:integer; begin inherited LoadFromXML(XML, Path); - SQL.Text := XML.GetValue(Path+'SQL/Value'{%H-}, ''); + TZQuery(DataSet).SQL.Text:=XML.GetValue(Path+'SQL/Value'{%H-}, ''); FDatabase:= XML.GetValue(Path+'Database/Value'{%H-}, ''); C:=XML.GetValue(Path+'Params/Count/Value', 0); for i:=0 to C-1 do - FParams[XML.GetValue(Path+'Params/Item'+IntToStr(i)+'/Name', '')] := XML.GetValue(Path+'Params/Item'+IntToStr(i)+'/Value', ''); + FParams.Add( + StrToFieldType(XML.GetValue(Path+'Params/Item'+IntToStr(i)+'/ParamType', '')), + XML.GetValue(Path+'Params/Item'+IntToStr(i)+'/Name', ''), + XML.GetValue(Path+'Params/Item'+IntToStr(i)+'/Value', '') + ); end; procedure TLRZQuery.SaveToXML(XML: TLrXMLConfig; const Path: String); var i:integer; + P:TQueryParam; begin inherited SaveToXML(XML, Path); - XML.SetValue(Path+'SQL/Value', SQL.Text); + XML.SetValue(Path+'SQL/Value', TZQuery(DataSet).SQL.Text); XML.SetValue(Path+'Database/Value', FDatabase); XML.SetValue(Path+'Params/Count/Value', FParams.Count); for i:=0 to FParams.Count-1 do begin - XML.SetValue(Path+'Params/Item'+IntToStr(i)+'/Name', FParams.Name[i]); - XML.SetValue(Path+'Params/Item'+IntToStr(i)+'/Value', String(FParams.Value[i])); + P:=TQueryParam(FParams[i]); + XML.SetValue(Path+'Params/Item'+IntToStr(i)+'/Name', P.ParamName); + XML.SetValue(Path+'Params/Item'+IntToStr(i)+'/Value', P.ParamValue); + XML.SetValue(Path+'Params/Item'+IntToStr(i)+'/ParamType', Fieldtypenames[P.ParamType]); end; end; @@ -424,6 +506,52 @@ type procedure FillValues(const Values: TStringList); override; end; + + { TLRZQuerySQLProperty } + + TLRZQuerySQLProperty = class(TStringPropertyEditor) + public + function GetAttributes: TPropertyAttributes; override; + function GetValue: ansistring; override; + procedure Edit; override; + end; + +{ TLRZQuerySQLProperty } + +function TLRZQuerySQLProperty.GetAttributes: TPropertyAttributes; +begin + Result:=[paDialog, paReadOnly]; +end; + +function TLRZQuerySQLProperty.GetValue: ansistring; +begin + Result:='(SQL)'; +end; + +procedure TLRZQuerySQLProperty.Edit; +var + TheDialog : TStringsPropEditorDlg; + AString : string; +begin + AString := GetStrValue; + TheDialog := TStringsPropEditorDlg.Create(nil); + try + TheDialog.Editor := Self; + TheDialog.Memo.Text := AString; + TheDialog.MemoChange(nil); + if (TheDialog.ShowModal = mrOK) then + begin + AString := TheDialog.Memo.Text; + //erase the last lineending if any + if Copy(AString, length(AString) - length(LineEnding) + 1, length(LineEnding)) = LineEnding then + Delete(AString, length(AString) - length(LineEnding) + 1, length(LineEnding)); + SetStrValue(AString); + end; + finally + TheDialog.Free; + end; +end; + { TLRZQueryParamsProperty } function TLRZQueryParamsProperty.GetAttributes: TPropertyAttributes; @@ -484,1002 +612,9 @@ initialization InitLRComp; RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); - RegisterPropertyEditor(TypeInfo(TfrVariables), TLRZQuery, 'Params', TLRZQueryParamsProperty); - - RegisterPropertyEditor(TypeInfo(string), TLRZConnection, 'Protocol', TLRZConnectionProtocolProperty); - -finalization - if Assigned(lrBMP_ZQuery) then - FreeAndNil(lrBMP_ZQuery); - if Assigned(lrBMP_ZConnection) then - FreeAndNil(lrBMP_ZConnection); -end. - -unit LR_DB_Zeos; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, LResources, Graphics, DB, LR_Class, ZDataset, LR_DBComponent, - LR_Intrp, ZConnection; - -type - TlrZeosData = class(TComponent) - - end; - -type - - { TLRZQuery } - - TLRZQuery = class(TLRDataSetControl) - private - FDatabase: string; - FParams: TfrVariables; - procedure SetDatabase(AValue: string); - procedure ZQueryBeforeOpen(ADataSet: TDataSet); - procedure DoMakeParams; - procedure DoEditParams; - protected - function GetSQL: TStringList;virtual; - procedure SetSQL(AValue: TStringList);virtual; - procedure AfterLoad;override; - public - constructor Create(AOwnerPage:TfrPage); override; - destructor Destroy; override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property SQL:TStringList read GetSQL write SetSQL; - property Database:string read FDatabase write SetDatabase; - property Params:TfrVariables read FParams write FParams; - end; - - { TLRZConnection } - - TLRZConnection = class(TfrNonVisualControl) - private - FConnected:boolean; - FZConnection: TZConnection; - function GetConnected: Boolean; - function GetDatabase: string; - function GetHostName: string; - function GetLoginPrompt: Boolean; - function GetPassword: string; - function GetPort: Integer; - function GetProtocol: string; - function GetUser: string; - procedure SetConnected(AValue: Boolean); - procedure SetDatabase(AValue: string); - procedure SetHostName(AValue: string); - procedure SetLoginPrompt(AValue: Boolean); - procedure SetPassword(AValue: string); - procedure SetPort(AValue: Integer); - procedure SetProtocol(AValue: string); - procedure SetUser(AValue: string); - protected - procedure SetName(const AValue: string); override; - procedure AfterLoad;override; - public - constructor Create(AOwnerPage:TfrPage); override; - destructor Destroy; override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Connected: Boolean read GetConnected write SetConnected; - property LoginPrompt: Boolean read GetLoginPrompt write SetLoginPrompt; - property Protocol: string read GetProtocol write SetProtocol; - property HostName: string read GetHostName write SetHostName; - property Port: Integer read GetPort write SetPort; - property Database: string read GetDatabase write SetDatabase; - property User: string read GetUser write SetUser; - property Password: string read GetPassword write SetPassword; - end; - -procedure Register; -implementation -uses LR_Utils, DBPropEdits, PropEdits, LazarusPackageIntf, ZDbcIntfs, types, - LR_EditVariables, Forms, Controls, variants; - -var - lrBMP_ZQuery:TBitmap = nil; - lrBMP_ZConnection:TBitmap = nil; - -procedure InitLRComp; -begin - if not assigned(lrBMP_ZQuery) then - begin - lrBMP_ZQuery := TbitMap.Create; - lrBMP_ZQuery.LoadFromLazarusResource('TLRZQuery'); - frRegisterObject(TLRZQuery, lrBMP_ZQuery, 'TLRZQuery', nil, otlUIControl, nil); - end; - if not assigned(lrBMP_ZConnection) then - begin - lrBMP_ZConnection := TbitMap.Create; - lrBMP_ZConnection.LoadFromLazarusResource('TLRZConnection'); - frRegisterObject(TLRZConnection, lrBMP_ZConnection, 'TLRZConnection', nil, otlUIControl, nil); - end; -end; - -{ TLRZConnection } - -procedure TLRZConnection.SetDatabase(AValue: string); -begin - FZConnection.Database:=AValue; -end; - -function TLRZConnection.GetDatabase: string; -begin - Result:=FZConnection.Database; -end; - -function TLRZConnection.GetConnected: Boolean; -begin - Result:=FZConnection.Connected; -end; - -function TLRZConnection.GetHostName: string; -begin - Result:=FZConnection.HostName; -end; - -function TLRZConnection.GetLoginPrompt: Boolean; -begin - Result:=FZConnection.LoginPrompt; -end; - -function TLRZConnection.GetPassword: string; -begin - Result:=FZConnection.Password; -end; - -function TLRZConnection.GetPort: Integer; -begin - Result:=FZConnection.Port; -end; - -function TLRZConnection.GetProtocol: string; -begin - Result:=FZConnection.Protocol; -end; - -function TLRZConnection.GetUser: string; -begin - Result:=FZConnection.User; -end; - -procedure TLRZConnection.SetConnected(AValue: Boolean); -begin - FZConnection.Connected:=AValue; -end; - -procedure TLRZConnection.SetHostName(AValue: string); -begin - FZConnection.HostName:=AValue; -end; - -procedure TLRZConnection.SetLoginPrompt(AValue: Boolean); -begin - FZConnection.LoginPrompt:=AValue; -end; - -procedure TLRZConnection.SetPassword(AValue: string); -begin - FZConnection.Password:=AValue; -end; - -procedure TLRZConnection.SetPort(AValue: Integer); -begin - FZConnection.Port:=AValue; -end; - -procedure TLRZConnection.SetProtocol(AValue: string); -begin - FZConnection.Protocol:=AValue; -end; - -procedure TLRZConnection.SetUser(AValue: string); -begin - FZConnection.User:=AValue; -end; - -procedure TLRZConnection.SetName(const AValue: string); -begin - inherited SetName(AValue); - FZConnection.Name:=Name; -end; - -procedure TLRZConnection.AfterLoad; -begin - inherited AfterLoad; - FZConnection.Connected:=FConnected; -end; - -constructor TLRZConnection.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'LRZConnection'; - FZConnection:=TZConnection.Create(OwnerForm); -end; - -destructor TLRZConnection.Destroy; -begin - if not (Assigned(OwnerPage) and (OwnerPage is TfrPageDialog)) then - begin - FreeAndNil(FZConnection); - end; - inherited Destroy; -end; - -procedure TLRZConnection.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - FZConnection.Port:=XML.GetValue(Path + 'Connected/Value'{%H-}, 0); - FZConnection.LoginPrompt:=XML.GetValue(Path + 'LoginPrompt/Value'{%H-}, false); - FZConnection.Protocol:=XML.GetValue(Path + 'Protocol/Value'{%H-}, ''); - - FZConnection.HostName:=XML.GetValue(Path + 'HostName/Value'{%H-}, ''); - FZConnection.Database:=XML.GetValue(Path + 'Database/Value'{%H-}, ''); - FZConnection.User:=XML.GetValue(Path + 'User/Value'{%H-}, ''); - FZConnection.Password:=XML.GetValue(Path + 'Password/Value'{%H-}, ''); - FConnected:=XML.GetValue(Path + 'Connected/Value'{%H-}, false); -end; - -procedure TLRZConnection.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path + 'Connected/Value'{%H-}, FZConnection.Port); - XML.SetValue(Path + 'LoginPrompt/Value'{%H-}, FZConnection.LoginPrompt); - XML.SetValue(Path + 'Protocol/Value'{%H-}, FZConnection.Protocol); - - XML.SetValue(Path + 'HostName/Value'{%H-}, FZConnection.HostName); - XML.SetValue(Path + 'Database/Value'{%H-}, FZConnection.Database); - XML.SetValue(Path + 'User/Value'{%H-}, FZConnection.User); - XML.SetValue(Path + 'Password/Value'{%H-}, FZConnection.Password); - XML.SetValue(Path + 'Connected/Value'{%H-}, FZConnection.Connected); -end; - -{ TLRZQuery } - -procedure TLRZQuery.SetSQL(AValue: TStringList); -begin - if TZQuery(DataSet).SQL = AValue then Exit; - TZQuery(DataSet).SQL.Assign(AValue); - DoMakeParams; -end; - -procedure TLRZQuery.AfterLoad; -var - D:TComponent; -begin - D:=frFindComponent(DataSet.Owner, FDatabase); - if Assigned(D) and (D is TZConnection)then - begin - TZQuery(DataSet).Connection:=TZConnection(D); - DataSet.Active:=FActive; - end; -end; - -procedure TLRZQuery.SetDatabase(AValue: string); -var - D:TComponent; -begin - if FDatabase=AValue then Exit; - FDatabase:=AValue; - - DataSet.Active:=false; - D:=frFindComponent(TZQuery(DataSet).Owner, FDatabase); - if Assigned(D) and (D is TZConnection)then - TZQuery(DataSet).Connection:=TZConnection(D); -end; - -procedure TLRZQuery.ZQueryBeforeOpen(ADataSet: TDataSet); -var - i: Integer; - s: String; - SaveView: TfrView; - SavePage: TfrPage; - SaveBand: TfrBand; - Q:TZQuery; -begin - Q:=TZQuery(DataSet); - SaveView := CurView; - SavePage := CurPage; - SaveBand := CurBand; - - CurView := nil; - CurPage := OwnerPage; - CurBand := nil; - - for i := 0 to Q.Params.Count - 1 do - begin - s := Trim(VarToStr(FParams[Q.Params[i].Name])); - if (s <> '') and (DocMode = dmPrinting) then - Q.Params[i].AsString := frParser.Calc(s); - end; - - if Assigned(Q.Connection) then - if not Q.Connection.Connected then Q.Connection.Connect; - - CurView := SaveView; - CurPage := SavePage; - CurBand := SaveBand; -end; - -procedure TLRZQuery.DoMakeParams; -var - Q:TZQuery; - i:integer; -begin - Q:=TZQuery(DataSet); - if Q.Params.Count > 0 then - begin - //Add new params... - for i:=0 to Q.Params.Count-1 do - if FParams.IndexOf(Q.Params[i].Name)<0 then - FParams[Q.Params[i].Name]:=''; - - //Delete not exists params - for i:=FParams.Count-1 downto 0 do - if not Assigned(Q.Params.FindParam(FParams.Name[i])) then - FParams.Delete(i); - end - else - FParams.Clear; -end; - -procedure TLRZQuery.DoEditParams; -begin - lrEditVariablesForm:=TlrEditVariablesForm.Create(Application); - lrEditVariablesForm.LoadParamList(FParams); - if lrEditVariablesForm.ShowModal = mrOk then - begin - lrEditVariablesForm.SaveParamList(FParams); - frDesigner.Modified:=true; - end; - lrEditVariablesForm.Free; -end; - -function TLRZQuery.GetSQL: TStringList; -begin - Result:=TZQuery(DataSet).SQL as TStringList; -end; - -constructor TLRZQuery.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrZQuery'; - FParams:=TfrVariables.Create; - - DataSet:=TZQuery.Create(OwnerForm); - DataSet.BeforeOpen:=@ZQueryBeforeOpen; -end; - -destructor TLRZQuery.Destroy; -begin - FreeAndNil(FParams); - inherited Destroy; -end; - -procedure TLRZQuery.LoadFromXML(XML: TLrXMLConfig; const Path: String); -var - C, I:integer; -begin - inherited LoadFromXML(XML, Path); - SQL.Text := XML.GetValue(Path+'SQL/Value'{%H-}, ''); - FDatabase:= XML.GetValue(Path+'Database/Value'{%H-}, ''); - - - C:=XML.GetValue(Path+'Params/Count/Value', 0); - for i:=0 to C-1 do - FParams[XML.GetValue(Path+'Params/Item'+IntToStr(i)+'/Name', '')] := XML.GetValue(Path+'Params/Item'+IntToStr(i)+'/Value', ''); -end; - -procedure TLRZQuery.SaveToXML(XML: TLrXMLConfig; const Path: String); -var - i:integer; -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'SQL/Value', SQL.Text); - XML.SetValue(Path+'Database/Value', FDatabase); - - XML.SetValue(Path+'Params/Count/Value', FParams.Count); - for i:=0 to FParams.Count-1 do - begin - XML.SetValue(Path+'Params/Item'+IntToStr(i)+'/Name', FParams.Name[i]); - XML.SetValue(Path+'Params/Item'+IntToStr(i)+'/Value', String(FParams.Value[i])); - end; -end; - - -type - - { TLRZQueryParamsProperty } - - TLRZQueryParamsProperty = class(TPropertyEditor) - public - function GetAttributes: TPropertyAttributes; override; - function GetValue: ansistring; override; - procedure Edit; override; - end; - - { TLRZQueryDataBaseProperty } - - TLRZQueryDataBaseProperty = class(TFieldProperty) - public - procedure FillValues(const Values: TStringList); override; - end; - - { TLRZConnectionProtocolProperty } - - TLRZConnectionProtocolProperty = class(TFieldProperty) - public - procedure FillValues(const Values: TStringList); override; - end; - -{ TLRZQueryParamsProperty } - -function TLRZQueryParamsProperty.GetAttributes: TPropertyAttributes; -begin - Result:=[paDialog, paReadOnly]; -end; - -function TLRZQueryParamsProperty.GetValue: ansistring; -begin - Result:='(Params)'; -end; - -procedure TLRZQueryParamsProperty.Edit; -begin - if (GetComponent(0) is TLRZQuery) then - TLRZQuery(GetComponent(0)).DoEditParams; -end; - -{ TLRZConnectionProtocolProperty } - -procedure TLRZConnectionProtocolProperty.FillValues(const Values: TStringList); -var - i, j:integer; - A:TStringDynArray; -begin - if (GetComponent(0) is TLRZConnection) and Assigned(DriverManager) then - begin - for i:=0 to DriverManager.GetDrivers.GetCount-1 do - begin - A:=(DriverManager.GetDrivers.Items[i] as IZDriver).GetSupportedProtocols; - for j:=Low(A) to High(A) do - Values.Add(A[j]); - end; - end; -end; - -{ TLRZQueryDataBaseProperty } -procedure TLRZQueryDataBaseProperty.FillValues(const Values: TStringList); -begin - if (GetComponent(0) is TLRZQuery) then - frGetComponents(nil, TZConnection, Values, nil); -end; - - -procedure RegisterLR_DB_Zeos; -begin - RegisterComponents('LazReport',[TlrZeosData]); -end; - -procedure Register; -begin - RegisterUnit('LR_DB_Zeos', @RegisterLR_DB_Zeos); -end; - - -initialization - {$I lr_zeos_img.inc} - InitLRComp; - - RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); - RegisterPropertyEditor(TypeInfo(TfrVariables), TLRZQuery, 'Params', TLRZQueryParamsProperty); - - RegisterPropertyEditor(TypeInfo(string), TLRZConnection, 'Protocol', TLRZConnectionProtocolProperty); - -finalization - if Assigned(lrBMP_ZQuery) then - FreeAndNil(lrBMP_ZQuery); - if Assigned(lrBMP_ZConnection) then - FreeAndNil(lrBMP_ZConnection); -end. - -unit LR_DB_Zeos; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, LResources, Graphics, DB, LR_Class, ZDataset, LR_DBComponent, - LR_Intrp, ZConnection; - -type - TlrZeosData = class(TComponent) - - end; - -type - - { TLRZQuery } - - TLRZQuery = class(TLRDataSetControl) - private - FDatabase: string; - FParams: TfrVariables; - procedure SetDatabase(AValue: string); - procedure ZQueryBeforeOpen(ADataSet: TDataSet); - procedure DoMakeParams; - procedure DoEditParams; - protected - function GetSQL: TStringList;virtual; - procedure SetSQL(AValue: TStringList);virtual; - procedure AfterLoad;override; - public - constructor Create(AOwnerPage:TfrPage); override; - destructor Destroy; override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property SQL:TStringList read GetSQL write SetSQL; - property Database:string read FDatabase write SetDatabase; - property Params:TfrVariables read FParams write FParams; - end; - - { TLRZConnection } - - TLRZConnection = class(TfrNonVisualControl) - private - FConnected:boolean; - FZConnection: TZConnection; - function GetConnected: Boolean; - function GetDatabase: string; - function GetHostName: string; - function GetLoginPrompt: Boolean; - function GetPassword: string; - function GetPort: Integer; - function GetProtocol: string; - function GetUser: string; - procedure SetConnected(AValue: Boolean); - procedure SetDatabase(AValue: string); - procedure SetHostName(AValue: string); - procedure SetLoginPrompt(AValue: Boolean); - procedure SetPassword(AValue: string); - procedure SetPort(AValue: Integer); - procedure SetProtocol(AValue: string); - procedure SetUser(AValue: string); - protected - procedure SetName(const AValue: string); override; - procedure AfterLoad;override; - public - constructor Create(AOwnerPage:TfrPage); override; - destructor Destroy; override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - published - property Connected: Boolean read GetConnected write SetConnected; - property LoginPrompt: Boolean read GetLoginPrompt write SetLoginPrompt; - property Protocol: string read GetProtocol write SetProtocol; - property HostName: string read GetHostName write SetHostName; - property Port: Integer read GetPort write SetPort; - property Database: string read GetDatabase write SetDatabase; - property User: string read GetUser write SetUser; - property Password: string read GetPassword write SetPassword; - end; - -procedure Register; -implementation -uses LR_Utils, DBPropEdits, PropEdits, LazarusPackageIntf, ZDbcIntfs, types, - LR_EditVariables, Forms, Controls, variants; - -var - lrBMP_ZQuery:TBitmap = nil; - lrBMP_ZConnection:TBitmap = nil; - -procedure InitLRComp; -begin - if not assigned(lrBMP_ZQuery) then - begin - lrBMP_ZQuery := TbitMap.Create; - lrBMP_ZQuery.LoadFromLazarusResource('TLRZQuery'); - frRegisterObject(TLRZQuery, lrBMP_ZQuery, 'TLRZQuery', nil, otlUIControl, nil); - end; - if not assigned(lrBMP_ZConnection) then - begin - lrBMP_ZConnection := TbitMap.Create; - lrBMP_ZConnection.LoadFromLazarusResource('TLRZConnection'); - frRegisterObject(TLRZConnection, lrBMP_ZConnection, 'TLRZConnection', nil, otlUIControl, nil); - end; -end; - -{ TLRZConnection } - -procedure TLRZConnection.SetDatabase(AValue: string); -begin - FZConnection.Database:=AValue; -end; - -function TLRZConnection.GetDatabase: string; -begin - Result:=FZConnection.Database; -end; - -function TLRZConnection.GetConnected: Boolean; -begin - Result:=FZConnection.Connected; -end; - -function TLRZConnection.GetHostName: string; -begin - Result:=FZConnection.HostName; -end; - -function TLRZConnection.GetLoginPrompt: Boolean; -begin - Result:=FZConnection.LoginPrompt; -end; - -function TLRZConnection.GetPassword: string; -begin - Result:=FZConnection.Password; -end; - -function TLRZConnection.GetPort: Integer; -begin - Result:=FZConnection.Port; -end; - -function TLRZConnection.GetProtocol: string; -begin - Result:=FZConnection.Protocol; -end; - -function TLRZConnection.GetUser: string; -begin - Result:=FZConnection.User; -end; - -procedure TLRZConnection.SetConnected(AValue: Boolean); -begin - FZConnection.Connected:=AValue; -end; - -procedure TLRZConnection.SetHostName(AValue: string); -begin - FZConnection.HostName:=AValue; -end; - -procedure TLRZConnection.SetLoginPrompt(AValue: Boolean); -begin - FZConnection.LoginPrompt:=AValue; -end; - -procedure TLRZConnection.SetPassword(AValue: string); -begin - FZConnection.Password:=AValue; -end; - -procedure TLRZConnection.SetPort(AValue: Integer); -begin - FZConnection.Port:=AValue; -end; - -procedure TLRZConnection.SetProtocol(AValue: string); -begin - FZConnection.Protocol:=AValue; -end; - -procedure TLRZConnection.SetUser(AValue: string); -begin - FZConnection.User:=AValue; -end; - -procedure TLRZConnection.SetName(const AValue: string); -begin - inherited SetName(AValue); - FZConnection.Name:=Name; -end; - -procedure TLRZConnection.AfterLoad; -begin - inherited AfterLoad; - FZConnection.Connected:=FConnected; -end; - -constructor TLRZConnection.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'LRZConnection'; - FZConnection:=TZConnection.Create(OwnerForm); -end; - -destructor TLRZConnection.Destroy; -begin - if not (Assigned(OwnerPage) and (OwnerPage is TfrPageDialog)) then - begin - FreeAndNil(FZConnection); - end; - inherited Destroy; -end; - -procedure TLRZConnection.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - FZConnection.Port:=XML.GetValue(Path + 'Connected/Value'{%H-}, 0); - FZConnection.LoginPrompt:=XML.GetValue(Path + 'LoginPrompt/Value'{%H-}, false); - FZConnection.Protocol:=XML.GetValue(Path + 'Protocol/Value'{%H-}, ''); - - FZConnection.HostName:=XML.GetValue(Path + 'HostName/Value'{%H-}, ''); - FZConnection.Database:=XML.GetValue(Path + 'Database/Value'{%H-}, ''); - FZConnection.User:=XML.GetValue(Path + 'User/Value'{%H-}, ''); - FZConnection.Password:=XML.GetValue(Path + 'Password/Value'{%H-}, ''); - FConnected:=XML.GetValue(Path + 'Connected/Value'{%H-}, false); -end; - -procedure TLRZConnection.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path + 'Connected/Value'{%H-}, FZConnection.Port); - XML.SetValue(Path + 'LoginPrompt/Value'{%H-}, FZConnection.LoginPrompt); - XML.SetValue(Path + 'Protocol/Value'{%H-}, FZConnection.Protocol); - - XML.SetValue(Path + 'HostName/Value'{%H-}, FZConnection.HostName); - XML.SetValue(Path + 'Database/Value'{%H-}, FZConnection.Database); - XML.SetValue(Path + 'User/Value'{%H-}, FZConnection.User); - XML.SetValue(Path + 'Password/Value'{%H-}, FZConnection.Password); - XML.SetValue(Path + 'Connected/Value'{%H-}, FZConnection.Connected); -end; - -{ TLRZQuery } - -procedure TLRZQuery.SetSQL(AValue: TStringList); -begin - if TZQuery(DataSet).SQL = AValue then Exit; - TZQuery(DataSet).SQL.Assign(AValue); - DoMakeParams; -end; - -procedure TLRZQuery.AfterLoad; -var - D:TComponent; -begin - D:=frFindComponent(DataSet.Owner, FDatabase); - if Assigned(D) and (D is TZConnection)then - begin - TZQuery(DataSet).Connection:=TZConnection(D); - DataSet.Active:=FActive; - end; -end; - -procedure TLRZQuery.SetDatabase(AValue: string); -var - D:TComponent; -begin - if FDatabase=AValue then Exit; - FDatabase:=AValue; - - DataSet.Active:=false; - D:=frFindComponent(TZQuery(DataSet).Owner, FDatabase); - if Assigned(D) and (D is TZConnection)then - TZQuery(DataSet).Connection:=TZConnection(D); -end; - -procedure TLRZQuery.ZQueryBeforeOpen(ADataSet: TDataSet); -var - i: Integer; - s: String; - SaveView: TfrView; - SavePage: TfrPage; - SaveBand: TfrBand; - Q:TZQuery; -begin - Q:=TZQuery(DataSet); - SaveView := CurView; - SavePage := CurPage; - SaveBand := CurBand; - - CurView := nil; - CurPage := OwnerPage; - CurBand := nil; - - for i := 0 to Q.Params.Count - 1 do - begin - s := Trim(VarToStr(FParams[Q.Params[i].Name])); - if (s <> '') and (DocMode = dmPrinting) then - Q.Params[i].AsString := frParser.Calc(s); - end; - - if Assigned(Q.Connection) then - if not Q.Connection.Connected then Q.Connection.Connect; - - CurView := SaveView; - CurPage := SavePage; - CurBand := SaveBand; -end; - -procedure TLRZQuery.DoMakeParams; -var - Q:TZQuery; - i:integer; -begin - Q:=TZQuery(DataSet); - if Q.Params.Count > 0 then - begin - //Add new params... - for i:=0 to Q.Params.Count-1 do - if FParams.IndexOf(Q.Params[i].Name)<0 then - FParams[Q.Params[i].Name]:=''; - - //Delete not exists params - for i:=FParams.Count-1 downto 0 do - if not Assigned(Q.Params.FindParam(FParams.Name[i])) then - FParams.Delete(i); - end - else - FParams.Clear; -end; - -procedure TLRZQuery.DoEditParams; -begin - lrEditVariablesForm:=TlrEditVariablesForm.Create(Application); - lrEditVariablesForm.LoadParamList(FParams); - if lrEditVariablesForm.ShowModal = mrOk then - begin - lrEditVariablesForm.SaveParamList(FParams); - frDesigner.Modified:=true; - end; - lrEditVariablesForm.Free; -end; - -function TLRZQuery.GetSQL: TStringList; -begin - Result:=TZQuery(DataSet).SQL as TStringList; -end; - -constructor TLRZQuery.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - BaseName := 'lrZQuery'; - FParams:=TfrVariables.Create; - - DataSet:=TZQuery.Create(OwnerForm); - DataSet.BeforeOpen:=@ZQueryBeforeOpen; -end; - -destructor TLRZQuery.Destroy; -begin - FreeAndNil(FParams); - inherited Destroy; -end; - -procedure TLRZQuery.LoadFromXML(XML: TLrXMLConfig; const Path: String); -var - C, I:integer; -begin - inherited LoadFromXML(XML, Path); - SQL.Text := XML.GetValue(Path+'SQL/Value'{%H-}, ''); - FDatabase:= XML.GetValue(Path+'Database/Value'{%H-}, ''); - - - C:=XML.GetValue(Path+'Params/Count/Value', 0); - for i:=0 to C-1 do - FParams[XML.GetValue(Path+'Params/Item'+IntToStr(i)+'/Name', '')] := XML.GetValue(Path+'Params/Item'+IntToStr(i)+'/Value', ''); -end; - -procedure TLRZQuery.SaveToXML(XML: TLrXMLConfig; const Path: String); -var - i:integer; -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'SQL/Value', SQL.Text); - XML.SetValue(Path+'Database/Value', FDatabase); - - XML.SetValue(Path+'Params/Count/Value', FParams.Count); - for i:=0 to FParams.Count-1 do - begin - XML.SetValue(Path+'Params/Item'+IntToStr(i)+'/Name', FParams.Name[i]); - XML.SetValue(Path+'Params/Item'+IntToStr(i)+'/Value', String(FParams.Value[i])); - end; -end; - - -type - - { TLRZQueryParamsProperty } - - TLRZQueryParamsProperty = class(TPropertyEditor) - public - function GetAttributes: TPropertyAttributes; override; - function GetValue: ansistring; override; - procedure Edit; override; - end; - - { TLRZQueryDataBaseProperty } - - TLRZQueryDataBaseProperty = class(TFieldProperty) - public - procedure FillValues(const Values: TStringList); override; - end; - - { TLRZConnectionProtocolProperty } - - TLRZConnectionProtocolProperty = class(TFieldProperty) - public - procedure FillValues(const Values: TStringList); override; - end; - -{ TLRZQueryParamsProperty } - -function TLRZQueryParamsProperty.GetAttributes: TPropertyAttributes; -begin - Result:=[paDialog, paReadOnly]; -end; - -function TLRZQueryParamsProperty.GetValue: ansistring; -begin - Result:='(Params)'; -end; - -procedure TLRZQueryParamsProperty.Edit; -begin - if (GetComponent(0) is TLRZQuery) then - TLRZQuery(GetComponent(0)).DoEditParams; -end; - -{ TLRZConnectionProtocolProperty } - -procedure TLRZConnectionProtocolProperty.FillValues(const Values: TStringList); -var - i, j:integer; - A:TStringDynArray; -begin - if (GetComponent(0) is TLRZConnection) and Assigned(DriverManager) then - begin - for i:=0 to DriverManager.GetDrivers.GetCount-1 do - begin - A:=(DriverManager.GetDrivers.Items[i] as IZDriver).GetSupportedProtocols; - for j:=Low(A) to High(A) do - Values.Add(A[j]); - end; - end; -end; - -{ TLRZQueryDataBaseProperty } -procedure TLRZQueryDataBaseProperty.FillValues(const Values: TStringList); -begin - if (GetComponent(0) is TLRZQuery) then - frGetComponents(nil, TZConnection, Values, nil); -end; - - -procedure RegisterLR_DB_Zeos; -begin - RegisterComponents('LazReport',[TlrZeosData]); -end; - -procedure Register; -begin - RegisterUnit('LR_DB_Zeos', @RegisterLR_DB_Zeos); -end; - - -initialization - {$I lr_zeos_img.inc} - InitLRComp; - - RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'Database', TLRZQueryDataBaseProperty); - RegisterPropertyEditor(TypeInfo(TfrVariables), TLRZQuery, 'Params', TLRZQueryParamsProperty); + RegisterPropertyEditor(TypeInfo(string), TLRZQuery, 'SQL', TLRZQuerySQLProperty); + RegisterPropertyEditor(TypeInfo(TQueryParamList), TLRZQuery, 'Params', TLRZQueryParamsProperty); RegisterPropertyEditor(TypeInfo(string), TLRZConnection, 'Protocol', TLRZConnectionProtocolProperty); finalization diff --git a/components/lazreport/source/addons/ZeosDB/lr_editparams.lfm b/components/lazreport/source/addons/ZeosDB/lr_editparams.lfm new file mode 100644 index 0000000000..f1260ae6dc --- /dev/null +++ b/components/lazreport/source/addons/ZeosDB/lr_editparams.lfm @@ -0,0 +1,150 @@ +object lrEditParamsForm: TlrEditParamsForm + Left = 572 + Height = 313 + Top = 247 + Width = 515 + Caption = 'Edit query param list' + ClientHeight = 313 + ClientWidth = 515 + OnCloseQuery = FormCloseQuery + OnCreate = FormCreate + OnDestroy = FormDestroy + LCLVersion = '1.1' + object ButtonPanel1: TButtonPanel + Left = 6 + Height = 42 + Top = 265 + Width = 503 + 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 GroupBox1: TGroupBox + Left = 0 + Height = 259 + Top = 0 + Width = 239 + Align = alLeft + Caption = 'Param values' + ClientHeight = 242 + ClientWidth = 235 + TabOrder = 1 + object ListBox1: TListBox + Left = 0 + Height = 242 + Top = 0 + Width = 235 + Align = alClient + ItemHeight = 0 + OnClick = ListBox1Click + ScrollWidth = 233 + TabOrder = 0 + TopIndex = -1 + end + end + object GroupBox2: TGroupBox + Left = 244 + Height = 259 + Top = 0 + Width = 271 + Align = alClient + Caption = 'Param value' + ClientHeight = 242 + ClientWidth = 267 + TabOrder = 2 + object Label1: TLabel + AnchorSideLeft.Control = GroupBox2 + AnchorSideTop.Control = GroupBox2 + Left = 6 + Height = 16 + Top = 6 + Width = 75 + BorderSpacing.Around = 6 + Caption = 'Param type' + ParentColor = False + end + object ComboBox1: TComboBox + AnchorSideLeft.Control = Label1 + AnchorSideTop.Control = Label1 + AnchorSideTop.Side = asrBottom + AnchorSideRight.Control = GroupBox2 + AnchorSideRight.Side = asrBottom + Left = 12 + Height = 25 + Top = 28 + Width = 249 + Anchors = [akTop, akLeft, akRight] + BorderSpacing.Around = 6 + ItemHeight = 0 + ItemIndex = 0 + Items.Strings = ( + 'String' + 'Integer' + 'Float' + 'DateTime' + ) + Style = csDropDownList + TabOrder = 0 + Text = 'String' + end + object Label2: TLabel + AnchorSideLeft.Control = GroupBox2 + AnchorSideTop.Control = ComboBox1 + AnchorSideTop.Side = asrBottom + Left = 6 + Height = 16 + Top = 59 + Width = 82 + BorderSpacing.Around = 6 + Caption = 'Param value' + ParentColor = False + end + object Memo1: TMemo + AnchorSideLeft.Control = Label2 + AnchorSideTop.Control = Label2 + AnchorSideTop.Side = asrBottom + AnchorSideRight.Control = GroupBox2 + AnchorSideRight.Side = asrBottom + AnchorSideBottom.Control = BitBtn1 + Left = 12 + Height = 122 + Top = 81 + Width = 249 + Anchors = [akTop, akLeft, akRight, akBottom] + BorderSpacing.Around = 6 + Lines.Strings = ( + 'Memo1' + ) + TabOrder = 1 + end + object BitBtn1: TBitBtn + AnchorSideRight.Control = GroupBox2 + AnchorSideRight.Side = asrBottom + AnchorSideBottom.Control = GroupBox2 + AnchorSideBottom.Side = asrBottom + Left = 141 + Height = 27 + Top = 209 + Width = 120 + Anchors = [akRight, akBottom] + AutoSize = True + BorderSpacing.Around = 6 + Caption = 'Select expresion' + OnClick = BitBtn1Click + TabOrder = 2 + end + end + object Splitter1: TSplitter + Left = 239 + Height = 259 + Top = 0 + Width = 5 + end +end diff --git a/components/lazreport/source/addons/ZeosDB/lr_editparams.pas b/components/lazreport/source/addons/ZeosDB/lr_editparams.pas new file mode 100644 index 0000000000..931d8f49e0 --- /dev/null +++ b/components/lazreport/source/addons/ZeosDB/lr_editparams.pas @@ -0,0 +1,153 @@ +unit lr_EditParams; + +{$mode objfpc}{$H+} + +interface + +uses + Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ButtonPanel, + StdCtrls, ExtCtrls, Buttons, LR_DB_Zeos, DB; + +type + + { TlrEditParamsForm } + + TlrEditParamsForm = class(TForm) + BitBtn1: TBitBtn; + ButtonPanel1: TButtonPanel; + ComboBox1: TComboBox; + GroupBox1: TGroupBox; + GroupBox2: TGroupBox; + Label1: TLabel; + Label2: TLabel; + ListBox1: TListBox; + Memo1: TMemo; + Splitter1: TSplitter; + procedure BitBtn1Click(Sender: TObject); + procedure FormCloseQuery(Sender: TObject; var CanClose: boolean); + procedure FormCreate(Sender: TObject); + procedure FormDestroy(Sender: TObject); + procedure ListBox1Click(Sender: TObject); + private + FParams:TQueryParamList; + EditItem:integer; + public + procedure LoadParamList(AParams:TQueryParamList); + procedure SaveParamList(AParams:TQueryParamList); + end; + +var + lrEditParamsForm: TlrEditParamsForm; + +implementation +uses lrDBZeosConst, lr_expres; + +{$R *.lfm} + +{ TlrEditParamsForm } + +procedure TlrEditParamsForm.FormCreate(Sender: TObject); +begin + Caption:=slrEditParamsForm_Caption; + GroupBox1.Caption:=slrEditParamsForm_ParamsList; + GroupBox2.Caption:=slrEditParamsForm_ParamValue; + Label1.Caption:=slrEditParamsForm_ParamType; + Label2.Caption:=slrEditParamsForm_ParamValue; + BitBtn1.Caption:=slrEditParamsForm_SelectExpresion; + // + FParams:=TQueryParamList.Create; +end; + +procedure TlrEditParamsForm.FormCloseQuery(Sender: TObject; + var CanClose: boolean); +begin + if ModalResult = mrOk then + ListBox1Click(nil); +end; + +procedure TlrEditParamsForm.BitBtn1Click(Sender: TObject); +var + EF:TlrExpresionEditorForm; +begin + EF:=TlrExpresionEditorForm.Create(Application); + if EF.ShowModal = mrOk then + Memo1.Text:=EF.ResultExpresion; + EF.Free; +end; + +procedure TlrEditParamsForm.FormDestroy(Sender: TObject); +begin + FreeAndNil(FParams); +end; + +procedure TlrEditParamsForm.ListBox1Click(Sender: TObject); +var + P:TQueryParam; +begin + if (ListBox1.Items.Count>0) and (ListBox1.ItemIndex > -1) and (ListBox1.ItemIndex-1 then + begin + P:=TQueryParam(FParams[EditItem]); + case ComboBox1.ItemIndex of + 0:P.ParamType:=ftString; //String + 1:P.ParamType:=ftInteger; //Integer + 2:P.ParamType:=ftFloat; //Float + 3:P.ParamType:=ftDateTime; //DateTime + else + P.ParamType:=ftUnknown; + end; + P.ParamValue:=Memo1.Text; + end; + EditItem:=ListBox1.ItemIndex; + P:=TQueryParam(FParams[EditItem]); + case P.ParamType of + ftString:ComboBox1.ItemIndex:=0; //String + ftInteger:ComboBox1.ItemIndex:=1; //Integer + ftFloat:ComboBox1.ItemIndex:=2; //Float + ftDateTime:ComboBox1.ItemIndex:=3; //DateTime + else + ComboBox1.ItemIndex:=-1; + end; + Memo1.Text:=P.ParamValue; + end; +end; + +procedure TlrEditParamsForm.LoadParamList(AParams: TQueryParamList); +var + i:integer; + P:TQueryParam; +begin + FParams.Clear; + ListBox1.Items.Clear; + for i:=0 to AParams.Count - 1 do + begin + P:=TQueryParam(AParams[i]); + FParams.Add(P.ParamType, P.ParamName, P.ParamValue); + ListBox1.Items.Add(P.ParamName); + end; + EditItem:=-1; + if ListBox1.Items.Count > 0 then + begin + ListBox1.ItemIndex:=0; + ListBox1Click(nil); + end; +end; + +procedure TlrEditParamsForm.SaveParamList(AParams: TQueryParamList); +var + i:integer; + P, P1:TQueryParam; +begin + for i:=0 to FParams.Count - 1 do + begin + P:=TQueryParam(FParams[i]); + P1:=TQueryParam(AParams[i]); + P1.ParamType:=P.ParamType; + P1.ParamName:=P.ParamName; + P1.ParamValue:=P.ParamValue; + end; +end; + +end. + diff --git a/components/lazreport/source/addons/ZeosDB/lr_editvariables.lfm b/components/lazreport/source/addons/ZeosDB/lr_editvariables.lfm index 2453758b08..ecf68538f0 100644 --- a/components/lazreport/source/addons/ZeosDB/lr_editvariables.lfm +++ b/components/lazreport/source/addons/ZeosDB/lr_editvariables.lfm @@ -3,7 +3,7 @@ object lrEditVariablesForm: TlrEditVariablesForm Height = 348 Top = 229 Width = 497 - Caption = 'Edit params' + Caption = 'Edit variables' ClientHeight = 348 ClientWidth = 497 OnCreate = FormCreate @@ -64,9 +64,9 @@ object lrEditVariablesForm: TlrEditVariablesForm Left = 8 Height = 16 Top = 4 - Width = 73 + Width = 85 BorderSpacing.Around = 6 - Caption = 'Params list' + Caption = 'Variables list' ParentColor = False end object Label2: TLabel @@ -75,233 +75,9 @@ object lrEditVariablesForm: TlrEditVariablesForm Left = 254 Height = 16 Top = 6 - Width = 82 + Width = 94 BorderSpacing.Around = 6 - Caption = 'Param value' - ParentColor = False - end - object ListBox1: TListBox - AnchorSideLeft.Control = Owner - AnchorSideTop.Control = Label1 - AnchorSideTop.Side = asrBottom - AnchorSideRight.Control = Label3 - AnchorSideBottom.Control = ButtonPanel1 - Left = 6 - Height = 268 - Top = 26 - Width = 236 - Anchors = [akTop, akLeft, akRight, akBottom] - BorderSpacing.Around = 6 - ItemHeight = 0 - OnClick = ListBox1Click - ScrollWidth = 234 - TabOrder = 3 - TopIndex = -1 - end - object Label3: TLabel - AnchorSideLeft.Control = Owner - AnchorSideLeft.Side = asrCenter - AnchorSideTop.Control = Owner - Left = 248 - Height = 1 - Top = 6 - Width = 1 - BorderSpacing.Around = 6 - ParentColor = False - end -end -object lrEditVariablesForm: TlrEditVariablesForm - Left = 477 - Height = 348 - Top = 229 - Width = 497 - Caption = 'Edit params' - ClientHeight = 348 - ClientWidth = 497 - OnCreate = FormCreate - OnDestroy = FormDestroy - LCLVersion = '1.1' - object Memo2: TMemo - AnchorSideLeft.Control = Label3 - AnchorSideTop.Control = Label2 - AnchorSideTop.Side = asrBottom - AnchorSideRight.Control = Owner - AnchorSideRight.Side = asrBottom - Left = 254 - Height = 230 - Top = 28 - Width = 237 - Anchors = [akTop, akLeft, akRight] - BorderSpacing.Around = 6 - Lines.Strings = ( - 'Memo2' - ) - TabOrder = 0 - end - object BitBtn1: TBitBtn - AnchorSideTop.Control = ListBox1 - AnchorSideTop.Side = asrBottom - AnchorSideRight.Control = Owner - AnchorSideRight.Side = asrBottom - AnchorSideBottom.Control = ButtonPanel1 - Left = 371 - Height = 27 - Top = 267 - Width = 120 - Anchors = [akRight, akBottom] - AutoSize = True - BorderSpacing.Around = 6 - Caption = 'Select expresion' - OnClick = BitBtn1Click - TabOrder = 1 - end - object ButtonPanel1: TButtonPanel - Left = 6 - Height = 42 - Top = 300 - Width = 485 - 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 = 2 - ShowButtons = [pbOK, pbCancel, pbHelp] - end - object Label1: TLabel - AnchorSideTop.Side = asrBottom - Left = 8 - Height = 16 - Top = 4 - Width = 73 - BorderSpacing.Around = 6 - Caption = 'Params list' - ParentColor = False - end - object Label2: TLabel - AnchorSideLeft.Control = Label3 - AnchorSideTop.Control = Owner - Left = 254 - Height = 16 - Top = 6 - Width = 82 - BorderSpacing.Around = 6 - Caption = 'Param value' - ParentColor = False - end - object ListBox1: TListBox - AnchorSideLeft.Control = Owner - AnchorSideTop.Control = Label1 - AnchorSideTop.Side = asrBottom - AnchorSideRight.Control = Label3 - AnchorSideBottom.Control = ButtonPanel1 - Left = 6 - Height = 268 - Top = 26 - Width = 236 - Anchors = [akTop, akLeft, akRight, akBottom] - BorderSpacing.Around = 6 - ItemHeight = 0 - OnClick = ListBox1Click - ScrollWidth = 234 - TabOrder = 3 - TopIndex = -1 - end - object Label3: TLabel - AnchorSideLeft.Control = Owner - AnchorSideLeft.Side = asrCenter - AnchorSideTop.Control = Owner - Left = 248 - Height = 1 - Top = 6 - Width = 1 - BorderSpacing.Around = 6 - ParentColor = False - end -end -object lrEditVariablesForm: TlrEditVariablesForm - Left = 477 - Height = 348 - Top = 229 - Width = 497 - Caption = 'Edit params' - ClientHeight = 348 - ClientWidth = 497 - OnCreate = FormCreate - OnDestroy = FormDestroy - LCLVersion = '1.1' - object Memo2: TMemo - AnchorSideLeft.Control = Label3 - AnchorSideTop.Control = Label2 - AnchorSideTop.Side = asrBottom - AnchorSideRight.Control = Owner - AnchorSideRight.Side = asrBottom - Left = 254 - Height = 230 - Top = 28 - Width = 237 - Anchors = [akTop, akLeft, akRight] - BorderSpacing.Around = 6 - Lines.Strings = ( - 'Memo2' - ) - TabOrder = 0 - end - object BitBtn1: TBitBtn - AnchorSideTop.Control = ListBox1 - AnchorSideTop.Side = asrBottom - AnchorSideRight.Control = Owner - AnchorSideRight.Side = asrBottom - AnchorSideBottom.Control = ButtonPanel1 - Left = 371 - Height = 27 - Top = 267 - Width = 120 - Anchors = [akRight, akBottom] - AutoSize = True - BorderSpacing.Around = 6 - Caption = 'Select expresion' - OnClick = BitBtn1Click - TabOrder = 1 - end - object ButtonPanel1: TButtonPanel - Left = 6 - Height = 42 - Top = 300 - Width = 485 - 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 = 2 - ShowButtons = [pbOK, pbCancel, pbHelp] - end - object Label1: TLabel - AnchorSideTop.Side = asrBottom - Left = 8 - Height = 16 - Top = 4 - Width = 73 - BorderSpacing.Around = 6 - Caption = 'Params list' - ParentColor = False - end - object Label2: TLabel - AnchorSideLeft.Control = Label3 - AnchorSideTop.Control = Owner - Left = 254 - Height = 16 - Top = 6 - Width = 82 - BorderSpacing.Around = 6 - Caption = 'Param value' + Caption = 'Variable value' ParentColor = False end object ListBox1: TListBox diff --git a/components/lazreport/source/addons/ZeosDB/lr_editvariables.pas b/components/lazreport/source/addons/ZeosDB/lr_editvariables.pas index 8675632d28..024153aea8 100644 --- a/components/lazreport/source/addons/ZeosDB/lr_editvariables.pas +++ b/components/lazreport/source/addons/ZeosDB/lr_editvariables.pas @@ -107,221 +107,3 @@ end; end. -unit LR_EditVariables; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls, - Buttons, ButtonPanel, LR_Intrp; - -type - - { TlrEditVariablesForm } - - TlrEditVariablesForm = class(TForm) - BitBtn1: TBitBtn; - ButtonPanel1: TButtonPanel; - Label1: TLabel; - Label2: TLabel; - Label3: TLabel; - ListBox1: TListBox; - Memo2: TMemo; - procedure BitBtn1Click(Sender: TObject); - procedure FormCreate(Sender: TObject); - procedure FormDestroy(Sender: TObject); - procedure ListBox1Click(Sender: TObject); - private - EditItem:integer; - ValList:TStringList; - public - procedure LoadParamList(AVars:TfrVariables); - procedure SaveParamList(AVars:TfrVariables); - end; - -var - lrEditVariablesForm: TlrEditVariablesForm; - -implementation -uses lr_expres; - -{$R *.lfm} - -{ TlrEditVariablesForm } - -procedure TlrEditVariablesForm.ListBox1Click(Sender: TObject); -begin - if (ListBox1.Items.Count>0) and (ListBox1.ItemIndex > -1) and (ListBox1.ItemIndex-1 then - ValList.Values[ListBox1.Items[EditItem]]:=Memo2.Text; - EditItem:=ListBox1.ItemIndex; - Memo2.Text:=ValList.Values[ListBox1.Items[EditItem]]; - end; -end; - -procedure TlrEditVariablesForm.FormCreate(Sender: TObject); -begin - ValList:=TStringList.Create; - Memo2.Text:=''; -end; - -procedure TlrEditVariablesForm.BitBtn1Click(Sender: TObject); -var - EF:TlrExpresionEditorForm; -begin - EF:=TlrExpresionEditorForm.Create(Application); - if EF.ShowModal = mrOk then - Memo2.Text:=EF.ResultExpresion; - EF.Free; -end; - -procedure TlrEditVariablesForm.FormDestroy(Sender: TObject); -begin - FreeAndNil(ValList); -end; - -procedure TlrEditVariablesForm.LoadParamList(AVars: TfrVariables); -var - i:integer; -begin - ListBox1.Items.Clear; - for i:=0 to AVars.Count - 1 do - begin - ListBox1.Items.Add(AVars.Name[i]); - ValList.Values[AVars.Name[i]]:=AVars.Value[i]; - end; - EditItem:=-1; - Memo2.Enabled:=ListBox1.Items.Count>0; - ListBox1.Enabled:=ListBox1.Items.Count>0; - if ListBox1.Items.Count>0 then - begin - ListBox1.ItemIndex:=0; - ListBox1Click(nil); - end; -end; - -procedure TlrEditVariablesForm.SaveParamList(AVars: TfrVariables); -var - i:integer; -begin - ListBox1Click(nil); - AVars.Clear; - for i:=0 to ListBox1.Items.Count - 1 do - AVars[ListBox1.Items[i]]:=ValList.Values[ListBox1.Items[i]]; -end; - -end. - - -unit LR_EditVariables; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls, - Buttons, ButtonPanel, LR_Intrp; - -type - - { TlrEditVariablesForm } - - TlrEditVariablesForm = class(TForm) - BitBtn1: TBitBtn; - ButtonPanel1: TButtonPanel; - Label1: TLabel; - Label2: TLabel; - Label3: TLabel; - ListBox1: TListBox; - Memo2: TMemo; - procedure BitBtn1Click(Sender: TObject); - procedure FormCreate(Sender: TObject); - procedure FormDestroy(Sender: TObject); - procedure ListBox1Click(Sender: TObject); - private - EditItem:integer; - ValList:TStringList; - public - procedure LoadParamList(AVars:TfrVariables); - procedure SaveParamList(AVars:TfrVariables); - end; - -var - lrEditVariablesForm: TlrEditVariablesForm; - -implementation -uses lr_expres; - -{$R *.lfm} - -{ TlrEditVariablesForm } - -procedure TlrEditVariablesForm.ListBox1Click(Sender: TObject); -begin - if (ListBox1.Items.Count>0) and (ListBox1.ItemIndex > -1) and (ListBox1.ItemIndex-1 then - ValList.Values[ListBox1.Items[EditItem]]:=Memo2.Text; - EditItem:=ListBox1.ItemIndex; - Memo2.Text:=ValList.Values[ListBox1.Items[EditItem]]; - end; -end; - -procedure TlrEditVariablesForm.FormCreate(Sender: TObject); -begin - ValList:=TStringList.Create; - Memo2.Text:=''; -end; - -procedure TlrEditVariablesForm.BitBtn1Click(Sender: TObject); -var - EF:TlrExpresionEditorForm; -begin - EF:=TlrExpresionEditorForm.Create(Application); - if EF.ShowModal = mrOk then - Memo2.Text:=EF.ResultExpresion; - EF.Free; -end; - -procedure TlrEditVariablesForm.FormDestroy(Sender: TObject); -begin - FreeAndNil(ValList); -end; - -procedure TlrEditVariablesForm.LoadParamList(AVars: TfrVariables); -var - i:integer; -begin - ListBox1.Items.Clear; - for i:=0 to AVars.Count - 1 do - begin - ListBox1.Items.Add(AVars.Name[i]); - ValList.Values[AVars.Name[i]]:=AVars.Value[i]; - end; - EditItem:=-1; - Memo2.Enabled:=ListBox1.Items.Count>0; - ListBox1.Enabled:=ListBox1.Items.Count>0; - if ListBox1.Items.Count>0 then - begin - ListBox1.ItemIndex:=0; - ListBox1Click(nil); - end; -end; - -procedure TlrEditVariablesForm.SaveParamList(AVars: TfrVariables); -var - i:integer; -begin - ListBox1Click(nil); - AVars.Clear; - for i:=0 to ListBox1.Items.Count - 1 do - AVars[ListBox1.Items[i]]:=ValList.Values[ListBox1.Items[i]]; -end; - -end. - - diff --git a/components/lazreport/source/addons/ZeosDB/lr_zeos_img.inc b/components/lazreport/source/addons/ZeosDB/lr_zeos_img.inc index 6d94805ea6..f019686308 100644 --- a/components/lazreport/source/addons/ZeosDB/lr_zeos_img.inc +++ b/components/lazreport/source/addons/ZeosDB/lr_zeos_img.inc @@ -219,445 +219,4 @@ LazarusResources.Add('TLRZConnection','BMP',[ +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 ]); -LazarusResources.Add('TLRZQuery','BMP',[ - 'BM6'#9#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#0#0#0#0#0#9#0 - +#0#215#13#0#0#215#13#0#0#0#0#0#0#0#0#0#0#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#239#232#232#255#190#156#156#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#187#152#152#255 - +'p%%'#255'['#6#6#255'h'#25#25#255#148'\\'#255#237#229#229#255#255#255#255#255 - +#255#255#255#255#228#214#214#255#137'KK'#255'g'#24#24#255'd'#19#19#255#131'C' - +'C'#255'^'#10#10#255#131'BB'#255#255#255#255#255'X'#0#0#255'X'#0#0#255'X'#0#0 - +#255'X'#0#0#255'X'#0#0#255'y33'#255#255#255#255#255#207#183#183#255'X'#0#0 - +#255'}99'#255#183#146#146#255#150'__'#255'X'#0#0#255#131'CC'#255#255#255#255 - +#255#235#225#225#255'_'#11#11#255'c'#18#18#255#171#128#128#255'o$$'#255'X'#0 - +#0#255'X'#1#1#255#226#211#211#255#255#255#255#255'X'#0#0#255'h'#25#25#255#199 - +#171#171#255#199#171#171#255#199#171#171#255#211#188#188#255#255#255#255#255 - +#187#152#152#255'|88'#255#239#231#231#255#255#255#255#255#249#247#247#255'^' - +#10#10#255'a'#15#15#255#255#255#255#255#156'ii'#255'X'#0#0#255#201#173#173 - +#255#243#238#238#255#156'ii'#255#207#182#182#255'X'#0#0#255#137'KK'#255#255 - +#255#255#255'X'#0#0#255'q'''''#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#253#252#252#255#155 - +#133#133#255'~KK'#255'b'#21#21#255'X'#0#0#255'w>>'#255#179#179#179#255'l((' - +#255'X'#0#0#255#173#167#167#255#179#179#179#255#179#179#179#255#179#178#178 - +#255'_'#15#15#255'_'#14#14#255#179#179#179#255'X'#0#0#255'e'#27#27#255#179 - +#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255 - +#253#253#253#255#131'BB'#255'X'#0#0#255'X'#0#0#255'z44'#255#175#134#134#255 - +#250#248#248#255#255#255#255#255'}::'#255'X'#0#0#255#245#240#240#255#179#179 - +#179#255#255#255#255#255#255#255#255#255'g'#23#23#255'd'#19#19#255#255#255 - +#255#255'X'#0#0#255'q'''''#255#254#254#254#255#254#254#254#255#254#254#254 - +#255#254#254#254#255#179#179#179#255#213#192#192#255'X'#0#0#255#128'OO'#255 - +#236#227#227#255#242#236#236#255#187#152#152#255#196#165#165#255#255#255#255 - +#255#156'hh'#255'X'#0#0#255#198#169#169#255#179#179#179#255#255#255#255#255 - +#224#209#209#255'X'#0#0#255#129'@@'#255#255#255#255#255'X'#0#0#255'q'''''#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179 - +#255#219#201#201#255'X'#0#0#255'u::'#255#144'oo'#255'q22'#255'X'#0#0#255'm**' - +#255#179#179#179#255#168#157#157#255'['#7#7#255'\'#9#9#255#134'[['#255#138'b' - +'b'#255'a'#19#19#255'X'#0#0#255#157#136#136#255#180#180#180#255'X'#0#0#255'e' - +#27#27#255#180#180#180#255#180#180#180#255#180#180#180#255#180#180#180#255 - +#179#179#179#255#255#255#255#255#184#148#148#255'd'#24#24#255'['#6#6#255'i' - +#26#26#255#151'aa'#255#239#231#231#255#255#255#255#255#255#255#255#255#228 - +#215#215#255#139'NN'#255'`'#16#16#255'b'#16#16#255#129'??'#255#214#193#193 - +#255#255#255#255#255#255#255#255#255'X'#0#0#255'q'''''#255#254#254#254#255 - +#254#254#254#255#254#254#254#255#254#254#254#255#179#179#179#255#255#255#255 - +#255#255#255#255#255#179#179#179#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#179#179#179#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179#255#255#255 - +#255#255#255#255#255#255#179#179#179#255#180#180#180#255#180#180#180#255#180 - +#180#180#255#180#180#180#255#180#180#180#255#180#180#180#255#180#180#180#255 - +#180#180#180#255#179#179#179#255#180#180#180#255#180#180#180#255#180#180#180 - +#255#180#180#180#255#180#180#180#255#180#180#180#255#180#180#180#255#180#180 - +#180#255#180#180#180#255#180#180#180#255#180#180#180#255#179#179#179#255#255 - +#255#255#255#255#255#255#255#179#179#179#255#254#254#254#255#254#254#254#255 - +#254#254#254#255#254#254#254#255#254#254#254#255#254#254#254#255#254#254#254 - +#255#255#255#255#255#179#179#179#255#254#254#254#255#254#254#254#255#254#254 - +#254#255#254#254#254#255#254#254#254#255#254#254#254#255#254#254#254#255#254 - +#254#254#255#254#254#254#255#254#254#254#255#254#254#254#255#179#179#179#255 - +#255#255#255#255#255#255#255#255#179#179#179#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#179#179#179#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179 - +#255#255#255#255#255#255#255#255#255#179#179#179#255#179#179#179#255#179#179 - +#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179 - ,#179#179#255#179#179#179#255#179#179#179#255#180#180#180#255#180#180#180#255 - +#180#180#180#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179 - +#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179 - +#179#255'X'#0#0#255'X'#0#0#255'Y'#2#2#255'['#6#6#255'['#6#6#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#179#179#179#255#254#254#254#255#254#254#254#255#254#254#254#255#253 - +#253#253#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179#255'|88'#255'X' - +#0#0#255#159#139#139#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#179#179#179#255#255#255#255#255#255#255#255#255#255#255#255#255#254#254#254 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#179#179#179#255#186#151#151#255'X'#0 - +#0#255'w=='#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179 - +#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179 - +#179#255#180#180#180#255#180#180#180#255#180#180#180#255#179#179#179#255#179 - +#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255 - +#179#179#179#255#179#179#179#255#179#179#179#255#239#232#232#255'^'#10#10#255 - +'\'#9#9#255#244#239#239#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179 - +#255#254#254#254#255#254#254#254#255#254#254#254#255#253#253#253#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#179#179#179#255#255#255#255#255#137'KK'#255'X'#0 - +#0#255#194#163#163#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#179#179#179#255#255#255#255#255#200#172#172#255'X'#0 - +#0#255'q'#16#23#255#190'E^'#255#192'I`'#255#196'Mc'#255#197'Qe'#255#200'Ug' - +#255#202'Zj'#255#204']l'#255#207'bn'#255#209'eq'#255#211'js'#255#214'nu'#255 - +#216'sw'#255#219'wz'#255#221'{|'#255#223#127#127#255#226#131#128#255#228#136 - +#131#255#231#139#133#255#233#144#135#255#235#148#137#255#255#255#255#255#247 - +#244#244#255'^'#4#6#255'Z'#1#2#255#178'=S'#255#193'Ia'#255#195'Mc'#255#197'Q' - +'f'#255#199'Ug'#255#203'Yj'#255#205']l'#255#207'bo'#255#210'eq'#255#211'js' - +#255#214'nu'#255#216'rx'#255#219'wz'#255#221'{|'#255#223#127'~'#255#226#131 - +#129#255#228#135#131#255#231#140#133#255#233#143#135#255#236#148#137#255#255 - +#255#255#255#255#255#255#255'}'#22'"'#255'X'#0#0#255#144'&4'#255#193'Ia'#255 - +#196'Lc'#255#198'Qe'#255#200'Ug'#255#202'Yj'#255#204'^l'#255#207'bn'#255#209 - +'fq'#255#212'js'#255#214'nu'#255#216'rx'#255#219'vy'#255#222'z|'#255#224#127 - +'~'#255#226#131#129#255#228#136#130#255#230#139#133#255#233#144#135#255#235 - +#148#138#255#255#255#255#255#255#255#255#255#218#200#200#255'X'#0#0#255'v//' - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255'n##'#255'X'#0#0#255'X'#0#0#255'X'#0#0#255'X'#0#0#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255 -]); -LazarusResources.Add('TLRZConnection','BMP',[ - 'BM6'#9#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#0#0#0#0#0#9#0 - +#0#215#13#0#0#215#13#0#0#0#0#0#0#0#0#0#0#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#249#252#249#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#253#254#253#255#179#209#179#255#132#184#132#255'a'#168'a' - +#255'='#153'='#255#26#140#26#255#0#135#0#255#13#147#13#255'0'#168'0'#255'T' - +#189'T'#255'x'#205'x'#255#156#222#156#255#237#249#237#255#255#255#255#255#234 - +#184#184#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#222#233#222 - +#255'*w*'#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0#255#0#128#0#255#0#135#0 - +#255#0#142#0#255#0#149#0#255#0#156#0#255#0#163#0#255#0#170#0#255#12#180#12 - +#255#158#207#142#255#190#23#23#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255'j'#156'j'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0 - +#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0#163#0#255 - +#0#170#0#255#1#176#0#255#136'4'#3#255#184#0#0#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r' - +#0#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255 - +#0#163#0#255#0#170#0#255'T`'#0#255#184#0#0#255#184#0#0#255#245#223#223#255 - +#245#223#223#255#245#223#223#255#245#223#223#255#245#223#223#255#255#255#255 - +#255#255#255#255#255#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k' - +#0#255#0'r'#0#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255 - +#0#156#0#255#0#163#0#255'&'#135#0#255#180#3#0#255#184#0#0#255#184#0#0#255#184 - +#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#255#255#255#255#255 - +#255#255#255#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0 - +'r'#0#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0 - +#255#9#155#0#255#158#24#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255 - +#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#255#255#255#255#255#255#255 - +#255#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0 - +#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255 - +'u;'#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0 - +#0#255#184#0#0#255#184#0#0#255#184#0#0#255#255#255#255#255#255#255#255#255 - +#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0 - +'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255'u;'#0 - +#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255 - +#184#0#0#255#184#0#0#255#184#0#0#255#255#255#255#255#255#255#255#255#255#255 - +#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0#255 - +#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#9#155#0#255#158 - +#24#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0 - +#255#184#0#0#255#184#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255 - +'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0#255#0#128#0 - +#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0#163#0#255'&'#135#0#255 - +#180#3#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184 - +#0#0#255#184#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255'_'#148 - +'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0#255#0#128#0#255#0 - +#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0#163#0#255#0#170#0#255'T`'#0 - +#255#184#0#0#255#184#0#0#255#245#223#223#255#245#223#223#255#245#223#223#255 - +#245#223#223#255#245#223#223#255#255#255#255#255#255#255#255#255#255#255#255 - +#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0#255#0 - +#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0#163#0#255#0#170 - +#0#255#1#176#0#255#133'3'#0#255#184#0#0#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0 - +#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0 - +#163#0#255#0#170#0#255#0#177#0#255#17#167#0#255#190#23#23#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255'X'#0#0#255'X'#0#0#255'X'#1#1#255'U'#2#0#255'U'#2#0#255#0'k'#0#255#0'r'#0 - +#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0 - +#163#0#255#0#170#0#255#0#177#0#255#0#184#0#255#234#184#184#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - ,#255#255'|88'#255'X'#0#0#255']sJ'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0 - +#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0 - +#163#0#255#0#170#0#255#0#177#0#255#0#184#0#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#186#151#151#255'X'#0#0#255'Z2 '#255#0']'#0#255#0'd'#0#255#0'k'#0#255 - +#0'r'#0#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156 - +#0#255#0#163#0#255#0#170#0#255#0#177#0#255#0#184#0#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#239#232#232#255'^'#10#10#255'X'#7#4#255#5'W'#0#255#0'd'#0 - +#255#0'k'#0#255#0'r'#0#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0 - +#149#0#255#0#156#0#255#0#163#0#255#0#170#0#255#0#177#0#255#0#184#0#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#137'KK'#255'X'#0#0#255#31';' - +#0#255#0'j'#0#255#0's'#0#255#0'y'#0#255#0'}'#0#255#0#127#0#255#0#128#0#255#0 - +#129#0#255#0#133#0#255#0#139#0#255#0#146#0#255#0#156#0#255#0#175#0#255#0#184 - +#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#200#172#172#255 - +'X'#0#0#255'A'#31#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127 - +#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0 - +#255#0#131#0#255#0#165#0#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#247#244#244#255'X'#11#6#255'U'#3#0#255#10'p'#0#255#0#127#0#255#0#127#0 - +#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255 - +#0#127#0#255#0#127#0#255#0#127#0#255#20#140#20#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#144']Y'#255'X'#0#0#255'''F'#0 - +#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255 - +#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255'%'#146'%'#255#185#220#185 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#218 - +#200#200#255'X'#0#0#255'o+('#255#172#213#172#255#137#196#137#255'e'#178'e' - +#255'B'#160'B'#255'"'#144'"'#255'4'#153'4'#255'X'#171'X'#255'|'#189'|'#255 - +#160#206#160#255#196#224#196#255#252#253#252#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255'n##'#255'X'#0#0#255'X'#0#0#255'X'#0#0#255'X'#0#0#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 -]); -LazarusResources.Add('TLRZQuery','BMP',[ - 'BM6'#9#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#0#0#0#0#0#9#0 - +#0#215#13#0#0#215#13#0#0#0#0#0#0#0#0#0#0#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#239#232#232#255#190#156#156#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#187#152#152#255 - +'p%%'#255'['#6#6#255'h'#25#25#255#148'\\'#255#237#229#229#255#255#255#255#255 - +#255#255#255#255#228#214#214#255#137'KK'#255'g'#24#24#255'd'#19#19#255#131'C' - +'C'#255'^'#10#10#255#131'BB'#255#255#255#255#255'X'#0#0#255'X'#0#0#255'X'#0#0 - +#255'X'#0#0#255'X'#0#0#255'y33'#255#255#255#255#255#207#183#183#255'X'#0#0 - +#255'}99'#255#183#146#146#255#150'__'#255'X'#0#0#255#131'CC'#255#255#255#255 - +#255#235#225#225#255'_'#11#11#255'c'#18#18#255#171#128#128#255'o$$'#255'X'#0 - +#0#255'X'#1#1#255#226#211#211#255#255#255#255#255'X'#0#0#255'h'#25#25#255#199 - +#171#171#255#199#171#171#255#199#171#171#255#211#188#188#255#255#255#255#255 - +#187#152#152#255'|88'#255#239#231#231#255#255#255#255#255#249#247#247#255'^' - +#10#10#255'a'#15#15#255#255#255#255#255#156'ii'#255'X'#0#0#255#201#173#173 - +#255#243#238#238#255#156'ii'#255#207#182#182#255'X'#0#0#255#137'KK'#255#255 - +#255#255#255'X'#0#0#255'q'''''#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#253#252#252#255#155 - +#133#133#255'~KK'#255'b'#21#21#255'X'#0#0#255'w>>'#255#179#179#179#255'l((' - +#255'X'#0#0#255#173#167#167#255#179#179#179#255#179#179#179#255#179#178#178 - +#255'_'#15#15#255'_'#14#14#255#179#179#179#255'X'#0#0#255'e'#27#27#255#179 - +#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255 - +#253#253#253#255#131'BB'#255'X'#0#0#255'X'#0#0#255'z44'#255#175#134#134#255 - +#250#248#248#255#255#255#255#255'}::'#255'X'#0#0#255#245#240#240#255#179#179 - +#179#255#255#255#255#255#255#255#255#255'g'#23#23#255'd'#19#19#255#255#255 - +#255#255'X'#0#0#255'q'''''#255#254#254#254#255#254#254#254#255#254#254#254 - +#255#254#254#254#255#179#179#179#255#213#192#192#255'X'#0#0#255#128'OO'#255 - +#236#227#227#255#242#236#236#255#187#152#152#255#196#165#165#255#255#255#255 - +#255#156'hh'#255'X'#0#0#255#198#169#169#255#179#179#179#255#255#255#255#255 - +#224#209#209#255'X'#0#0#255#129'@@'#255#255#255#255#255'X'#0#0#255'q'''''#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179 - +#255#219#201#201#255'X'#0#0#255'u::'#255#144'oo'#255'q22'#255'X'#0#0#255'm**' - +#255#179#179#179#255#168#157#157#255'['#7#7#255'\'#9#9#255#134'[['#255#138'b' - +'b'#255'a'#19#19#255'X'#0#0#255#157#136#136#255#180#180#180#255'X'#0#0#255'e' - +#27#27#255#180#180#180#255#180#180#180#255#180#180#180#255#180#180#180#255 - +#179#179#179#255#255#255#255#255#184#148#148#255'd'#24#24#255'['#6#6#255'i' - +#26#26#255#151'aa'#255#239#231#231#255#255#255#255#255#255#255#255#255#228 - +#215#215#255#139'NN'#255'`'#16#16#255'b'#16#16#255#129'??'#255#214#193#193 - +#255#255#255#255#255#255#255#255#255'X'#0#0#255'q'''''#255#254#254#254#255 - +#254#254#254#255#254#254#254#255#254#254#254#255#179#179#179#255#255#255#255 - +#255#255#255#255#255#179#179#179#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#179#179#179#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179#255#255#255 - +#255#255#255#255#255#255#179#179#179#255#180#180#180#255#180#180#180#255#180 - +#180#180#255#180#180#180#255#180#180#180#255#180#180#180#255#180#180#180#255 - +#180#180#180#255#179#179#179#255#180#180#180#255#180#180#180#255#180#180#180 - +#255#180#180#180#255#180#180#180#255#180#180#180#255#180#180#180#255#180#180 - +#180#255#180#180#180#255#180#180#180#255#180#180#180#255#179#179#179#255#255 - +#255#255#255#255#255#255#255#179#179#179#255#254#254#254#255#254#254#254#255 - +#254#254#254#255#254#254#254#255#254#254#254#255#254#254#254#255#254#254#254 - +#255#255#255#255#255#179#179#179#255#254#254#254#255#254#254#254#255#254#254 - +#254#255#254#254#254#255#254#254#254#255#254#254#254#255#254#254#254#255#254 - +#254#254#255#254#254#254#255#254#254#254#255#254#254#254#255#179#179#179#255 - +#255#255#255#255#255#255#255#255#179#179#179#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#179#179#179#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179 - +#255#255#255#255#255#255#255#255#255#179#179#179#255#179#179#179#255#179#179 - +#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179 - ,#179#179#255#179#179#179#255#179#179#179#255#180#180#180#255#180#180#180#255 - +#180#180#180#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179 - +#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179 - +#179#255'X'#0#0#255'X'#0#0#255'Y'#2#2#255'['#6#6#255'['#6#6#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#179#179#179#255#254#254#254#255#254#254#254#255#254#254#254#255#253 - +#253#253#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179#255'|88'#255'X' - +#0#0#255#159#139#139#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#179#179#179#255#255#255#255#255#255#255#255#255#255#255#255#255#254#254#254 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#179#179#179#255#186#151#151#255'X'#0 - +#0#255'w=='#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179 - +#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179 - +#179#255#180#180#180#255#180#180#180#255#180#180#180#255#179#179#179#255#179 - +#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255#179#179#179#255 - +#179#179#179#255#179#179#179#255#179#179#179#255#239#232#232#255'^'#10#10#255 - +'\'#9#9#255#244#239#239#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179 - +#255#254#254#254#255#254#254#254#255#254#254#254#255#253#253#253#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#179#179#179#255#255#255#255#255#137'KK'#255'X'#0 - +#0#255#194#163#163#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#179#179#179#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#179#179#179#255#255#255#255#255#200#172#172#255'X'#0 - +#0#255'q'#16#23#255#190'E^'#255#192'I`'#255#196'Mc'#255#197'Qe'#255#200'Ug' - +#255#202'Zj'#255#204']l'#255#207'bn'#255#209'eq'#255#211'js'#255#214'nu'#255 - +#216'sw'#255#219'wz'#255#221'{|'#255#223#127#127#255#226#131#128#255#228#136 - +#131#255#231#139#133#255#233#144#135#255#235#148#137#255#255#255#255#255#247 - +#244#244#255'^'#4#6#255'Z'#1#2#255#178'=S'#255#193'Ia'#255#195'Mc'#255#197'Q' - +'f'#255#199'Ug'#255#203'Yj'#255#205']l'#255#207'bo'#255#210'eq'#255#211'js' - +#255#214'nu'#255#216'rx'#255#219'wz'#255#221'{|'#255#223#127'~'#255#226#131 - +#129#255#228#135#131#255#231#140#133#255#233#143#135#255#236#148#137#255#255 - +#255#255#255#255#255#255#255'}'#22'"'#255'X'#0#0#255#144'&4'#255#193'Ia'#255 - +#196'Lc'#255#198'Qe'#255#200'Ug'#255#202'Yj'#255#204'^l'#255#207'bn'#255#209 - +'fq'#255#212'js'#255#214'nu'#255#216'rx'#255#219'vy'#255#222'z|'#255#224#127 - +'~'#255#226#131#129#255#228#136#130#255#230#139#133#255#233#144#135#255#235 - +#148#138#255#255#255#255#255#255#255#255#255#218#200#200#255'X'#0#0#255'v//' - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255'n##'#255'X'#0#0#255'X'#0#0#255'X'#0#0#255'X'#0#0#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255 -]); -LazarusResources.Add('TLRZConnection','BMP',[ - 'BM6'#9#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0' '#0#0#0#0#0#0#9#0 - +#0#215#13#0#0#215#13#0#0#0#0#0#0#0#0#0#0#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#249#252#249#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#253#254#253#255#179#209#179#255#132#184#132#255'a'#168'a' - +#255'='#153'='#255#26#140#26#255#0#135#0#255#13#147#13#255'0'#168'0'#255'T' - +#189'T'#255'x'#205'x'#255#156#222#156#255#237#249#237#255#255#255#255#255#234 - +#184#184#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#222#233#222 - +#255'*w*'#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0#255#0#128#0#255#0#135#0 - +#255#0#142#0#255#0#149#0#255#0#156#0#255#0#163#0#255#0#170#0#255#12#180#12 - +#255#158#207#142#255#190#23#23#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255'j'#156'j'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0 - +#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0#163#0#255 - +#0#170#0#255#1#176#0#255#136'4'#3#255#184#0#0#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r' - +#0#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255 - +#0#163#0#255#0#170#0#255'T`'#0#255#184#0#0#255#184#0#0#255#245#223#223#255 - +#245#223#223#255#245#223#223#255#245#223#223#255#245#223#223#255#255#255#255 - +#255#255#255#255#255#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k' - +#0#255#0'r'#0#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255 - +#0#156#0#255#0#163#0#255'&'#135#0#255#180#3#0#255#184#0#0#255#184#0#0#255#184 - +#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#255#255#255#255#255 - +#255#255#255#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0 - +'r'#0#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0 - +#255#9#155#0#255#158#24#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255 - +#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#255#255#255#255#255#255#255 - +#255#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0 - +#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255 - +'u;'#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0 - +#0#255#184#0#0#255#184#0#0#255#184#0#0#255#255#255#255#255#255#255#255#255 - +#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0 - +'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255'u;'#0 - +#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255 - +#184#0#0#255#184#0#0#255#184#0#0#255#255#255#255#255#255#255#255#255#255#255 - +#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0#255 - +#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#9#155#0#255#158 - +#24#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0 - +#255#184#0#0#255#184#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255 - +'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0#255#0#128#0 - +#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0#163#0#255'&'#135#0#255 - +#180#3#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184#0#0#255#184 - +#0#0#255#184#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255'_'#148 - +'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0#255#0#128#0#255#0 - +#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0#163#0#255#0#170#0#255'T`'#0 - +#255#184#0#0#255#184#0#0#255#245#223#223#255#245#223#223#255#245#223#223#255 - +#245#223#223#255#245#223#223#255#255#255#255#255#255#255#255#255#255#255#255 - +#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0#255#0'y'#0#255#0 - +#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0#163#0#255#0#170 - +#0#255#1#176#0#255#133'3'#0#255#184#0#0#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255'_'#148'_'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0 - +#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0 - +#163#0#255#0#170#0#255#0#177#0#255#17#167#0#255#190#23#23#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255'X'#0#0#255'X'#0#0#255'X'#1#1#255'U'#2#0#255'U'#2#0#255#0'k'#0#255#0'r'#0 - +#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0 - +#163#0#255#0#170#0#255#0#177#0#255#0#184#0#255#234#184#184#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - ,#255#255'|88'#255'X'#0#0#255']sJ'#255#0']'#0#255#0'd'#0#255#0'k'#0#255#0'r'#0 - +#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156#0#255#0 - +#163#0#255#0#170#0#255#0#177#0#255#0#184#0#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#186#151#151#255'X'#0#0#255'Z2 '#255#0']'#0#255#0'd'#0#255#0'k'#0#255 - +#0'r'#0#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0#149#0#255#0#156 - +#0#255#0#163#0#255#0#170#0#255#0#177#0#255#0#184#0#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#239#232#232#255'^'#10#10#255'X'#7#4#255#5'W'#0#255#0'd'#0 - +#255#0'k'#0#255#0'r'#0#255#0'y'#0#255#0#128#0#255#0#135#0#255#0#142#0#255#0 - +#149#0#255#0#156#0#255#0#163#0#255#0#170#0#255#0#177#0#255#0#184#0#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#137'KK'#255'X'#0#0#255#31';' - +#0#255#0'j'#0#255#0's'#0#255#0'y'#0#255#0'}'#0#255#0#127#0#255#0#128#0#255#0 - +#129#0#255#0#133#0#255#0#139#0#255#0#146#0#255#0#156#0#255#0#175#0#255#0#184 - +#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#200#172#172#255 - +'X'#0#0#255'A'#31#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127 - +#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0 - +#255#0#131#0#255#0#165#0#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#247#244#244#255'X'#11#6#255'U'#3#0#255#10'p'#0#255#0#127#0#255#0#127#0 - +#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255 - +#0#127#0#255#0#127#0#255#0#127#0#255#20#140#20#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#144']Y'#255'X'#0#0#255'''F'#0 - +#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255 - +#0#127#0#255#0#127#0#255#0#127#0#255#0#127#0#255'%'#146'%'#255#185#220#185 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#218 - +#200#200#255'X'#0#0#255'o+('#255#172#213#172#255#137#196#137#255'e'#178'e' - +#255'B'#160'B'#255'"'#144'"'#255'4'#153'4'#255'X'#171'X'#255'|'#189'|'#255 - +#160#206#160#255#196#224#196#255#252#253#252#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255'n##'#255'X'#0#0#255'X'#0#0#255'X'#0#0#255'X'#0#0#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 - +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 -]); + diff --git a/components/lazreport/source/addons/ZeosDB/lr_zeosdb.lpk b/components/lazreport/source/addons/ZeosDB/lr_zeosdb.lpk index f8278010a6..e635c945f1 100644 --- a/components/lazreport/source/addons/ZeosDB/lr_zeosdb.lpk +++ b/components/lazreport/source/addons/ZeosDB/lr_zeosdb.lpk @@ -2,6 +2,7 @@ + @@ -14,7 +15,10 @@ - + + + @@ -26,9 +30,21 @@ - + + + + + + + + + + + + + diff --git a/components/lazreport/source/addons/ZeosDB/lr_zeosdb.pas b/components/lazreport/source/addons/ZeosDB/lr_zeosdb.pas index 47e187e023..c717a21084 100644 --- a/components/lazreport/source/addons/ZeosDB/lr_zeosdb.pas +++ b/components/lazreport/source/addons/ZeosDB/lr_zeosdb.pas @@ -7,49 +7,8 @@ unit LR_ZeosDB; interface uses - LR_DB_Zeos, LR_EditVariables, LazarusPackageIntf; - -implementation - -procedure Register; -begin - RegisterUnit('LR_DB_Zeos', @LR_DB_Zeos.Register); -end; - -initialization - RegisterPackage('LR_ZeosDB', @Register); -end. -{ This file was automatically created by Lazarus. Do not edit! - This source is only used to compile and install the package. - } - -unit LR_ZeosDB; - -interface - -uses - LR_DB_Zeos, LR_EditVariables, LazarusPackageIntf; - -implementation - -procedure Register; -begin - RegisterUnit('LR_DB_Zeos', @LR_DB_Zeos.Register); -end; - -initialization - RegisterPackage('LR_ZeosDB', @Register); -end. -{ This file was automatically created by Lazarus. Do not edit! - This source is only used to compile and install the package. - } - -unit LR_ZeosDB; - -interface - -uses - LR_DB_Zeos, LR_EditVariables, LazarusPackageIntf; + LR_DB_Zeos, LR_EditVariables, lr_EditParams, lrDBZeosConst, + LazarusPackageIntf; implementation diff --git a/components/lazreport/source/addons/ZeosDB/lrdbzeosconst.pas b/components/lazreport/source/addons/ZeosDB/lrdbzeosconst.pas new file mode 100644 index 0000000000..f55f20ff1f --- /dev/null +++ b/components/lazreport/source/addons/ZeosDB/lrdbzeosconst.pas @@ -0,0 +1,20 @@ +unit lrDBZeosConst; + +{$mode objfpc}{$H+} + +interface + +uses + Classes, SysUtils; + +resourcestring + slrEditParamsForm_Caption = 'Edit query param list'; + slrEditParamsForm_ParamsList = 'Params list'; + slrEditParamsForm_ParamValue = 'Param value'; + slrEditParamsForm_ParamType = 'Param type'; + slrEditParamsForm_SelectExpresion = 'Select expresion'; + +implementation + +end. + diff --git a/components/lazreport/source/languages/lr_const.de.po b/components/lazreport/source/languages/lr_const.de.po index ab41bb5f0a..d3aa8af80b 100644 --- a/components/lazreport/source/languages/lr_const.de.po +++ b/components/lazreport/source/languages/lr_const.de.po @@ -247,22 +247,6 @@ msgstr "Bestätigen" msgid "CSV File" msgstr "CSV-Datei" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "tt.mm.jj" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "tt.mm.jjjj" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "t mmm jjjj" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "t mmmm jjjj" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "Datum und Zeit" @@ -1156,6 +1140,10 @@ msgstr "Objekt&inspektor" msgid "Line style" msgstr "Linienstil" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new #| msgid "&New..." msgid "&New ..." @@ -2324,22 +2312,6 @@ msgstr "Neuer Report" msgid "ASCII Text file" msgstr "ASCII-Textdatei" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "hh:mm:ss" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "h:mm:ss" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "hh:mm" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "h:mm" - #: lr_const.sto msgid "to" msgstr "bis" diff --git a/components/lazreport/source/languages/lr_const.es.po b/components/lazreport/source/languages/lr_const.es.po index 5dbb27d997..e0508cecf4 100644 --- a/components/lazreport/source/languages/lr_const.es.po +++ b/components/lazreport/source/languages/lr_const.es.po @@ -236,22 +236,6 @@ msgstr "Confirmar" msgid "CSV File" msgstr "Archivo CSV" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "d-mmm-yyyy" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "Fecha y hora" @@ -1148,6 +1132,10 @@ msgstr "&Inspector de objetos" msgid "Line style" msgstr "Estilo de línea" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new #, fuzzy #| msgid "&New..." @@ -2323,22 +2311,6 @@ msgstr "Nuevo reporte" msgid "ASCII Text file" msgstr "Archivo de texto ASCII" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "" - #: lr_const.sto msgid "to" msgstr "hacia" diff --git a/components/lazreport/source/languages/lr_const.fr.po b/components/lazreport/source/languages/lr_const.fr.po index 993d9d8c07..fb12792795 100644 --- a/components/lazreport/source/languages/lr_const.fr.po +++ b/components/lazreport/source/languages/lr_const.fr.po @@ -245,22 +245,6 @@ msgstr "Confirmer" msgid "CSV File" msgstr "Fichier CSV" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "dd.mm.yy" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "dd.mm.yyyy" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "d mmm yyyy" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "d mmmm yyyy" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "Date et heure" @@ -1159,6 +1143,10 @@ msgstr "&Inspecteur d'objets" msgid "Line style" msgstr "Style de ligne" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new #, fuzzy #| msgid "&New..." @@ -2338,22 +2326,6 @@ msgstr "Nouveau rapport" msgid "ASCII Text file" msgstr "Fichier de texte ASCII" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "hh:nn:ss" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "h:nn:ss" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "hh:nn" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "h:nn" - #: lr_const.sto msgid "to" msgstr "à" diff --git a/components/lazreport/source/languages/lr_const.id.po b/components/lazreport/source/languages/lr_const.id.po index a034ff772a..a4e776b0f3 100644 --- a/components/lazreport/source/languages/lr_const.id.po +++ b/components/lazreport/source/languages/lr_const.id.po @@ -236,22 +236,6 @@ msgstr "Konfirmasi" msgid "CSV File" msgstr "File CSV" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "mm.dd.yy" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "mm.dd.yyyy" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "d mmm yyyy" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "d mmmm yyyy" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "Tanggal dan jam" @@ -1150,6 +1134,10 @@ msgstr "&Inspektor Obyek" msgid "Line style" msgstr "Gaya garis" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new #, fuzzy #| msgid "&New..." @@ -2329,22 +2317,6 @@ msgstr "Laporan baru" msgid "ASCII Text file" msgstr "File Teks ASCII" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "hh:nn:ss" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "h:nn:ss" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "hh:nn" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "h:nn" - #: lr_const.sto msgid "to" msgstr "ke" diff --git a/components/lazreport/source/languages/lr_const.it.po b/components/lazreport/source/languages/lr_const.it.po index 20f9440304..79462f2d1a 100644 --- a/components/lazreport/source/languages/lr_const.it.po +++ b/components/lazreport/source/languages/lr_const.it.po @@ -237,22 +237,6 @@ msgstr "Conferma" msgid "CSV File" msgstr "File CSV" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "mm.gg.aa" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "mm.gg.aaaa" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "g mmm aaaa" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "g mmmm yyyy" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "Data e ora" @@ -1151,6 +1135,10 @@ msgstr "&Analizzatore oggetti" msgid "Line style" msgstr "Stile di linea" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new #, fuzzy #| msgid "&New..." @@ -2330,22 +2318,6 @@ msgstr "Nuovo report" msgid "ASCII Text file" msgstr "File di testo ASCII" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "" - #: lr_const.sto msgid "to" msgstr "a" diff --git a/components/lazreport/source/languages/lr_const.lt.po b/components/lazreport/source/languages/lr_const.lt.po index d8016adadd..df693e1578 100644 --- a/components/lazreport/source/languages/lr_const.lt.po +++ b/components/lazreport/source/languages/lr_const.lt.po @@ -237,22 +237,6 @@ msgstr "Patvirtinimas" msgid "CSV File" msgstr "CSV failas" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "mm.dd.yy" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "mm.dd.yyyy" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "d mmm yyyy" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "d mmmm yyyy" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "Data ir laikas" @@ -1151,6 +1135,10 @@ msgstr "Objektų &inspektorius" msgid "Line style" msgstr "Linijos stilius" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new #, fuzzy #| msgid "&New..." @@ -2330,22 +2318,6 @@ msgstr "Naujas pranešimas" msgid "ASCII Text file" msgstr "ASCII teksto failas" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "hh:nn:ss" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "h:nn:ss" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "hh:nn" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "h:nn" - #: lr_const.sto msgid "to" msgstr "iki" diff --git a/components/lazreport/source/languages/lr_const.pl.po b/components/lazreport/source/languages/lr_const.pl.po index 4b43ac53d5..2c9c2a804e 100644 --- a/components/lazreport/source/languages/lr_const.pl.po +++ b/components/lazreport/source/languages/lr_const.pl.po @@ -239,22 +239,6 @@ msgstr "Potwierdź" msgid "CSV File" msgstr "Plik CSV" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "Data i czas" @@ -1153,6 +1137,10 @@ msgstr "&Inspektor obiektów" msgid "Line style" msgstr "Styl linii" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new #, fuzzy #| msgid "&New..." @@ -2332,22 +2320,6 @@ msgstr "Nowy raport" msgid "ASCII Text file" msgstr "Plik tekstowy ASCII" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "" - #: lr_const.sto msgid "to" msgstr "w" diff --git a/components/lazreport/source/languages/lr_const.po b/components/lazreport/source/languages/lr_const.po index e43689c66e..69e59fbcc3 100644 --- a/components/lazreport/source/languages/lr_const.po +++ b/components/lazreport/source/languages/lr_const.po @@ -231,22 +231,6 @@ msgstr "" msgid "CSV File" msgstr "" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "" @@ -1135,6 +1119,10 @@ msgstr "" msgid "Line style" msgstr "" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new msgid "&New ..." msgstr "" @@ -2292,22 +2280,6 @@ msgstr "" msgid "ASCII Text file" msgstr "" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "" - #: lr_const.sto msgid "to" msgstr "" diff --git a/components/lazreport/source/languages/lr_const.pt.po b/components/lazreport/source/languages/lr_const.pt.po index 6f47069cf0..c0d3ebb259 100644 --- a/components/lazreport/source/languages/lr_const.pt.po +++ b/components/lazreport/source/languages/lr_const.pt.po @@ -236,22 +236,6 @@ msgstr "Confirmar" msgid "CSV File" msgstr "Arquivo CSV" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "mm.dd.yy" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "mm.dd.yyyy" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "d mmm yyyy" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "d mmmm yyyy" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "Data e hora" @@ -1150,6 +1134,10 @@ msgstr "&Inspetor Objetos" msgid "Line style" msgstr "Estilo Linha" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new #, fuzzy #| msgid "&New..." @@ -2329,22 +2317,6 @@ msgstr "Novo relatório" msgid "ASCII Text file" msgstr "Arquivo texto ASCII" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "hh:nn:ss" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "h:nn:ss" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "hh:nn" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "h:nn" - #: lr_const.sto msgid "to" msgstr "para" diff --git a/components/lazreport/source/languages/lr_const.pt_BR.po b/components/lazreport/source/languages/lr_const.pt_BR.po index 46ff952b57..f7642d57a9 100644 --- a/components/lazreport/source/languages/lr_const.pt_BR.po +++ b/components/lazreport/source/languages/lr_const.pt_BR.po @@ -236,22 +236,6 @@ msgstr "Confirmar" msgid "CSV File" msgstr "Arquivo CSV" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "mm.dd.yy" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "mm.dd.yyyy" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "d mmm yyyy" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "d mmmm yyyy" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "Data e hora" @@ -1145,6 +1129,10 @@ msgstr "&Inspetor Objetos" msgid "Line style" msgstr "Estilo Linha" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new #| msgid "&New..." msgid "&New ..." @@ -2313,22 +2301,6 @@ msgstr "Novo relatório" msgid "ASCII Text file" msgstr "Arquivo texto ASCII" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "hh:nn:ss" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "h:nn:ss" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "hh:nn" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "h:nn" - #: lr_const.sto msgid "to" msgstr "para" diff --git a/components/lazreport/source/languages/lr_const.ru.po b/components/lazreport/source/languages/lr_const.ru.po index 0ce3d51bb7..574fd32946 100644 --- a/components/lazreport/source/languages/lr_const.ru.po +++ b/components/lazreport/source/languages/lr_const.ru.po @@ -236,22 +236,6 @@ msgstr "Подтвердить" msgid "CSV File" msgstr "Файл CSV" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "мм.дд.гг" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "мм.дд.гггг" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "д ммм гггг" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "д мммм гггг" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "Дата и время" @@ -1145,6 +1129,10 @@ msgstr "Инспектор о&бъектов" msgid "Line style" msgstr "Стиль линии" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new #| msgid "&New..." msgid "&New ..." @@ -2313,22 +2301,6 @@ msgstr "Новый отчёт" msgid "ASCII Text file" msgstr "Текстовый файл ASCII" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "чч:мм:сс" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "ч:мм:сс" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "чч:мм" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "ч:мм" - #: lr_const.sto msgid "to" msgstr "в" diff --git a/components/lazreport/source/languages/lr_const.uk.po b/components/lazreport/source/languages/lr_const.uk.po index df39d2c4dc..40ca1662d2 100644 --- a/components/lazreport/source/languages/lr_const.uk.po +++ b/components/lazreport/source/languages/lr_const.uk.po @@ -239,22 +239,6 @@ msgstr "Піідтвердити" msgid "CSV File" msgstr "Файл CSV" -#: lr_const.sdateformat1 -msgid "mm.dd.yy" -msgstr "мм.дд.рр" - -#: lr_const.sdateformat2 -msgid "mm.dd.yyyy" -msgstr "мм.дд.рррр" - -#: lr_const.sdateformat3 -msgid "d mmm yyyy" -msgstr "д ммм рррр" - -#: lr_const.sdateformat4 -msgid "d mmmm yyyy" -msgstr "д мммм рррр" - #: lr_const.sdatetimecategory msgid "Date and time" msgstr "Дата та час" @@ -1148,6 +1132,10 @@ msgstr "&Інспектор Об'єктів" msgid "Line style" msgstr "Стиль лінії" +#: lr_const.sfrdesignerform_modified +msgid "Modified" +msgstr "" + #: lr_const.sfrdesignerform_new #| msgid "&New..." msgid "&New ..." @@ -2316,22 +2304,6 @@ msgstr "Новий звіт" msgid "ASCII Text file" msgstr "Текстовий файл ASCII" -#: lr_const.stimeformat1 -msgid "hh:nn:ss" -msgstr "гг:хх:сс" - -#: lr_const.stimeformat2 -msgid "h:nn:ss" -msgstr "г:хх:сс" - -#: lr_const.stimeformat3 -msgid "hh:nn" -msgstr "гг:хх" - -#: lr_const.stimeformat4 -msgid "h:nn" -msgstr "г:хх" - #: lr_const.sto msgid "to" msgstr "до" diff --git a/components/lazreport/source/lr_class.pas b/components/lazreport/source/lr_class.pas index 0d96a8d7b9..a769414fdc 100644 --- a/components/lazreport/source/lr_class.pas +++ b/components/lazreport/source/lr_class.pas @@ -17,7 +17,7 @@ interface uses SysUtils, {$IFDEF UNIX}CLocale,{$ENDIF} Classes, MaskUtils, Controls, FileUtil, Forms, Dialogs, Menus, Variants, DB, Graphics, Printers, osPrinters, - DOM, XMLRead, XMLConf, LCLType, LCLIntf, TypInfo, LCLProc, LR_View, LR_Pars, + DOM, XMLWrite, XMLRead, XMLConf, LCLType, LCLIntf, TypInfo, LCLProc, LR_View, LR_Pars, LR_Intrp, LR_DSet, LR_DBSet, LR_DBRel, LR_Const, LMessages; const @@ -78,7 +78,7 @@ type TfrFrameBorder = (frbLeft, frbTop, frbRight, frbBottom); TfrFrameBorders = set of TfrFrameBorder; TfrFrameStyle = (frsSolid,frsDash, frsDot, frsDashDot, frsDashDotDot,frsDouble); - TfrPageType = (ptReport, ptDialog); + TfrPageType = (ptReport, ptDialog); //todo: - remove this TfrReportOption = (roIgnoreFieldNotFound, roIgnoreSymbolNotFound); TfrReportOptions = set of TfrReportOption; TfrObjectType = (otlReportView, otlUIControl); @@ -146,6 +146,7 @@ type TLrXMLConfig = class (TXMLConfig) public procedure LoadFromStream(const Stream: TStream); + procedure SaveToStream(const Stream: TStream); procedure SetValue(const APath: string; const AValue: string); overload; function GetValue(const APath: string; const ADefault: string): string; overload; end; @@ -703,7 +704,7 @@ type LastBand : TfrBand; ColPos : Integer; CurPos : Integer; - PageType : TfrPageType; + PageType : TfrPageType; //todo: - remove this fLayoutOrder : TLayoutOrder; procedure DoAggregate(a: Array of TfrBandType); procedure AddRecord(b: TfrBand; rt: TfrBandRecType); @@ -805,8 +806,9 @@ type private fHasVisibleControls : Boolean; FForm : TfrDialogForm; - fCaption : String; procedure EditFormDestroy(Sender: TObject); + function GetCaption: string; + procedure SetCaption(AValue: string); procedure UpdateControlPosition; protected procedure SetName(const AValue: string); override; @@ -816,6 +818,7 @@ type procedure SetTop(AValue: Integer);override; procedure SetWidth(AValue: Integer);override; procedure SetHeight(AValue: Integer);override; + procedure ExecScript; public constructor Create(AOwnerPage:TfrPage); override; destructor Destroy; override; @@ -824,7 +827,7 @@ type procedure SavetoXML(XML: TLrXMLConfig; const Path: String); override; property Form:TfrDialogForm read FForm; published - property Caption : string read fCaption write fCaption; + property Caption : string read GetCaption write SetCaption; property Left; property Top; end; @@ -1045,6 +1048,7 @@ type procedure SaveToFile(FName: String); procedure SavetoXML(XML: TLrXMLConfig; const Path: String); procedure SaveToXMLFile(const FName: String); + procedure SaveToXMLStream(const Stream: TStream); procedure LoadFromDB(Table: TDataSet; DocN: Integer); procedure SaveToDB(Table: TDataSet; DocN: Integer); @@ -1121,10 +1125,15 @@ type destructor Destroy; override; end; + { TfrReportDesigner } + TfrReportDesigner = class(TForm) + private + FModified: Boolean; + protected + procedure SetModified(AValue: Boolean);virtual; public Page: TfrPage; - Modified: Boolean; procedure {%H-}RegisterObject(ButtonBmp: TBitmap; const ButtonHint: String; ButtonTag: Integer; ObjectType:TfrObjectType); virtual; abstract; procedure {%H-}RegisterTool(const MenuCaption: String; ButtonBmp: TBitmap; @@ -1135,6 +1144,7 @@ type // function {%H-}PointsToUnits(x: Integer): Double; virtual; abstract; function {%H-}UnitsToPoints(x: Double): Integer; virtual; abstract; + property Modified: Boolean read FModified write SetModified; end; TfrDataManager = class(TObject) @@ -1633,25 +1643,27 @@ function GetDefaultDataSet: TfrTDataSet; var FRDataset: TfrDataset; begin - FRDataset := nil; - if CurBand <> nil then + Result := nil; + if Assigned(CurPage) and (CurPage is TfrPageReport) then begin - case CurBand.Typ of - btMasterData, btReportSummary, btMasterFooter, - btGroupHeader, btGroupFooter: - FRDataset := CurPage.Bands[btMasterData].DataSet; - btDetailData, btDetailFooter: - FRDataset := CurPage.Bands[btDetailData].DataSet; - btSubDetailData, btSubDetailFooter: - FRDataset := CurPage.Bands[btSubDetailData].DataSet; - btCrossData, btCrossFooter: - FRDataset := CurPage.Bands[btCrossData].DataSet; + FRDataset := nil; + if CurBand <> nil then + begin + case CurBand.Typ of + btMasterData, btReportSummary, btMasterFooter, + btGroupHeader, btGroupFooter: + FRDataset := CurPage.Bands[btMasterData].DataSet; + btDetailData, btDetailFooter: + FRDataset := CurPage.Bands[btDetailData].DataSet; + btSubDetailData, btSubDetailFooter: + FRDataset := CurPage.Bands[btSubDetailData].DataSet; + btCrossData, btCrossFooter: + FRDataset := CurPage.Bands[btCrossData].DataSet; + end; end; + if FRDataset is TfrDBDataset then + Result := TfrDBDataSet(FRDataset).GetDataSet end; - if FRDataset is TfrDBDataset then - Result := TfrDBDataSet(FRDataset).GetDataSet - else - Result := nil; end; function ReadString(Stream: TStream): String; @@ -1726,6 +1738,14 @@ begin result := copy(result, 3, Length(result)); end; +{ TfrReportDesigner } + +procedure TfrReportDesigner.SetModified(AValue: Boolean); +begin + if FModified=AValue then Exit; + FModified:=AValue; +end; + { TfrControl } procedure TfrControl.UpdateControlPosition; @@ -2503,7 +2523,7 @@ end; procedure TfrView.SetFrames(const AValue: TfrFrameBorders); begin - if (aValue<>fFrames) and (fUpdate=0) then + if (aValue<>fFrames) then begin BeforeChange; fFrames:=AValue; @@ -5944,7 +5964,7 @@ var begin Result := nil; aName:=UpperCase(aName); - if UpperCase(Self.Name) = Name then + if UpperCase(Name) = aName then Result:=Self else for i := 0 to Objects.Count - 1 do @@ -6412,13 +6432,15 @@ end; constructor TfrPage.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); + FillChar(Bands, 0, SizeOf(Bands)); + fMargins:=TfrRect.Create; BaseName:='Page'; List := TFpList.Create; Objects := TFpList.Create; RTObjects := TFpList.Create; - PageType:=ptReport; + PageType:=ptReport; //todo: - remove this end; procedure TfrPage.ShowBandByName(const s: String); @@ -7053,6 +7075,7 @@ var s: String[6]; Bool : WordBool; Rc : TRect; + APageType:TfrPageType; //todo: - remove this begin with Stream do begin @@ -7073,8 +7096,10 @@ begin UseMargins:=Bool; Read(fColCount, 4); Read(fColGap, 4); - if frVersion>23 then - Read(ord(PageType), SizeOf(TfrPageType)); +{ if frVersion>23 then + Read(ord(PageType), SizeOf(TfrPageType));} + if frVersion>23 then //todo: - remove this + Read(ord(APageType), SizeOf(TfrPageType)); //todo: - remove this Read(fLayoutOrder, 4); end; ChangePaper(pgSize, Width, Height, Orientation); @@ -7088,8 +7113,10 @@ begin dx := XML.GetValue(Path+'Width/Value'{%H-}, 0); // TODO chk dy := XML.GetValue(Path+'Height/Value'{%H-}, 0); // TODO chk - b := XML.GetValue(Path+'Height/PageType'{%H-}, ord(PageType)); - PageType:=TfrPageType(b); +{ b := XML.GetValue(Path+'PageType/Value'{%H-}, ord(PageType)); + PageType:=TfrPageType(b);} + + Script.Text:=XML.GetValue(Path+'Script/Value'{%H-}, ''); end; procedure TfrPage.SaveToStream(Stream: TStream); @@ -7113,7 +7140,7 @@ begin Write(Bool, 2); Write(ColCount, 4); Write(ColGap, 4); - Write(ord(PageType), SizeOf(TfrPageType)); + Write(ord(PageType), SizeOf(TfrPageType)); //todo: - remove this Write(LayoutOrder, 4); end; end; @@ -7123,7 +7150,8 @@ begin Inherited SavetoXML(XML,Path); XML.SetValue(Path+'Width/Value'{%H-}, Width); XML.SetValue(Path+'Height/Value'{%H-}, Height); - XML.SetValue(Path+'Height/PageType'{%H-}, ord(PageType)); +// XML.SetValue(Path+'PageType/Value'{%H-}, ord(PageType)); + XML.SetValue(Path+'Script/Value'{%H-}, Script.Text); end; {-----------------------------------------------------------------------} @@ -7297,7 +7325,10 @@ begin clname:= XML.GetValue(aPath+'ClassName/Value', 'TFRPAGEREPORT'); add(clName); + Inc(Pages[i].fUpdate); Pages[i].LoadFromXML(XML, aPath); + Dec(Pages[i].fUpdate); + oCount := XML.GetValue(aPath+'ObjectCount/Value'{%H-}, 0); for j:=0 to oCount - 1 do begin @@ -7314,7 +7345,9 @@ begin addObject(Pages[i], gtAddin, clName) end else AddObject(Pages[i], aTyp, ''); + Inc(t.fUpdate); t.LoadFromXML(XML, aSubPath); + Dec(t.fUpdate); end; end; Parent.FVal.ReadBinaryDataFromXML(XML, Path+'FVal/'); @@ -8309,7 +8342,7 @@ begin if Assigned(F.OnGetText) then aValue:=F.DisplayText else - aValue:=F.AsVariant; + aValue:=lrGetFieldValue(F);//F.AsVariant; end; vtFRVar : aValue := frParser.Calc(Field); vtOther : begin @@ -8336,7 +8369,7 @@ begin if Assigned(F.OnGetText) then aValue:=F.DisplayText else - aValue:=F.AsVariant + aValue:=lrGetFieldValue(F); ///F.AsVariant end else if (D<>nil) and (roIgnoreFieldNotFound in FReportOptions) and @@ -8657,6 +8690,20 @@ begin end; end; +procedure TfrReport.SaveToXMLStream(const Stream: TStream); +var + XML: TLrXMLConfig; +begin + XML := TLrXMLConfig.Create(nil); + XML.StartEmpty := True; + try + SaveToXML(XML, 'LazReport/'); + XML.SaveToStream(Stream); + finally + XML.Free; + end; +end; + procedure TfrReport.LoadFromDB(Table: TDataSet; DocN: Integer); var Stream: TMemoryStream; @@ -9095,28 +9142,34 @@ begin Dataset.First; end; try - for i := 0 to Pages.Count - 1 do - Pages[i].Skip := False; - - for i := 0 to Pages.Count - 1 do + if (DoublePass and not FinalPass) or (not DoublePass) then begin - if Pages[i].PageType = ptDialog then + for i := 0 to Pages.Count - 1 do + Pages[i].Skip := False; + + for i := 0 to Pages.Count - 1 do begin - Pages[i].InitReport; - if Terminated then - break; + if Pages[i] is TfrPageDialog then + begin + Pages[i].InitReport; + if Terminated then + begin + FinalPass:=true; + break; + end; + end; end; end; if not Terminated then begin for i := 0 to Pages.Count - 1 do - if Pages[i].PageType <> ptDialog then + if Pages[i] is TfrPageReport then Pages[i].InitReport; PrepareDataSets; for i := 0 to Pages.Count - 1 do - if Pages[i].PageType = ptReport then + if Pages[i]is TfrPageReport then Pages[i].PrepareObjects; repeat @@ -9130,7 +9183,7 @@ begin for i := 0 to Pages.Count - 1 do begin - if Pages[i].PageType = ptReport then + if Pages[i] is TfrPageReport then begin FCurPage := Pages[i]; if FCurPage.Skip then @@ -9469,8 +9522,8 @@ function TfrReport.ChangePrinter(OldIndex, NewIndex: Integer): Boolean; begin for i := 0 to Pages.Count - 1 do begin - with Pages[i] do - ChangePaper(pgSize, Width, Height, Orientation); + if Pages[i] is TfrPageReport then + Pages[i].ChangePaper(Pages[i].pgSize, Pages[i].Width, Pages[i].Height, Pages[i].Orientation); end; end; @@ -9577,6 +9630,7 @@ var Pg:TfrPage; begin AName:=UpperCase(AName); + Result:=nil; if (Pos('.', AName)>0) then begin APgName:=Copy2SymbDel(AName, '.'); @@ -10626,6 +10680,8 @@ begin DebugLn('Trying to find RT Object "',St,'"'); {$ENDIF} t := CurPage.FindRTObject(St); + if not Assigned(t) then + t:=CurReport.FindObject(Copy(Name, 1, Pos('.', Name) - 1)); Prop := Copy(Name, Pos('.', Name) + 1, 255); end; {$IFDEF DebugLR} @@ -10995,6 +11051,7 @@ begin Name:=XML.GetValue(Path+'Name/Value',''); if Name='' then CreateUniqueName; + Visible:=XML.GetValue(Path+'Visible/Value'{%H-}, true); end; @@ -11003,7 +11060,7 @@ begin XML.SetValue(Path+'Name/Value', GetSaveProperty('Name')); XML.SetValue(Path+'ClassName/Value', self.Classname); - XML.SetValue(Path+'Visible/Value', GetSaveProperty('Visible')); + XML.SetValue(Path+'Visible/Value', Visible); end; { TfrRect } @@ -11078,6 +11135,16 @@ begin fForm:=nil; end; +function TfrPageDialog.GetCaption: string; +begin + Result:=FForm.Caption; +end; + +procedure TfrPageDialog.SetCaption(AValue: string); +begin + FForm.Caption:=AValue; +end; + procedure TfrPageDialog.UpdateControlPosition; begin FForm.Left:=Left; @@ -11088,9 +11155,21 @@ begin end; procedure TfrPageDialog.SetName(const AValue: string); +var + S:string; + i:integer; + F:TComponent; begin inherited SetName(AValue); - fForm.Name:=Name; + S:=AValue; + F:=Application.FindComponent(S); + if Assigned(F) and (F<>FForm) then + begin + i:=1; + while Assigned(Application.FindComponent(AValue + IntToStr(i))) do inc(i); + S:=AValue + IntToStr(i); + end; + FForm.Name:=S; end; procedure TfrPageDialog.PrepareObjects; @@ -11103,7 +11182,6 @@ var i:integer; P:TfrControl; begin - //inherited InitReport; fHasVisibleControls:=False; for i:=0 to Objects.Count - 1 do begin @@ -11115,6 +11193,8 @@ begin end; end; + ExecScript; + if fHasVisibleControls then begin UpdateControlPosition; @@ -11147,6 +11227,34 @@ begin FForm.Height:=AValue; end; +procedure TfrPageDialog.ExecScript; +var +// FSaveView:TfrView; + FSavePage:TfrPage; + CmdList, ErrorList:TStringList; +begin + if DocMode = dmPrinting then + begin +// FSaveView:=CurView; + FSavePage:=CurPage; + + CmdList:=TStringList.Create; + ErrorList:=TStringList.Create; + try +// CurView := Self; + CurPage:=Self; + frInterpretator.PrepareScript(Script, CmdList, ErrorList); + frInterpretator.DoScript(CmdList); + finally + CurPage:=FSavePage; +// CurView := FSaveView; + FreeAndNil(CmdList); + FreeAndNil(ErrorList); + end; + end; +end; + + constructor TfrPageDialog.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); @@ -11155,8 +11263,8 @@ begin fForm.OnDestroy:=@EditFormDestroy; BaseName:='Dialog'; - Width :=200; - Height:=150; + Width :=400; + Height:=250; PageType:=ptDialog; end; @@ -11206,6 +11314,12 @@ begin raise EXMLConfigError.Create(SWrongRootName); end; +procedure TLrXMLConfig.SaveToStream(const Stream: TStream); +begin + WriteXMLFile(Doc, Stream); + Flush; +end; + procedure TLrXMLConfig.SetValue(const APath: string; const AValue: string); begin inherited SetValue(UTF8Decode(APath), UTF8Decode(AValue)); diff --git a/components/lazreport/source/lr_const.pas b/components/lazreport/source/lr_const.pas index 7eea396170..3571780c9b 100644 --- a/components/lazreport/source/lr_const.pas +++ b/components/lazreport/source/lr_const.pas @@ -14,6 +14,7 @@ interface {$I LR_vers.inc} + resourcestring //--- ShapeForm resources sShapeFormCaption='Shape'; @@ -549,6 +550,7 @@ resourcestring sFRDesignerForm_Help1 = '&Help contents'; sFRDesignerForm_Help2 = 'Help &tool'; sFRDesignerForm_Line = 'Line style'; + sFRDesignerForm_Modified = 'Modified'; //--- InspForm resources ------------------------------------------------------ sObjectInspector ='Object inspector'; @@ -597,7 +599,7 @@ resourcestring sFormat53 = '_;x'; sFormat54 = 'False;True'; sFormat55 = 'Custom'; - +{ sDateFormat1 = 'mm.dd.yy'; sDateFormat2 = 'mm.dd.yyyy'; sDateFormat3 = 'd mmm yyyy'; @@ -607,7 +609,7 @@ resourcestring sTimeFormat2 = 'h:nn:ss'; sTimeFormat3 = 'hh:nn'; sTimeFormat4 = 'h:nn'; - +} //--- PreviewSearchForm resources --------------------------------------------- sFindTextCaption='Find text'; sFindTextText='Text to &find'; @@ -784,6 +786,19 @@ const SDatabase = frRes + 2341; SInsRich2Object = frRes + 2343; SFieldSizeError = frRes + 2346; + +const + //Don't localize this consts! + sDateFormat1 = 'mm.dd.yy'; + sDateFormat2 = 'mm.dd.yyyy'; + sDateFormat3 = 'd mmm yyyy'; + sDateFormat4 = 'd mmmm yyyy'; + + sTimeFormat1 = 'hh:nn:ss'; + sTimeFormat2 = 'h:nn:ss'; + sTimeFormat3 = 'hh:nn'; + sTimeFormat4 = 'h:nn'; + implementation end. diff --git a/components/lazreport/source/lr_dbcomponent.pas b/components/lazreport/source/lr_dbcomponent.pas index 159d8afd13..66e1436fa0 100644 --- a/components/lazreport/source/lr_dbcomponent.pas +++ b/components/lazreport/source/lr_dbcomponent.pas @@ -14,6 +14,7 @@ type private FFilter: string; FlrDBDataSet:TfrDBDataSet; + FlrDataSource:TDataSource; FDS:TDataSet; FDataSource: string; function GetFieldCount: integer; @@ -90,6 +91,7 @@ begin if FDS=AValue then Exit; FDS:=AValue; FlrDBDataSet.DataSet:=FDS; + FlrDataSource.DataSet:=FDS; end; procedure TLRDataSetControl.SetDataSource(AValue: string); @@ -109,6 +111,7 @@ begin inherited SetName(AValue); FDS.Name:=Name; FlrDBDataSet.Name:='_'+Name; + FlrDataSource.Name:='ds'+Name; end; procedure TLRDataSetControl.AfterLoad; @@ -149,6 +152,7 @@ constructor TLRDataSetControl.Create(AOwnerPage: TfrPage); begin inherited Create(AOwnerPage); FlrDBDataSet:=TfrDBDataSet.Create(OwnerForm); + FlrDataSource:=TDataSource.Create(OwnerForm); end; destructor TLRDataSetControl.Destroy; @@ -157,6 +161,7 @@ begin begin FreeAndNil(FDS); FreeAndNil(FlrDBDataSet); + FreeAndNil(FlrDataSource); end; inherited Destroy; end; @@ -175,357 +180,4 @@ end; end. -unit LR_DBComponent; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, DB, LR_Class, LR_DBSet; - -type - { TLRDataSetControl } - - TLRDataSetControl = class(TfrNonVisualControl) - private - FFilter: string; - FlrDBDataSet:TfrDBDataSet; - FDS:TDataSet; - FDataSource: string; - function GetFieldCount: integer; - function GetActive: boolean; - function GetEOF: boolean; - function GetRecordCount: integer; - procedure SetActive(AValue: boolean); - procedure SetDataSet(AValue: TDataSet); - procedure SetDataSource(AValue: string); - procedure SetFilter(AValue: string); - protected - FActive:boolean; - procedure SetName(const AValue: string); override; - procedure AfterLoad;override; - function ExecMetod(const AName: String; p1, p2, p3: Variant; var Val: Variant):boolean;override; - public - constructor Create(AOwnerPage:TfrPage); override; - destructor Destroy; override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - property DataSet:TDataSet read FDS write SetDataSet; - published - property Active:boolean read GetActive write SetActive; - property EOF:boolean read GetEOF; - property RecordCount:integer read GetRecordCount; - property FieldCount:integer read GetFieldCount; - property Filter:string read FFilter write SetFilter; - property DataSource:string read FDataSource write SetDataSource; - end; - -implementation - -{ TLRDataSetControl } - -function TLRDataSetControl.GetFieldCount: integer; -begin - if FDS.Active then - Result:=FDS.RecordCount - else - Result:=0; -end; - -function TLRDataSetControl.GetActive: boolean; -begin - Result:=FDS.Active -end; - -function TLRDataSetControl.GetEOF: boolean; -begin - if FDS.Active then - Result:=FDS.EOF - else - Result:=true; -end; - -function TLRDataSetControl.GetRecordCount: integer; -begin - if FDS.Active then - Result:=FDS.RecordCount - else - Result:=0; -end; - -procedure TLRDataSetControl.SetActive(AValue: boolean); -begin -{ FActive:=AValue; - if Assigned(FDS.Connection) then} - FDS.Active:=AValue; -end; - -procedure TLRDataSetControl.SetDataSet(AValue: TDataSet); -begin - if FDS=AValue then Exit; - FDS:=AValue; - FlrDBDataSet.DataSet:=FDS; -end; - -procedure TLRDataSetControl.SetDataSource(AValue: string); -begin - if FDataSource=AValue then Exit; - FDataSource:=AValue; -end; - -procedure TLRDataSetControl.SetFilter(AValue: string); -begin - if FFilter=AValue then Exit; - FFilter:=AValue; -end; - -procedure TLRDataSetControl.SetName(const AValue: string); -begin - inherited SetName(AValue); - FDS.Name:=Name; - FlrDBDataSet.Name:='_'+Name; -end; - -procedure TLRDataSetControl.AfterLoad; -begin - inherited AfterLoad; - DataSet.Active:=FActive; -end; - -function TLRDataSetControl.ExecMetod(const AName: String; p1, p2, p3: Variant; - var Val: Variant): boolean; -begin - Result:=inherited ExecMetod(AName, p1, p2, p3, Val); - if Result then exit; - - if AName = 'NEXT' then - FDS.Next - else - if AName = 'FIRST' then - FDS.First - else - if AName = 'LAST' then - FDS.Last - else - if AName = 'PRIOR' then - FDS.Prior - else - if AName = 'OPEN' then - FDS.Open - else - if AName = 'CLOSE' then - FDS.Close - else - exit; - Result:=true; -end; - -constructor TLRDataSetControl.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - FlrDBDataSet:=TfrDBDataSet.Create(OwnerForm); -end; - -destructor TLRDataSetControl.Destroy; -begin - if not (Assigned(OwnerPage) and (OwnerPage is TfrPageDialog)) then - begin - FreeAndNil(FDS); - FreeAndNil(FlrDBDataSet); - end; - inherited Destroy; -end; - -procedure TLRDataSetControl.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - FActive := XML.GetValue(Path + 'Active/Value'{%H-}, false); -end; - -procedure TLRDataSetControl.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'Active/Value', Active); -end; - -end. - -unit LR_DBComponent; - -{$mode objfpc}{$H+} - -interface - -uses - Classes, SysUtils, DB, LR_Class, LR_DBSet; - -type - { TLRDataSetControl } - - TLRDataSetControl = class(TfrNonVisualControl) - private - FFilter: string; - FlrDBDataSet:TfrDBDataSet; - FDS:TDataSet; - FDataSource: string; - function GetFieldCount: integer; - function GetActive: boolean; - function GetEOF: boolean; - function GetRecordCount: integer; - procedure SetActive(AValue: boolean); - procedure SetDataSet(AValue: TDataSet); - procedure SetDataSource(AValue: string); - procedure SetFilter(AValue: string); - protected - FActive:boolean; - procedure SetName(const AValue: string); override; - procedure AfterLoad;override; - function ExecMetod(const AName: String; p1, p2, p3: Variant; var Val: Variant):boolean;override; - public - constructor Create(AOwnerPage:TfrPage); override; - destructor Destroy; override; - - procedure LoadFromXML(XML: TLrXMLConfig; const Path: String); override; - procedure SaveToXML(XML: TLrXMLConfig; const Path: String); override; - property DataSet:TDataSet read FDS write SetDataSet; - published - property Active:boolean read GetActive write SetActive; - property EOF:boolean read GetEOF; - property RecordCount:integer read GetRecordCount; - property FieldCount:integer read GetFieldCount; - property Filter:string read FFilter write SetFilter; - property DataSource:string read FDataSource write SetDataSource; - end; - -implementation - -{ TLRDataSetControl } - -function TLRDataSetControl.GetFieldCount: integer; -begin - if FDS.Active then - Result:=FDS.RecordCount - else - Result:=0; -end; - -function TLRDataSetControl.GetActive: boolean; -begin - Result:=FDS.Active -end; - -function TLRDataSetControl.GetEOF: boolean; -begin - if FDS.Active then - Result:=FDS.EOF - else - Result:=true; -end; - -function TLRDataSetControl.GetRecordCount: integer; -begin - if FDS.Active then - Result:=FDS.RecordCount - else - Result:=0; -end; - -procedure TLRDataSetControl.SetActive(AValue: boolean); -begin -{ FActive:=AValue; - if Assigned(FDS.Connection) then} - FDS.Active:=AValue; -end; - -procedure TLRDataSetControl.SetDataSet(AValue: TDataSet); -begin - if FDS=AValue then Exit; - FDS:=AValue; - FlrDBDataSet.DataSet:=FDS; -end; - -procedure TLRDataSetControl.SetDataSource(AValue: string); -begin - if FDataSource=AValue then Exit; - FDataSource:=AValue; -end; - -procedure TLRDataSetControl.SetFilter(AValue: string); -begin - if FFilter=AValue then Exit; - FFilter:=AValue; -end; - -procedure TLRDataSetControl.SetName(const AValue: string); -begin - inherited SetName(AValue); - FDS.Name:=Name; - FlrDBDataSet.Name:='_'+Name; -end; - -procedure TLRDataSetControl.AfterLoad; -begin - inherited AfterLoad; - DataSet.Active:=FActive; -end; - -function TLRDataSetControl.ExecMetod(const AName: String; p1, p2, p3: Variant; - var Val: Variant): boolean; -begin - Result:=inherited ExecMetod(AName, p1, p2, p3, Val); - if Result then exit; - - if AName = 'NEXT' then - FDS.Next - else - if AName = 'FIRST' then - FDS.First - else - if AName = 'LAST' then - FDS.Last - else - if AName = 'PRIOR' then - FDS.Prior - else - if AName = 'OPEN' then - FDS.Open - else - if AName = 'CLOSE' then - FDS.Close - else - exit; - Result:=true; -end; - -constructor TLRDataSetControl.Create(AOwnerPage: TfrPage); -begin - inherited Create(AOwnerPage); - FlrDBDataSet:=TfrDBDataSet.Create(OwnerForm); -end; - -destructor TLRDataSetControl.Destroy; -begin - if not (Assigned(OwnerPage) and (OwnerPage is TfrPageDialog)) then - begin - FreeAndNil(FDS); - FreeAndNil(FlrDBDataSet); - end; - inherited Destroy; -end; - -procedure TLRDataSetControl.LoadFromXML(XML: TLrXMLConfig; const Path: String); -begin - inherited LoadFromXML(XML, Path); - FActive := XML.GetValue(Path + 'Active/Value'{%H-}, false); -end; - -procedure TLRDataSetControl.SaveToXML(XML: TLrXMLConfig; const Path: String); -begin - inherited SaveToXML(XML, Path); - XML.SetValue(Path+'Active/Value', Active); -end; - -end. diff --git a/components/lazreport/source/lr_dbrel.pas b/components/lazreport/source/lr_dbrel.pas index 6780404feb..19cd7643c8 100644 --- a/components/lazreport/source/lr_dbrel.pas +++ b/components/lazreport/source/lr_dbrel.pas @@ -35,9 +35,23 @@ procedure frGetFieldNames(DataSet: TfrTDataSet; List: TStrings); function frGetBookmark(DataSet: TfrTDataSet): TfrBookmark; procedure frFreeBookmark(DataSet: TfrTDataSet; Bookmark: TfrBookmark); procedure frGotoBookmark(DataSet: TfrTDataSet; Bookmark: TfrBookmark); +function frGetDataSource(Owner: TComponent; d: TDataSet): TDataSource; +function lrGetFieldValue(F:TField):Variant; + +const + TypeStringField = [ftString, ftMemo, ftFmtMemo, ftFixedChar, ftWideString, + ftFixedWideChar, ftWideMemo]; + + TypeNumericField = [ftFloat, ftCurrency, ftBCD, ftDate, ftTime, ftDateTime, + ftTimeStamp]; + + TypeIntegerField = [ftSmallint, ftInteger, ftWord, ftAutoInc, ftLargeint]; + + TypeBooleanField = [ftBoolean]; implementation +uses LR_Utils; function frIsBlob(Field: TfrTField): Boolean; begin @@ -46,6 +60,7 @@ end; procedure frGetFieldNames(DataSet: TfrTDataSet; List: TStrings); begin + if not Assigned(DataSet) then exit; if DataSet.FieldCount > 0 then DataSet.GetFieldNames(List) else @@ -66,6 +81,51 @@ begin DataSet.GotoBookmark(BookMark); end; +function frGetDataSource(Owner: TComponent; d: TDataSet): TDataSource; +var + i: Integer; + sl: TStringList; + ds: TDataSource; +begin + sl := TStringList.Create; + Result := nil; + frGetComponents(Owner, TDataSource, sl, nil); + for i := 0 to sl.Count - 1 do + begin + ds := frFindComponent(Owner, sl[i]) as TDataSource; + if (ds <> nil) and (ds.DataSet = d) then + begin + Result := ds; + break; + end; + end; + sl.Free; +end; + +function lrGetFieldValue(F: TField): Variant; +begin + if Assigned(F) then + begin + if F.IsNull then + begin + if F.DataType in TypeStringField then + Result:='' + else + if F.DataType in (TypeIntegerField + TypeNumericField) then + Result:=0 + else + if F.DataType in TypeBooleanField then + Result:=false + else + Result:=null + end + else + Result:=F.Value; + end + else + Result:=null; +end; + procedure frFreeBookmark(DataSet: TfrTDataSet; Bookmark: TfrBookmark); begin DataSet.FreeBookmark(BookMark); diff --git a/components/lazreport/source/lr_desgn.lfm b/components/lazreport/source/lr_desgn.lfm index be4c4ae703..68fb063fd0 100644 --- a/components/lazreport/source/lr_desgn.lfm +++ b/components/lazreport/source/lr_desgn.lfm @@ -35,6 +35,9 @@ inherited frDesignerForm: TfrDesignerForm item Width = 230 end + item + Width = 100 + end item Width = 50 end> @@ -160,6 +163,7 @@ inherited frDesignerForm: TfrDesignerForm Height = 24 Top = 1 Width = 22 + Action = FileSave Align = alLeft Flat = True Glyph.Data = { @@ -199,7 +203,7 @@ inherited frDesignerForm: TfrDesignerForm 39FFBD6D39FFBD6D39FFBD6939FFBD7139FF0000000000000000 } NumGlyphs = 0 - OnClick = FileBtn3Click + ShowCaption = False end object FileBtn4: TSpeedButton Tag = 43 @@ -4801,13 +4805,10 @@ inherited frDesignerForm: TfrDesignerForm OnClick = FileBtn2Click end object N20: TMenuItem - Caption = 'Save' - ShortCut = 16467 - OnClick = FileBtn3Click + Action = FileSave end object N17: TMenuItem - Caption = 'Save as...' - OnClick = N20Click + Action = FileSaveAs end object N40: TMenuItem Caption = '-' @@ -5172,6 +5173,7 @@ inherited frDesignerForm: TfrDesignerForm } end object actList: TActionList[14] + Images = ActionsImageList left = 560 top = 36 object acDuplicate: TAction @@ -5186,5 +5188,56 @@ inherited frDesignerForm: TfrDesignerForm OnExecute = acToggleFramesExecute ShortCut = 16454 end + object FileSave: TAction + Category = 'File' + Caption = 'Save' + ImageIndex = 0 + OnExecute = FileSaveExecute + ShortCut = 16467 + end + object FileSaveAs: TAction + Category = 'File' + Caption = 'Save as...' + OnExecute = FileSaveAsExecute + end + end + object ActionsImageList: TImageList[15] + left = 328 + top = 156 + Bitmap = { + 4C6901000000100000001000000000000000BD6931FFBD6931FFBD6931FFBD69 + 31FFBD6931FFBD6931FFBD6931FFBD6931FFBD6D39FFBD6D39FFBD6D39FFBD69 + 39FFBD7139FF0000000000000000BD6931FFF7E7D6FFF7E7D6FFFFFFFFFFFFFF + F7FFFFFFF7FFFFF7F7FFFFF7EFFFFFF7EFFFFFFFF7FFFFFFF7FFFFF7EFFFFFEF + DEFFEFD7BDFFCE8E5AFF00000000BD6931FFF7DFD6FFEFAE84FFFFFFF7FFFFFF + F7FFCE8E63FFFFF7EFFFFFF7EFFFFFF7F7FFFFFFFFFFFFF7F7FFFFEFE7FFFFE7 + DEFFEFD7BDFFEFD7BDFFBD7139FFBD6931FFF7DFD6FFEFAE7BFFFFF7F7FFFFF7 + F7FFCE8E63FFFFF7EFFFFFF7EFFFFFFFF7FFFFFFF7FFFFF7EFFFFFEFDEFFF7E7 + DEFFE7A67BFFEFD7C6FFB56931FFBD6931FFF7DFCEFFE7AE7BFFFFF7EFFFFFF7 + EFFFCE8E63FFFFF7EFFFFFFFF7FFFFFFFFFFFFF7EFFFFFEFDEFFF7E7DEFFF7E7 + DEFFE7A67BFFE7C7ADFFB56931FFBD6931FFF7DFCEFFE7A67BFFFFEFE7FFFFEF + E7FFFFEFE7FFFFF7EFFFFFFFF7FFFFF7F7FFFFEFE7FFF7E7DEFFF7E7DEFFF7E7 + DEFFDEA673FFE7BEA5FFB56531FFBD6931FFF7DFC6FFE7A67BFFCE8E63FFCE8E + 63FFCE8E63FFCE966BFFCE966BFFCE966BFFCE8E63FFCE8E63FFCE8E63FFCE8E + 63FFDE9E73FFE7BE9CFFB56531FFBD6931FFF7DFC6FFE7A67BFFE7A67BFFE7A6 + 7BFFE7A67BFFE7A67BFFE7A67BFFE7A67BFFDEA673FFDE9E73FFDE9E73FFDE9E + 73FFDE9E73FFDEB69CFFB56531FFBD6931FFF7D7C6FFE7A67BFFE7A67BFFE7A6 + 7BFFE7A67BFFE7A67BFFE7A67BFFE7A67BFFDEA673FFDE9E73FFDE9E73FFDE9E + 73FFDE9E73FFDEB694FFAD6531FFBD6931FFF7D7BDFFE7A67BFFE7A67BFFE7A6 + 7BFFE7A67BFFE7A67BFFE7A67BFFDE9E73FFDE9E73FFDE9E73FFDE9E73FFDE9E + 73FFD69E73FFD6AE8CFFAD6131FFBD6931FFEFD7BDFFE7A67BFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFD6966BFFD6A68CFFAD6131FFBD6939FFEFCFBDFFE7A67BFFFFFFF7FF63C7 + 8CFF63C78CFF63C78CFF63C78CFF63C78CFF63C78CFF63C78CFF63C78CFFFFFF + F7FFCE966BFFCEA684FFAD6131FFBD6D39FFEFCFB5FFE7A67BFFFFFFF7FFBDDF + C6FFBDDFC6FFBDDFC6FFBDDFC6FFBDDFC6FFBDDFC6FFBDDFC6FFBDDFC6FFFFFF + F7FFCE966BFFCE9E84FFAD6131FFBD6931FFEFCFB5FFE7A67BFFFFFFF7FF63C7 + 8CFF63C78CFF63C78CFF63C78CFF63C78CFF63C78CFF63C78CFF63C78CFFFFFF + F7FFCE8E63FFCE9E7BFFA56131FFBD6931FFEFC7ADFFEFC7ADFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFCE9E7BFFC69E7BFFA56131FFBD6931FFBD6931FFBD6931FFB56931FFB569 + 31FFB56531FFB56531FFB56531FFAD6531FFAD6131FFAD6131FFAD6131FFAD61 + 31FFA56131FFA56131FFAD6131FF + } end end diff --git a/components/lazreport/source/lr_desgn.pas b/components/lazreport/source/lr_desgn.pas index 471e59630d..e4f6132aaa 100644 --- a/components/lazreport/source/lr_desgn.pas +++ b/components/lazreport/source/lr_desgn.pas @@ -97,6 +97,7 @@ type { TfrObjectInspector } TfrObjectInspector = Class({$IFDEF EXTOI}TForm{$ELSE}TPanel{$ENDIF}) private + FSelectedObject: TObject; fPropertyGrid : TCustomPropertiesGrid; {$IFNDEF EXTOI} fcboxObjList : TComboBox; @@ -127,6 +128,7 @@ type procedure cboxObjListOnChanged(Sender: TObject); procedure SetModifiedEvent(AEvent: TNotifyEvent); procedure Refresh; + property SelectedObject:TObject read FSelectedObject; end; { TfrDesignerPage } @@ -183,6 +185,8 @@ type TfrDesignerForm = class(TfrReportDesigner) acDuplicate: TAction; + FileSaveAs: TAction; + FileSave: TAction; acToggleFrames: TAction; actList: TActionList; frSpeedButton1: TSpeedButton; @@ -194,6 +198,7 @@ type frTBSeparator16: TPanel; Image1: TImage; Image2: TImage; + ActionsImageList: TImageList; ImgIndic: TImageList; LinePanel: TPanel; OB7: TSpeedButton; @@ -360,6 +365,8 @@ type procedure acDuplicateExecute(Sender: TObject); procedure acToggleFramesExecute(Sender: TObject); procedure C2GetItems(Sender: TObject); + procedure FileSaveAsExecute(Sender: TObject); + procedure FileSaveExecute(Sender: TObject); procedure FormCreate(Sender: TObject); procedure FormDestroy(Sender: TObject); procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); @@ -385,7 +392,7 @@ type procedure GB2Click(Sender: TObject); procedure FileBtn1Click(Sender: TObject); procedure FileBtn2Click(Sender: TObject); - procedure FileBtn3Click(Sender: TObject); + //procedure FileBtn3Click(Sender: TObject); procedure FormShow(Sender: TObject); procedure FormHide(Sender: TObject); procedure N8Click(Sender: TObject); @@ -414,7 +421,7 @@ type procedure GB3Click(Sender: TObject); procedure UndoBClick(Sender: TObject); procedure RedoBClick(Sender: TObject); - procedure N20Click(Sender: TObject); + //procedure N20Click(Sender: TObject); procedure PBox1Paint(Sender: TObject); procedure SB1Click(Sender: TObject); procedure SB2Click(Sender: TObject); @@ -450,7 +457,7 @@ type EditAfterInsert: Boolean; FCurDocName, FCaption: String; fCurDocFileType: Integer; - FileModified: Boolean; + //FileModified: Boolean; ShapeMode: TfrShapeMode; {$IFDEF StdOI} @@ -542,6 +549,8 @@ type procedure ToggleFrames(View: TfrView; Data: PtrInt); procedure DuplicateView(View: TfrView; Data: PtrInt); procedure ResetDuplicateCount; + protected + procedure SetModified(AValue: Boolean);override; public constructor Create(aOwner : TComponent); override; destructor Destroy; override; @@ -935,19 +944,16 @@ end; procedure TfrDesignerPage.DrawDialog(N: Integer; AClipRgn: HRGN); Var Dlg : TfrPageDialog; - - i,iy : Integer; + i : Integer; t : TfrView; - R, R1 : HRGN; Objects : TFpList; - begin Dlg:=TfrPageDialog(FDesigner.Page); with Canvas do begin Brush.Color := clGray; - FillRect(Rect(0,0,Width,Width)); + FillRect(Rect(0,0, Width, Height + 20)); Brush.Color := clBtnFace; Brush.Style := bsSolid; @@ -955,72 +961,17 @@ begin Brush.Color := clBlue; Rectangle(Rect(0,0,FDesigner.Page.Width-1,20)); - Canvas.TextRect(Rect(0,0,FDesigner.Page.Width-1,20),1,5,Dlg.Caption); + Canvas.TextRect(Rect(0,0,FDesigner.Page.Width-1,20), 1, 5, Dlg.Caption); end; Objects := FDesigner.Page.Objects; -// R:=CreateRectRgn(0, 0, Width, Height); + for i:=Objects.Count-1 downto 0 do begin t := TfrView(Objects[i]); t.draw(Canvas); end; - -{ begin - t := TfrView(Objects[i]); - {$IFDEF DebugLR} - DebugLn('Draw ',InttoStr(i),' ',t.Name); - {$ENDIF} - if i <= N then - begin - if t.selected then - t.draw(canvas) - else -// if ViewIsVisible(t) then - begin - R1 := CreateRectRgn(0, 0, 1, 1); - CombineRgn(R1, AClipRgn, R, RGN_AND); - SelectClipRgn(Canvas.Handle, R1); - DeleteObject(R1); - - t.Draw(Canvas); - - iy:=1; - //Show indicator if script it's not empty - if t.Script.Count>0 then - begin - FDesigner.ImgIndic.Draw(Canvas, t.x+1, t.y+iy, 0); - iy:=10; - end; - - end; - - end; - R1 := t.GetClipRgn(rtNormal); - CombineRgn(R, R, R1, RGN_DIFF); - DeleteObject(R1); - SelectClipRgn(Canvas.Handle, R); - end; - - CombineRgn(R, R, AClipRgn, RGN_AND); - -// DrawBackground; - - DeleteObject(R); - DeleteObject(AClipRgn); - if AClipRgn=ClipRgn then - ClipRgn := 0; - - SelectClipRgn(Canvas.Handle, 0); -} -// if not Down then -// DrawPage(dmSelection); - - {$IFDEF DebugLR} - DebugLnExit('TfrDesignerPage.Draw DONE'); - {$ENDIF} - end; procedure TfrDesignerPage.Draw(N: Integer; AClipRgn: HRGN); @@ -1567,7 +1518,8 @@ begin begin if GetUnusedBand <> btNone then CreateSection - else begin + else + begin {$IFDEF DebugLR} DebugLnExit('Inserting a new object DONE: GetUnusedBand=btNone'); DebugLnExit('TfrDesignerPage.MUp DONE: Inserting..'); @@ -1702,7 +1654,7 @@ begin if not ObjRepeat then begin - if FDesigner.panForDlg.Visible then + if FDesigner.Page is TfrPageReport then FDesigner.OB1.Down := True else FDesigner.OB7.Down := True @@ -2550,7 +2502,8 @@ begin //Panel6.Caption := sFRDesignerFormTools; FileBtn1.Hint := sFRDesignerFormNewRp; FileBtn2.Hint := sFRDesignerFormOpenRp; - FileBtn3.Hint := sFRDesignerFormSaveRp; + //FileBtn3.Hint := sFRDesignerFormSaveRp; + FileSave.Hint:= sFRDesignerFormSaveRp; FileBtn4.Hint := sFRDesignerFormPreview; CutB.Hint := sFRDesignerFormCut; CopyB.Hint := sFRDesignerFormCopy; @@ -2618,7 +2571,10 @@ begin FileMenu.Caption := sFRDesignerForm_File; N23.Caption := sFRDesignerForm_New; N19.Caption := sFRDesignerForm_Open; - N20.Caption := sFRDesignerForm_Save; + //N20.Caption := sFRDesignerForm_Save; + //N17.Caption := sFRDesignerForm_SaveAs; + FileSaveAs.Caption:= sFRDesignerForm_Save; + FileSaveAs.Caption:= sFRDesignerForm_SaveAs; N42.Caption := sFRDesignerForm_Var; N8.Caption := sFRDesignerForm_RptOpt; N25.Caption := sFRDesignerForm_PgOpt; @@ -2649,7 +2605,6 @@ begin Pan6.Caption := sFRDesignerForm_AlignPalette; Pan7.Caption := sFRDesignerForm_Tools3; N34.Caption := sFRDesignerForm_About; - N17.Caption := sFRDesignerForm_SaveAs; N22.Caption := sFRDesignerForm_Help1; N35.Caption := sFRDesignerForm_Help2; StB1.Hint := sFRDesignerForm_Line; @@ -2679,6 +2634,70 @@ begin end; end; +procedure TfrDesignerForm.FileSaveAsExecute(Sender: TObject); +var + s: String; +begin + WasOk := False; + with SaveDialog1 do + begin + Filter := sFormFile + ' (*.frf)|*.frf|' + + sTemplFile + ' (*.frt)|*.frt|' + + sLazFormFile + ' (*.lrf)|*.lrf' + + ''; + InitialDir:=ExtractFilePath(ParamStrUTF8(0)); + FileName := CurDocName; + FilterIndex := 3; + if Execute then + FCurDocFileType := FilterIndex; + case FCurDocFileType of + dtFastReportForm: + begin + s := ChangeFileExt(FileName, '.frf'); + CurReport.SaveToFile(s); + CurDocName := s; + WasOk := True; + end; + dtFastReportTemplate: + begin + s := ExtractFileName(ChangeFileExt(FileName, '.frt')); + if frTemplateDir <> '' then + s := frTemplateDir + PathDelim + s; + frTemplNewForm := TfrTemplNewForm.Create(nil); + with frTemplNewForm do + if ShowModal = mrOk then + begin + CurReport.SaveTemplate(s, Memo1.Lines, Image1.Picture.Bitmap); + WasOk := True; + end; + frTemplNewForm.Free; + end; + dtLazReportForm: // lasreport form xml format + begin + s := ChangeFileExt(FileName, '.lrf'); + CurReport.SaveToXMLFile(s); + CurDocName := s; + WasOk := True; + end; + end; + end; +end; + +procedure TfrDesignerForm.FileSaveExecute(Sender: TObject); +begin + if CurDocName <> sUntitled then + begin + if FCurDocFileType=dtLazReportForm then + CurReport.SaveToXMLFile(curDocName) + else + CurReport.SaveToFile(CurDocName); +// FileModified := False; + Modified := False; + end + else + FileSaveAs.Execute; +end; + procedure TfrDesignerForm.acDuplicateExecute(Sender: TObject); begin DuplicateSelection; @@ -2709,7 +2728,7 @@ begin ClearUndoBuffer; ClearRedoBuffer; Modified := False; - FileModified := False; + //FileModified := False; Busy := True; DocMode := dmDesigning; @@ -2967,7 +2986,8 @@ begin if WasOk then begin Modified := True; - FileModified := True; + //FileModified := True; + Modified := True; CurPage := CurReport.Pages.Count - 1 end else @@ -3009,7 +3029,8 @@ begin fInBuildPage:=True; try Modified := True; - FileModified := True; + //FileModified := True; + Modified := True; with CurReport do begin if (n >= 0) and (n < Pages.Count) then @@ -3173,6 +3194,7 @@ end; procedure TfrDesignerForm.OnModify(sender: TObject); begin + Modified:=true; SelectionChanged; end; @@ -3807,7 +3829,8 @@ end; function TfrDesignerForm.CheckFileModified: Integer; begin result := mrNo; - if FileModified then +// if FileModified then + if Modified then begin result:=MessageDlg(sSaveChanges + ' ' + sTo + ' ' + ExtractFileName(CurDocName) + '?',mtConfirmation, @@ -3816,7 +3839,8 @@ begin if result = mrCancel then Exit; if result = mrYes then begin - FileBtn3Click(nil); + FileSave.Execute; +// FileBtn3Click(nil); if not WasOk then result := mrCancel; end; @@ -3914,6 +3938,16 @@ end; {$endif} +procedure TfrDesignerForm.SetModified(AValue: Boolean); +begin + inherited SetModified(AValue); + if AValue then + StatusBar1.Panels[2].Text:=sFRDesignerForm_Modified + else + StatusBar1.Panels[2].Text:=''; + FileSave.Enabled:=AValue; +end; + {$HINTS ON} function TfrDesignerForm.RectTypEnabled: Boolean; @@ -4003,71 +4037,79 @@ begin ColorSelector.Hide; LinePanel.Hide; EnableControls; - if SelNum = 1 then + if Page is TfrPageReport then begin - t := TfrView(Objects[TopSelected]); - if t.Typ <> gtBand then - with t do + if SelNum = 1 then begin - {$IFDEF DebugLR} - DebugLn('Not a band'); - {$ENDIF} - FrB1.Down := (frbTop in Frames); - FrB2.Down := (frbLeft in Frames); - FrB3.Down := (frbBottom in Frames); - FrB4.Down := (frbRight in Frames); - E1.Text := FloatToStrF(FrameWidth, ffGeneral, 2, 2); - frSetGlyph(FillColor, ClB1, 1); - frSetGlyph(FrameColor, ClB3, 2); - if t is TfrMemoView then - with t as TfrMemoView do + t := TfrView(Objects[TopSelected]); + if t.Typ <> gtBand then + with t do begin - frSetGlyph(Font.Color, ClB2, 0); - if C2.ItemIndex <> C2.Items.IndexOf(Font.Name) then - C2.ItemIndex := C2.Items.IndexOf(Font.Name); - - if C3.Text <> IntToStr(Font.Size) then - C3.Text := IntToStr(Font.Size); - - FnB1.Down := fsBold in Font.Style; - FnB2.Down := fsItalic in Font.Style; - FnB3.Down := fsUnderline in Font.Style; - - AlB4.Down := (Adjust and $4) <> 0; - AlB5.Down := (Adjust and $18) = $8; - AlB6.Down := (Adjust and $18) = 0; - AlB7.Down := (Adjust and $18) = $10; - case (Adjust and $3) of - 0: BDown(AlB1); - 1: BDown(AlB2); - 2: BDown(AlB3); - 3: BDown(AlB8); + {$IFDEF DebugLR} + DebugLn('Not a band'); + {$ENDIF} + FrB1.Down := (frbTop in Frames); + FrB2.Down := (frbLeft in Frames); + FrB3.Down := (frbBottom in Frames); + FrB4.Down := (frbRight in Frames); + E1.Text := FloatToStrF(FrameWidth, ffGeneral, 2, 2); + frSetGlyph(FillColor, ClB1, 1); + frSetGlyph(FrameColor, ClB3, 2); + if t is TfrMemoView then + with t as TfrMemoView do + begin + frSetGlyph(Font.Color, ClB2, 0); + if C2.ItemIndex <> C2.Items.IndexOf(Font.Name) then + C2.ItemIndex := C2.Items.IndexOf(Font.Name); + + if C3.Text <> IntToStr(Font.Size) then + C3.Text := IntToStr(Font.Size); + + FnB1.Down := fsBold in Font.Style; + FnB2.Down := fsItalic in Font.Style; + FnB3.Down := fsUnderline in Font.Style; + + AlB4.Down := (Adjust and $4) <> 0; + AlB5.Down := (Adjust and $18) = $8; + AlB6.Down := (Adjust and $18) = 0; + AlB7.Down := (Adjust and $18) = $10; + case (Adjust and $3) of + 0: BDown(AlB1); + 1: BDown(AlB2); + 2: BDown(AlB3); + 3: BDown(AlB8); + end; end; end; + end + else if SelNum > 1 then + begin + {$IFDEF DebugLR} + DebugLn('Multiple selection'); + {$ENDIF} + + BUp(FrB1); + BUp(FrB2); + BUp(FrB3); + BUp(FrB4); + ColorLocked := True; + frSetGlyph(0, ClB1, 1); + ColorLocked := False; + E1.Text := '1'; + C2.ItemIndex := -1; + C3.Text := ''; + BUp(FnB1); + BUp(FnB2); + BUp(FnB3); + BDown(AlB1); + BUp(AlB4); + BUp(AlB5); end; end - else if SelNum > 1 then + else begin - {$IFDEF DebugLR} - DebugLn('Multiple selection'); - {$ENDIF} - - BUp(FrB1); - BUp(FrB2); - BUp(FrB3); - BUp(FrB4); - ColorLocked := True; - frSetGlyph(0, ClB1, 1); - ColorLocked := False; - E1.Text := '1'; - C2.ItemIndex := -1; - C3.Text := ''; - BUp(FnB1); - BUp(FnB2); - BUp(FnB3); - BDown(AlB1); - BUp(AlB4); - BUp(AlB5); + if ObjInsp.SelectedObject = Page then + PageView.Invalidate; end; Busy := False; ShowPosition; @@ -4102,7 +4144,7 @@ begin else if t.Memo.Count > 0 then s := s + ': ' + t.Memo[0]; end; - StatusBar1.Panels[2].Text := s; + StatusBar1.Panels[3].Text := s; end; procedure TfrDesignerForm.DoClick(Sender: TObject); @@ -4491,7 +4533,8 @@ begin CurReport.Pages.Add; CurPage := 0; CurDocName := sUntitled; - FileModified := False; + //FileModified := False; + Modified := False; FCurDocFileType := 3; end; @@ -4905,7 +4948,7 @@ begin RedoB.Enabled := True; end; Modified := True; - FileModified := True; + //FileModified := True; end; procedure TfrDesignerForm.AddUndoAction(a: TfrUndoAction); @@ -5195,12 +5238,13 @@ begin else raise Exception.Create('Unrecognized file format'); end; - FileModified := False; + //FileModified := False; + Modified := False; CurPage := 0; // do all end; end; end; - +{ procedure TfrDesignerForm.N20Click(Sender: TObject); // save as var s: String; @@ -5258,18 +5302,40 @@ begin CurReport.SaveToXMLFile(curDocName) else CurReport.SaveToFile(CurDocName); - FileModified := False; +// FileModified := False; + Modified := False; end else N20Click(nil); end; - +} procedure TfrDesignerForm.FileBtn4Click(Sender: TObject); // preview var v1, v2: Boolean; + TestRepStream:TMemoryStream; + Rep, SaveR:TfrReport; + +procedure DoClearFormsName; +var + i:integer; +begin + for i:=0 to CurReport.Pages.Count - 1 do + if CurReport.Pages[i] is TfrPageDialog then + TfrPageDialog(CurReport.Pages[i]).Form.Name:=''; +end; + +procedure DoResoreFormsName; +var + i:integer; +begin + for i:=0 to CurReport.Pages.Count - 1 do + if CurReport.Pages[i] is TfrPageDialog then + TfrPageDialog(CurReport.Pages[i]).Form.Name:=TfrPageDialog(CurReport.Pages[i]).Name; +end; + begin if CurReport is TfrCompositeReport then Exit; - v1 := ObjInsp.Visible; +{ v1 := ObjInsp.Visible; v2 := CurReport.ModalPreview; ObjInsp.Visible:=False; Application.ProcessMessages; @@ -5282,7 +5348,33 @@ begin SetFocus; DisableDrawing := False; CurPage := 0; + end;} + Application.ProcessMessages; + SaveR:=CurReport; + TestRepStream:=TMemoryStream.Create; + CurReport.SaveToXMLStream(TestRepStream); + TestRepStream.Position:=0; + + DoClearFormsName; + CurReport:=nil; + + Rep:=TfrReport.Create(nil); + try + Rep.LoadFromXMLStream(TestRepStream); + Rep.ShowReport; + FreeAndNil(Rep) + except + on E:Exception do + begin + ShowMessage(E.Message); + if Assigned(Rep) then + FreeAndNil(Rep) + end; end; + TestRepStream.Free; + CurReport:=SaveR; + CurPage := 0; + DoResoreFormsName; end; procedure TfrDesignerForm.N42Click(Sender: TObject); // var editor @@ -5290,7 +5382,7 @@ begin if ShowEvEditor(CurReport) then begin Modified := True; - FileModified := True; +// FileModified := True; end; end; @@ -5331,7 +5423,7 @@ begin if ShowModal = mrOk then begin Modified := True; - FileModified := True; +// FileModified := True; WasOk := True; PrintToPrevPage := CB1.Checked; UseMargins := not CB5.Checked; @@ -5407,7 +5499,7 @@ begin CurReport.ReportVersionBuild:=edtBuild.Text; CurReport.ReportAutor:=edAutor.Text; Modified := True; - FileModified := True; +// FileModified := True; end; CurPage := CurPage; Free; @@ -5648,7 +5740,8 @@ procedure TfrDesignerForm.frDesignerFormCloseQuery(Sender: TObject; var Res:integer; begin - if FileModified and (CurReport<>nil) and +// if FileModified and (CurReport<>nil) and + if Modified and (CurReport<>nil) and (not ((csDesigning in CurReport.ComponentState) and CurReport.StoreInDFM)) then begin Res:=Application.MessageBox(PChar(sSaveChanges + ' ' + sTo + ' ' + ExtractFileName(CurDocName) + '?'), @@ -5658,13 +5751,16 @@ begin mrNo: begin CanClose := True; - FileModified := False; // no means don't want changes +// FileModified := False; // no means don't want changes + Modified := False; // no means don't want changes ModalResult := mrCancel; end; mrYes: begin - FileBtn3Click(nil); - CanClose := not FileModified; + FileSave.Execute; +// FileBtn3Click(nil); +// CanClose := not FileModified; + CanClose := not Modified; end; else CanClose := False; @@ -5790,7 +5886,7 @@ begin SetMenuItemBitmap(N23, FileBtn1); SetMenuItemBitmap(N19, FileBtn2); - SetMenuItemBitmap(N20, FileBtn3); +// SetMenuItemBitmap(N20, FileBtn3); SetMenuItemBitmap(N39, FileBtn4); SetMenuItemBitmap(N10, ExitB); @@ -6925,12 +7021,17 @@ begin if Objects.Count <> fcboxObjList.Items.Count then begin fcboxObjList.Clear; + fcboxObjList.AddItem(TfrObject(frDesigner.Page).Name, TObject(frDesigner.Page)); + for i:=0 to Objects.Count-1 do fcboxObjList.AddItem(TfrView(Objects[i]).Name, TObject(Objects[i])); end; + FSelectedObject:=nil; + if (Obj=nil) or (Obj is TPersistent) then begin + FSelectedObject:=Obj; fPropertyGrid.TIObject := TPersistent(Obj); if Obj <> nil then fcboxObjList.ItemIndex := fcboxObjList.Items.IndexOfObject(Obj); diff --git a/components/lazreport/source/lr_pars.pas b/components/lazreport/source/lr_pars.pas index 192fe171ff..e0e5437d05 100644 --- a/components/lazreport/source/lr_pars.pas +++ b/components/lazreport/source/lr_pars.pas @@ -109,7 +109,7 @@ begin j := i; case s[i] of '+': - nm[st - 2] := SumOrConcat(nm[st - 2], nm[st - 1]); + nm[st - 2] := nm[st - 2] + nm[st - 1]; //SumOrConcat(nm[st - 2], nm[st - 1]); ttOr: nm[st - 2] := nm[st - 2] or nm[st - 1]; '-':