paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2026-01-07 05:11:01 +01:00
Code Issues Packages Projects Releases Wiki Activity

renamed TSpinEdit to TFloatSpinEdit and added new TSpinEdit with integers

Browse Source 
git-svn-id: trunk@7781 -
This commit is contained in:
mattias 2005-09-22 08:59:42 +00:00
parent a0c1aa4499
commit 9228d5cd07
20 changed files with 1241 additions and 616 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
.gitattributes vendored
View File

@ -234,6 +234,7 @@ components/rtticontrols/ttichecklistbox.xpm -text svneol=native#image/x-xpixmap
components/rtticontrols/tticolorbutton.xpm -text svneol=native#image/x-xpixmap
components/rtticontrols/tticombobox.xpm -text svneol=native#image/x-xpixmap
components/rtticontrols/ttiedit.xpm -text svneol=native#image/x-xpixmap
components/rtticontrols/ttifloatspinedit.xpm svneol=native#text/plain
components/rtticontrols/ttigrid.xpm -text svneol=native#image/x-xpixmap
components/rtticontrols/ttigroupbox.xpm -text svneol=native#image/x-xpixmap
components/rtticontrols/ttiimage.xpm -text svneol=native#image/x-xpixmap
@ -1121,6 +1122,7 @@ images/components/teditbutton.xpm -text svneol=native#image/x-xpixmap
images/components/tfilelistbox.xpm -text svneol=native#image/x-xpixmap
images/components/tfilenamedit.xpm -text svneol=native#image/x-xpixmap
images/components/tfilenameedit.xpm -text svneol=native#image/x-xpixmap
images/components/tfloatspinedit.xpm svneol=native#text/plain
images/components/tfontdialog.ico -text svneol=unset#image/x-icon
images/components/tfontdialog.xpm -text svneol=native#image/x-xpixmap
images/components/tgroupbox.ico -text svneol=unset#image/x-icon

82
components/rtticontrols/rttictrls.lrs
View File

@ -703,6 +703,88 @@ LazarusResources.Add('ttiedit','XPM',[
+' 3+4+5+6+7+8+9+0+a+b+c+d+e+ ",'#10'" f+g+h+i+ '
+'j+k+l+m+ "};'#10
]);
LazarusResources.Add('ttifloatspinedit','XPM',[
'/* XPM */'#10'static char * ttifloatspinedit_xpm[] = {'#10'"23 23 204 2",'#10
+'" '#9'c None",'#10'". '#9'c #929292",'#10'"+ '#9'c #747474",'#10'"@ '#9'c '
+'#818181",'#10'"# '#9'c #7C7C7C",'#10'"$ '#9'c #7D7D7D",'#10'"% '#9'c #77777'
+'7",'#10'"& '#9'c #7E7E7E",'#10'"* '#9'c #878787",'#10'"= '#9'c #888888",'#10
+'"- '#9'c #7A7A7A",'#10'"; '#9'c #858585",'#10'"> '#9'c #7B7B7B",'#10'", '#9
+'c #8A8A8A",'#10'"'' '#9'c #868686",'#10'") '#9'c #787878",'#10'"! '#9'c #72'
+'7272",'#10'"~ '#9'c #0B0B0B",'#10'"{ '#9'c #000000",'#10'"] '#9'c #030303",'
+#10'"^ '#9'c #050505",'#10'"/ '#9'c #0A0A0A",'#10'"( '#9'c #040404",'#10'"_ '
+#9'c #FFFFFF",'#10'": '#9'c #F9F9F9",'#10'"< '#9'c #FCFCFC",'#10'"[ '#9'c #F'
+'DFDFD",'#10'"} '#9'c #BEBEBE",'#10'"| '#9'c #FFFDFF",'#10'"1 '#9'c #FEFCFF"'
+','#10'"2 '#9'c #FEFEFF",'#10'"3 '#9'c #010000",'#10'"4 '#9'c #020202",'#10
+'"5 '#9'c #C2C2C2",'#10'"6 '#9'c #020003",'#10'"7 '#9'c #FFFAFF",'#10'"8 '#9
+'c #FCFDFF",'#10'"9 '#9'c #FAFBF3",'#10'"0 '#9'c #FFFFFA",'#10'"a '#9'c #FFF'
+'EFF",'#10'"b '#9'c #C5C5C5",'#10'"c '#9'c #010103",'#10'"d '#9'c #C44141",'
+#10'"e '#9'c #C74D4D",'#10'"f '#9'c #C03636",'#10'"g '#9'c #D98787",'#10'"h '
+#9'c #FFFFFD",'#10'"i '#9'c #FEFDFD",'#10'"j '#9'c #F9EEEE",'#10'"k '#9'c #B'
+'20707",'#10'"l '#9'c #FEFFFF",'#10'"m '#9'c #FBF3F3",'#10'"n '#9'c #DB8E8E"'
+','#10'"o '#9'c #D06969",'#10'"p '#9'c #000105",'#10'"q '#9'c #FCFFFF",'#10
+'"r '#9'c #EDC8C8",'#10'"s '#9'c #CC5C5C",'#10'"t '#9'c #EBC1C1",'#10'"u '#9
+'c #000103",'#10'"v '#9'c #FBFFFF",'#10'"w '#9'c #F3DADA",'#10'"x '#9'c #B61'
+'616",'#10'"y '#9'c #F8FAFF",'#10'"z '#9'c #4B251C",'#10'"A '#9'c #FBFEFF",'
+#10'"B '#9'c #F5DFDF",'#10'"C '#9'c #F5E1E1",'#10'"D '#9'c #934737",'#10'"E '
+#9'c #000201",'#10'"F '#9'c #B91F1F",'#10'"G '#9'c #C13939",'#10'"H '#9'c #C'
+'13A3A",'#10'"I '#9'c #E7B3B3",'#10'"J '#9'c #FEFFFD",'#10'"K '#9'c #A03F2A"'
+','#10'"L '#9'c #3C160E",'#10'"M '#9'c #050503",'#10'"N '#9'c #FEFFFB",'#10
+'"O '#9'c #F9FBFF",'#10'"P '#9'c #FBFCFF",'#10'"Q '#9'c #F8F8F8",'#10'"R '#9
+'c #9A3A25",'#10'"S '#9'c #31120C",'#10'"T '#9'c #8D8D8D",'#10'"U '#9'c #FDF'
+'EF9",'#10'"V '#9'c #FCFEFB",'#10'"W '#9'c #FCFFF2",'#10'"X '#9'c #FCFFF6",'
+#10'"Y '#9'c #FEFFF4",'#10'"Z '#9'c #FFFFF3",'#10'"` '#9'c #FEFFF5",'#10'" .'
+#9'c #FFFFFB",'#10'"..'#9'c #BCBCBC",'#10'"+.'#9'c #7B2F1F",'#10'"@.'#9'c #0'
+'F0503",'#10'"#.'#9'c #C2C2C0",'#10'"$.'#9'c #C2C1C6",'#10'"%.'#9'c #C2C0CB"'
+','#10'"&.'#9'c #C2BFD0",'#10'"*.'#9'c #C3C1CE",'#10'"=.'#9'c #BEBFBA",'#10
+'"-.'#9'c #C9CBC0",'#10'";.'#9'c #BBBCB7",'#10'">.'#9'c #BEBEBC",'#10'",.'#9
+'c #B9B8B4",'#10'"''.'#9'c #C2C3BE",'#10'").'#9'c #B7B7B5",'#10'"!.'#9'c #CA'
+'CACA",'#10'"~.'#9'c #B5B5B5",'#10'"{.'#9'c #BBBBBB",'#10'"].'#9'c #170A06",'
+#10'"^.'#9'c #FAFAFC",'#10'"/.'#9'c #FDFAFF",'#10'"(.'#9'c #FDFBFF",'#10'"_.'
+#9'c #FDFCFA",'#10'":.'#9'c #FDFBFC",'#10'"<.'#9'c #FDF9FF",'#10'"[.'#9'c #F'
+'CF8FF",'#10'"}.'#9'c #FEFDF9",'#10'"|.'#9'c #F8F8F0",'#10'"1.'#9'c #FFFEFC"'
+','#10'"2.'#9'c #FAF7FE",'#10'"3.'#9'c #53585F",'#10'"4.'#9'c #C9CBD0",'#10
+'"5.'#9'c #CED0D5",'#10'"6.'#9'c #C9CBD1",'#10'"7.'#9'c #898D93",'#10'"8.'#9
+'c #1D2025",'#10'"9.'#9'c #51644D",'#10'"0.'#9'c #C5D2C2",'#10'"a.'#9'c #D2D'
+'ECF",'#10'"b.'#9'c #CCDAC9",'#10'"c.'#9'c #96A891",'#10'"d.'#9'c #1E291B",'
+#10'"e.'#9'c #2A2F39",'#10'"f.'#9'c #888D97",'#10'"g.'#9'c #EFF0F1",'#10'"h.'
+#9'c #B0B3BB",'#10'"i.'#9'c #9499A3",'#10'"j.'#9'c #8E939D",'#10'"k.'#9'c #4'
+'14650",'#10'"l.'#9'c #202F1F",'#10'"m.'#9'c #8DA987",'#10'"n.'#9'c #E8EFE7"'
+','#10'"o.'#9'c #BBCEB7",'#10'"p.'#9'c #9CB796",'#10'"q.'#9'c #9BB795",'#10
+'"r.'#9'c #4A6844",'#10'"s.'#9'c #2A303B",'#10'"t.'#9'c #575F6F",'#10'"u.'#9
+'c #A6AAB3",'#10'"v.'#9'c #686F7D",'#10'"w.'#9'c #525A6B",'#10'"x.'#9'c #515'
+'96A",'#10'"y.'#9'c #404858",'#10'"z.'#9'c #375335",'#10'"A.'#9'c #658F5B",'
+#10'"B.'#9'c #A6BFA1",'#10'"C.'#9'c #779C6E",'#10'"D.'#9'c #5F8B55",'#10'"E.'
+#9'c #4B7441",'#10'"F.'#9'c #1A2A17",'#10'"G.'#9'c #282E39",'#10'"H.'#9'c #4'
+'34C5E",'#10'"I.'#9'c #3C4455",'#10'"J.'#9'c #365334",'#10'"K.'#9'c #518146"'
+','#10'"L.'#9'c #47713D",'#10'"M.'#9'c #192816",'#10'"N.'#9'c #1F242D",'#10
+'"O.'#9'c #48505F",'#10'"P.'#9'c #5D6474",'#10'"Q.'#9'c #5D6574",'#10'"R.'#9
+'c #575F6E",'#10'"S.'#9'c #2D333F",'#10'"T.'#9'c #1C2B1A",'#10'"U.'#9'c #558'
+'04B",'#10'"V.'#9'c #68915E",'#10'"W.'#9'c #699260",'#10'"X.'#9'c #648E5B",'
+#10'"Y.'#9'c #395C32",'#10'"Z.'#9'c #090E07",'#10'"`.'#9'c #353A43",'#10'" +'
+#9'c #868C97",'#10'".+'#9'c #9398A2",'#10'"++'#9'c #90959F",'#10'"@+'#9'c #5'
+'E636E",'#10'"#+'#9'c #111419",'#10'"$+'#9'c #070B06",'#10'"%+'#9'c #395033"'
+','#10'"&+'#9'c #89A783",'#10'"*+'#9'c #9BB695",'#10'"=+'#9'c #98B491",'#10
+'"-+'#9'c #6B8964",'#10'";+'#9'c #162414",'#10'">+'#9'c #17191E",'#10'",+'#9
+'c #31343B",'#10'"''+'#9'c #23262C",'#10'")+'#9'c #070709",'#10'"!+'#9'c #19'
+'2517",'#10'"~+'#9'c #364831",'#10'"{+'#9'c #293826",'#10'"]+'#9'c #090E08",'
+#10'". + @ @ @ @ @ @ # # $ % & * = - ; > , '' ) ",'#10'"! ~ { { { { { { '
,'] ^ { / { { { ] { ( { { _ ",'#10'"@ { _ _ _ _ _ _ _ : _ < _ < _ [ < _ _'
+' } _ ",'#10'"@ { | _ _ _ _ _ _ 1 2 { { { 3 { 4 { [ 5 _ ",'#10'"& 6 '
+'7 _ _ _ _ _ _ _ 8 { 9 0 { 8 a { _ b _ ",'#10'"& c | _ _ _ d e f g _ { h'
+' { { { a { _ b _ ",'#10'"& c a _ _ _ i _ j k _ { _ l a 8 _ { _ b _ '
+'",'#10'"& c _ _ _ _ _ m n o _ { { { { { { { _ b _ ",'#10'"& p q _ _ _ r'
+' s f t _ { { { { { { { _ b _ ",'#10'"& u v _ _ _ _ _ w x _ { _ y _ 8 l '
+'{ _ b _ z ",'#10'"& u A _ B _ i _ C x _ { _ { { { l { 8 b _ D ",'#10'"&'
+' E q _ F _ G e H I _ { _ A { 8 J { _ b _ K L ",'#10'"+ M N 8 _ _ v v O P _ '
+'{ { { { { { { [ b Q R S ",'#10'"T { U _ 8 V W _ _ _ _ X Y W Z ` .Q _ .._ +'
+'.@.",'#10'", { #.$.#.#.$.%.&.*.=.-.;.>.,.''.).!.~.{._ ]. ",'#10'"# ^./.(._'
+'.:./.<.[./.}.|.1.a | 2._ _ _ _ [ ",'#10'" 3.4.5.6.7.8.'
+' 9.0.a.b.c.d. ",'#10'" e.f.g.h.i.j.k.l.m.n.o.p.q.r. ",'#10
+'" s.t.u.v.w.x.y.z.A.B.C.D.D.E.F.",'#10'" G.H.'
+'H.H.H.H.I.J.K.K.K.K.K.L.M.",'#10'" N.O.P.Q.Q.R.S.T.U.V.W.W.X'
+'.Y.Z.",'#10'" `. +.+++@+#+$+%+&+*+=+-+;+ ",'#10'" '
+' >+,+''+)+ !+~+{+]+ "};'#10
]);
LazarusResources.Add('ttigrid','XPM',[
'/* XPM */'#10'static char * ttigrid_xpm[] = {'#10'"23 23 122 2",'#10'" '#9
+'c None",'#10'". '#9'c #000000",'#10'"+ '#9'c #C0C0C0",'#10'"@ '#9'c #FFFFFF'

48
components/rtticontrols/rttictrls.pas
View File

@ -1104,9 +1104,9 @@ Type
end;
{ TTICustomSpinEdit }
{ TTICustomFloatSpinEdit }
TTICustomSpinEdit = class(TCustomSpinEdit)
TTICustomFloatSpinEdit = class(TCustomFloatSpinEdit)
private
FLink: TPropertyLink;
FUseRTTIMinMax: boolean;
@ -1127,16 +1127,16 @@ Type
end;
{ TTISpinEdit }
{ TTIFloatSpinEdit }
TTISpinEdit = class(TTICustomSpinEdit)
TTIFloatSpinEdit = class(TTICustomFloatSpinEdit)
published
property Align;
property Anchors;
property BorderSpacing;
property Climb_Rate;
property ClimbRate;
property Constraints;
property Decimal_Places;
property DecimalPlaces;
property Enabled;
property Link;
property MaxValue;
@ -1371,7 +1371,7 @@ procedure Register;
begin
RegisterComponents('RTTI',[TTIEdit,TTIComboBox,TTIButton,TTICheckBox,
TTILabel,TTIGroupBox,TTIRadioGroup,TTICheckGroup,TTICheckListBox,
TTIListBox,TTIMemo,TTICalendar,TTIImage,TTISpinEdit,TTITrackBar,
TTIListBox,TTIMemo,TTICalendar,TTIImage,TTIFloatSpinEdit,TTITrackBar,
TTIProgressBar,TTIMaskEdit,TTIColorButton,TMultiPropertyLink]);
end;
@ -2738,22 +2738,22 @@ begin
FLink.EditingDone;
end;
{ TTICustomSpinEdit }
{ TTICustomFloatSpinEdit }
procedure TTICustomSpinEdit.SetLink(const AValue: TPropertyLink);
procedure TTICustomFloatSpinEdit.SetLink(const AValue: TPropertyLink);
begin
if FLink=AValue then exit;
FLink.Assign(AValue);
end;
procedure TTICustomSpinEdit.SetUseRTTIMinMax(const AValue: boolean);
procedure TTICustomFloatSpinEdit.SetUseRTTIMinMax(const AValue: boolean);
begin
if FUseRTTIMinMax=AValue then exit;
FUseRTTIMinMax:=AValue;
if UseRTTIMinMax then GetRTTIMinMax;
end;
procedure TTICustomSpinEdit.LinkLoadFromProperty(Sender: TObject);
procedure TTICustomFloatSpinEdit.LinkLoadFromProperty(Sender: TObject);
begin
if Sender=nil then ;
if (FLink.Editor=nil) then exit;
@ -2763,14 +2763,14 @@ begin
end;
end;
procedure TTICustomSpinEdit.LinkSaveToProperty(Sender: TObject);
procedure TTICustomFloatSpinEdit.LinkSaveToProperty(Sender: TObject);
begin
if Sender=nil then ;
if FLink.Editor=nil then exit;
FLink.SetAsText(FloatToStr(Value));
end;
procedure TTICustomSpinEdit.LinkEditorChanged(Sender: TObject);
procedure TTICustomFloatSpinEdit.LinkEditorChanged(Sender: TObject);
var
TypeData: PTypeData;
PropKind: TTypeKind;
@ -2790,8 +2790,8 @@ begin
TypeData:=GetTypeData(FLink.Editor.GetPropType);
MinValue:=TypeData^.MinValue;
MaxValue:=TypeData^.MaxValue;
Climb_Rate:=1;
Decimal_Places:=0;
ClimbRate:=1;
DecimalPlaces:=0;
end;
tkInt64:
@ -2799,8 +2799,8 @@ begin
TypeData:=GetTypeData(FLink.Editor.GetPropType);
MinValue:=TypeData^.MinInt64Value;
MaxValue:=TypeData^.MaxInt64Value;
Climb_Rate:=1;
Decimal_Places:=0;
ClimbRate:=1;
DecimalPlaces:=0;
end;
tkQWord:
@ -2808,8 +2808,8 @@ begin
TypeData:=GetTypeData(FLink.Editor.GetPropType);
MinValue:=TypeData^.MinQWordValue;
MaxValue:=TypeData^.MaxQWordValue;
Climb_Rate:=1;
Decimal_Places:=0;
ClimbRate:=1;
DecimalPlaces:=0;
end;
else
@ -2828,12 +2828,12 @@ begin
end;
end;
procedure TTICustomSpinEdit.GetRTTIMinMax;
procedure TTICustomFloatSpinEdit.GetRTTIMinMax;
begin
if UseRTTIMinMax then GetRTTIMinMax;
end;
constructor TTICustomSpinEdit.Create(TheOwner: TComponent);
constructor TTICustomFloatSpinEdit.Create(TheOwner: TComponent);
begin
inherited Create(TheOwner);
FUseRTTIMinMax:=true;
@ -2848,19 +2848,19 @@ begin
FLink.OnEditorChanged:=@LinkEditorChanged;
end;
destructor TTICustomSpinEdit.Destroy;
destructor TTICustomFloatSpinEdit.Destroy;
begin
FreeThenNil(FLink);
inherited Destroy;
end;
procedure TTICustomSpinEdit.Loaded;
procedure TTICustomFloatSpinEdit.Loaded;
begin
inherited Loaded;
FLink.LoadFromProperty;
end;
procedure TTICustomSpinEdit.EditingDone;
procedure TTICustomFloatSpinEdit.EditingDone;
begin
inherited EditingDone;
FLink.EditingDone;

230
components/rtticontrols/ttifloatspinedit.xpm Normal file
View File

@ -0,0 +1,230 @@
/* XPM */
static char * ttifloatspinedit_xpm[] = {
"23 23 204 2",
" c None",
". c #929292",
"+ c #747474",
"@ c #818181",
"# c #7C7C7C",
"$ c #7D7D7D",
"% c #777777",
"& c #7E7E7E",
"* c #878787",
"= c #888888",
"- c #7A7A7A",
"; c #858585",
"> c #7B7B7B",
", c #8A8A8A",
"' c #868686",
") c #787878",
"! c #727272",
"~ c #0B0B0B",
"{ c #000000",
"] c #030303",
"^ c #050505",
"/ c #0A0A0A",
"( c #040404",
"_ c #FFFFFF",
": c #F9F9F9",
"< c #FCFCFC",
"[ c #FDFDFD",
"} c #BEBEBE",
"| c #FFFDFF",
"1 c #FEFCFF",
"2 c #FEFEFF",
"3 c #010000",
"4 c #020202",
"5 c #C2C2C2",
"6 c #020003",
"7 c #FFFAFF",
"8 c #FCFDFF",
"9 c #FAFBF3",
"0 c #FFFFFA",
"a c #FFFEFF",
"b c #C5C5C5",
"c c #010103",
"d c #C44141",
"e c #C74D4D",
"f c #C03636",
"g c #D98787",
"h c #FFFFFD",
"i c #FEFDFD",
"j c #F9EEEE",
"k c #B20707",
"l c #FEFFFF",
"m c #FBF3F3",
"n c #DB8E8E",
"o c #D06969",
"p c #000105",
"q c #FCFFFF",
"r c #EDC8C8",
"s c #CC5C5C",
"t c #EBC1C1",
"u c #000103",
"v c #FBFFFF",
"w c #F3DADA",
"x c #B61616",
"y c #F8FAFF",
"z c #4B251C",
"A c #FBFEFF",
"B c #F5DFDF",
"C c #F5E1E1",
"D c #934737",
"E c #000201",
"F c #B91F1F",
"G c #C13939",
"H c #C13A3A",
"I c #E7B3B3",
"J c #FEFFFD",
"K c #A03F2A",
"L c #3C160E",
"M c #050503",
"N c #FEFFFB",
"O c #F9FBFF",
"P c #FBFCFF",
"Q c #F8F8F8",
"R c #9A3A25",
"S c #31120C",
"T c #8D8D8D",
"U c #FDFEF9",
"V c #FCFEFB",
"W c #FCFFF2",
"X c #FCFFF6",
"Y c #FEFFF4",
"Z c #FFFFF3",
"` c #FEFFF5",
" . c #FFFFFB",
".. c #BCBCBC",
"+. c #7B2F1F",
"@. c #0F0503",
"#. c #C2C2C0",
"$. c #C2C1C6",
"%. c #C2C0CB",
"&. c #C2BFD0",
"*. c #C3C1CE",
"=. c #BEBFBA",
"-. c #C9CBC0",
";. c #BBBCB7",
">. c #BEBEBC",
",. c #B9B8B4",
"'. c #C2C3BE",
"). c #B7B7B5",
"!. c #CACACA",
"~. c #B5B5B5",
"{. c #BBBBBB",
"]. c #170A06",
"^. c #FAFAFC",
"/. c #FDFAFF",
"(. c #FDFBFF",
"_. c #FDFCFA",
":. c #FDFBFC",
"<. c #FDF9FF",
"[. c #FCF8FF",
"}. c #FEFDF9",
"|. c #F8F8F0",
"1. c #FFFEFC",
"2. c #FAF7FE",
"3. c #53585F",
"4. c #C9CBD0",
"5. c #CED0D5",
"6. c #C9CBD1",
"7. c #898D93",
"8. c #1D2025",
"9. c #51644D",
"0. c #C5D2C2",
"a. c #D2DECF",
"b. c #CCDAC9",
"c. c #96A891",
"d. c #1E291B",
"e. c #2A2F39",
"f. c #888D97",
"g. c #EFF0F1",
"h. c #B0B3BB",
"i. c #9499A3",
"j. c #8E939D",
"k. c #414650",
"l. c #202F1F",
"m. c #8DA987",
"n. c #E8EFE7",
"o. c #BBCEB7",
"p. c #9CB796",
"q. c #9BB795",
"r. c #4A6844",
"s. c #2A303B",
"t. c #575F6F",
"u. c #A6AAB3",
"v. c #686F7D",
"w. c #525A6B",
"x. c #51596A",
"y. c #404858",
"z. c #375335",
"A. c #658F5B",
"B. c #A6BFA1",
"C. c #779C6E",
"D. c #5F8B55",
"E. c #4B7441",
"F. c #1A2A17",
"G. c #282E39",
"H. c #434C5E",
"I. c #3C4455",
"J. c #365334",
"K. c #518146",
"L. c #47713D",
"M. c #192816",
"N. c #1F242D",
"O. c #48505F",
"P. c #5D6474",
"Q. c #5D6574",
"R. c #575F6E",
"S. c #2D333F",
"T. c #1C2B1A",
"U. c #55804B",
"V. c #68915E",
"W. c #699260",
"X. c #648E5B",
"Y. c #395C32",
"Z. c #090E07",
"`. c #353A43",
" + c #868C97",
".+ c #9398A2",
"++ c #90959F",
"@+ c #5E636E",
"#+ c #111419",
"$+ c #070B06",
"%+ c #395033",
"&+ c #89A783",
"*+ c #9BB695",
"=+ c #98B491",
"-+ c #6B8964",
";+ c #162414",
">+ c #17191E",
",+ c #31343B",
"'+ c #23262C",
")+ c #070709",
"!+ c #192517",
"~+ c #364831",
"{+ c #293826",
"]+ c #090E08",
". + @ @ @ @ @ @ # # $ % & * = - ; > , ' ) ",
"! ~ { { { { { { ] ^ { / { { { ] { ( { { _ ",
"@ { _ _ _ _ _ _ _ : _ < _ < _ [ < _ _ } _ ",
"@ { | _ _ _ _ _ _ 1 2 { { { 3 { 4 { [ 5 _ ",
"& 6 7 _ _ _ _ _ _ _ 8 { 9 0 { 8 a { _ b _ ",
"& c | _ _ _ d e f g _ { h { { { a { _ b _ ",
"& c a _ _ _ i _ j k _ { _ l a 8 _ { _ b _ ",
"& c _ _ _ _ _ m n o _ { { { { { { { _ b _ ",
"& p q _ _ _ r s f t _ { { { { { { { _ b _ ",
"& u v _ _ _ _ _ w x _ { _ y _ 8 l { _ b _ z ",
"& u A _ B _ i _ C x _ { _ { { { l { 8 b _ D ",
"& E q _ F _ G e H I _ { _ A { 8 J { _ b _ K L ",
"+ M N 8 _ _ v v O P _ { { { { { { { [ b Q R S ",
"T { U _ 8 V W _ _ _ _ X Y W Z ` .Q _ .._ +.@.",
", { #.$.#.#.$.%.&.*.=.-.;.>.,.'.).!.~.{._ ]. ",
"# ^./.(._.:./.<.[./.}.|.1.a | 2._ _ _ _ [ ",
" 3.4.5.6.7.8. 9.0.a.b.c.d. ",
" e.f.g.h.i.j.k.l.m.n.o.p.q.r. ",
" s.t.u.v.w.x.y.z.A.B.C.D.D.E.F.",
" G.H.H.H.H.H.I.J.K.K.K.K.K.L.M.",
" N.O.P.Q.Q.R.S.T.U.V.W.W.X.Y.Z.",
" `. +.+++@+#+$+%+&+*+=+-+;+ ",
" >+,+'+)+ !+~+{+]+ "};

121
ide/environmentopts.lfm
View File

@ -7,13 +7,14 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Position = poScreenCenter
HorzScrollBar.Page = 649
VertScrollBar.Page = 550
Left = 316
Left = 311
Height = 551
Top = 291
Top = 281
Width = 650
object Notebook: TNotebook
Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.OnChange = nil
OnChangeBounds = NotebookChangeBounds
PageIndex = 3
Height = 508
@ -27,7 +28,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Top = 28
Width = 646
object MaxRecentOpenFilesLabel: TLabel
BorderSpacing.OnChange = nil
Caption = 'MaxRecentOpenFilesLabel'
Color = clNone
Left = 4
@ -36,7 +36,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 152
end
object MaxRecentProjectFilesLabel: TLabel
BorderSpacing.OnChange = nil
Caption = 'MaxRecentProjectFilesLabel'
Color = clNone
Left = 4
@ -46,7 +45,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object MaxRecentOpenFilesComboBox: TComboBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Items.Strings = (
'5'
'10'
@ -64,7 +62,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object MaxRecentProjectFilesComboBox: TComboBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Items.Strings = (
'5'
'10'
@ -82,7 +79,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object OpenLastProjectAtStartCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'OpenLastProjectAtStartCheckBox'
TabOrder = 2
Left = 4
@ -92,7 +88,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object LazarusDirGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'LazarusDirGroupBox'
ClientHeight = 37
ClientWidth = 630
@ -104,7 +99,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 634
object LazarusDirComboBox: TComboBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 0
Text = 'LazarusDirComboBox'
@ -115,7 +109,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object LazarusDirButton: TButton
Anchors = [akTop, akRight]
BorderSpacing.OnChange = nil
Caption = '...'
OnClick = DirectoriesButtonClick
TabOrder = 1
@ -127,6 +120,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object CompilerPathGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'CompilerPathGroupBox'
ClientHeight = 37
ClientWidth = 630
@ -138,6 +132,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 634
object CompilerPathComboBox: TComboBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 0
Text = 'CompilerPathComboBox'
@ -148,6 +143,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object CompilerPathButton: TButton
Anchors = [akTop, akRight]
BorderSpacing.OnChange = nil
Caption = '...'
OnClick = FilesButtonClick
TabOrder = 1
@ -159,6 +155,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object FPCSourceDirGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'FPCSourceDirGroupBox'
ClientHeight = 37
ClientWidth = 630
@ -170,6 +167,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 634
object FPCSourceDirComboBox: TComboBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 0
Text = 'FPCSourceDirComboBox'
@ -180,6 +178,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object FPCSourceDirButton: TButton
Anchors = [akTop, akRight]
BorderSpacing.OnChange = nil
Caption = '...'
OnClick = DirectoriesButtonClick
TabOrder = 1
@ -191,6 +190,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object MakePathGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'MakePathGroupBox'
ClientHeight = 37
ClientWidth = 630
@ -202,6 +202,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 634
object MakePathComboBox: TComboBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 0
Text = 'MakePathComboBox'
@ -212,6 +213,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object MakePathButton: TButton
Anchors = [akTop, akRight]
BorderSpacing.OnChange = nil
Caption = '...'
OnClick = FilesButtonClick
TabOrder = 1
@ -223,6 +225,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object TestBuildDirGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'TestBuildDirGroupBox'
ClientHeight = 37
ClientWidth = 630
@ -234,6 +237,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 634
object TestBuildDirComboBox: TComboBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 0
Text = 'TestBuildDirComboBox'
@ -244,6 +248,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object TestBuildDirButton: TButton
Anchors = [akTop, akRight]
BorderSpacing.OnChange = nil
Caption = '...'
OnClick = DirectoriesButtonClick
TabOrder = 1
@ -264,7 +269,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 646
object LanguageGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'LanguageGroupBox'
ClientHeight = 56
ClientWidth = 632
@ -276,7 +280,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 632
object LanguageComboBox: TComboBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 0
Text = 'LanguageComboBox'
@ -287,7 +290,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
end
object ShowHintsForComponentPaletteCheckBox: TCheckBox
BorderSpacing.OnChange = nil
Caption = 'ShowHintsForComponentPaletteCheckBox'
TabOrder = 1
Left = 4
@ -297,7 +299,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object AutoSaveGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'AutoSaveGroupBox'
ClientHeight = 136
ClientWidth = 632
@ -309,7 +310,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 632
object AutoSaveIntervalInSecsLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'AutoSaveIntervalInSecsLabel'
Color = clNone
Enabled = False
@ -320,7 +320,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object AutoSaveEditorFilesCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'AutoSaveEditorFilesCheckBox'
Enabled = False
TabOrder = 0
@ -331,7 +330,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object AutoSaveProjectCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'AutoSaveProjectCheckBox'
Enabled = False
TabOrder = 1
@ -342,7 +340,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object AutoSaveIntervalInSecsComboBox: TComboBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Enabled = False
Items.Strings = (
'1200'
@ -360,7 +357,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object DesktopFilesGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'DesktopFilesGroupBox'
ClientHeight = 97
ClientWidth = 632
@ -372,7 +368,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 632
object SaveDesktopSettingsToFileButton: TButton
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'SaveDesktopSettingsToFileButton'
OnClick = SaveDesktopSettingsToFileButtonClick
TabOrder = 0
@ -383,7 +378,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object LoadDesktopSettingsFromFileButton: TButton
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'LoadDesktopSettingsFromFileButton'
OnEnter = LoadDesktopSettingsFromFileButtonClick
TabOrder = 1
@ -394,6 +388,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
end
object ShowHintsForMainSpeedButtonsCheckBox: TCheckBox
BorderSpacing.OnChange = nil
Caption = 'ShowHintsForMainSpeedButtonsCheckBox'
TabOrder = 4
Left = 4
@ -402,6 +397,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 632
end
object MsgViewDblClickJumpsCheckBox: TCheckBox
BorderSpacing.OnChange = nil
Caption = 'MsgViewDblClickJumpsCheckBox'
TabOrder = 5
Left = 4
@ -420,6 +416,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 646
object MinimizeAllOnMinimizeMainCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'MinimizeAllOnMinimizeMainCheckBox'
Enabled = False
TabOrder = 0
@ -430,6 +427,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object HideIDEOnRunCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'HideIDEOnRunCheckBox'
TabOrder = 1
Left = 4
@ -439,6 +437,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object WindowPositionsGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.OnChange = nil
Caption = 'WindowPositionsGroupBox'
ClientHeight = 399
ClientWidth = 636
@ -450,6 +449,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 636
object WindowPositionsListBox: TListBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
OnMouseUp = WindowPositionsListBoxMouseUp
TabOrder = 0
TopIndex = -1
@ -471,7 +471,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 646
object GridGroupBox: TGroupBox
Align = alTop
BorderSpacing.OnChange = nil
BorderSpacing.Around = 6
Caption = 'GridGroupBox'
ClientHeight = 113
@ -483,7 +482,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Top = 6
Width = 634
object GridColorLabel: TLabel
BorderSpacing.OnChange = nil
Caption = 'GridColorLabel'
Color = clNone
Left = 290
@ -493,7 +491,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object GridSizeXLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'GridSizeXLabel'
Color = clNone
Left = 117
@ -503,7 +500,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object GridSizeYLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'GridSizeYLabel'
Color = clNone
Left = 117
@ -512,7 +508,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 503
end
object GridColorButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 230
Height = 23
@ -520,7 +515,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object SnapToGridCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'SnapToGridCheckBox'
TabOrder = 1
Left = 6
@ -529,7 +523,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 614
end
object ShowGridCheckBox: TCheckBox
BorderSpacing.OnChange = nil
Caption = 'ShowGridCheckBox'
TabOrder = 0
Left = 6
@ -537,7 +530,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 138
end
object GridSizeXComboBox: TComboBox
BorderSpacing.OnChange = nil
Items.Strings = (
'2'
'5'
@ -559,7 +551,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 100
end
object GridSizeYComboBox: TComboBox
BorderSpacing.OnChange = nil
Items.Strings = (
'2'
'5'
@ -584,7 +575,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
object GuideLinesGroupBox: TGroupBox
Align = alLeft
Anchors = [akTop, akLeft]
BorderSpacing.OnChange = nil
BorderSpacing.Around = 6
Caption = 'GuideLinesGroupBox'
ClientHeight = 313
@ -596,7 +586,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Top = 142
Width = 206
object GuideLineColorLeftTopButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -604,7 +593,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 50
end
object GuideLineColorRightBottomButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -613,7 +601,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object GuideLineColorLeftTopLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'GuideLineColorLeftTopLabel'
Color = clNone
Left = 6
@ -623,7 +610,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object GuideLineColorRightBottomLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'GuideLineColorRightBottomLabel'
Color = clNone
Left = 6
@ -633,7 +619,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object ShowGuideLinesCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'ShowGuideLinesCheckBox'
TabOrder = 0
Left = 6
@ -642,7 +627,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object SnapToGuideLinesCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'SnapToGuideLinesCheckBox'
TabOrder = 1
Left = 6
@ -654,6 +638,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
object FormEditMiscGroupBox: TGroupBox
Align = alLeft
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
BorderSpacing.Around = 6
Caption = 'FormEditMiscGroupBox'
ClientHeight = 313
@ -667,6 +652,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Top = 142
Width = 206
object GrabberColorButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -674,6 +660,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 50
end
object MarkerColorButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -682,6 +669,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object GrabberColorLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'GrabberColorLabel'
Color = clNone
Left = 6
@ -691,6 +679,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object MarkerColorLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'MarkerColorLabel'
Color = clNone
Left = 6
@ -700,6 +689,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object ShowComponentCaptionsCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'ShowComponentCaptionsCheckBox'
TabOrder = 0
Left = 6
@ -708,6 +698,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object ShowEditorHintsCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'ShowEditorHintsCheckBox'
TabOrder = 1
Left = 6
@ -717,7 +708,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object AutoCreateFormsOnOpenCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'AutoCreateFormsOnOpenCheckBox'
TabOrder = 2
Left = 6
@ -727,7 +717,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object RightClickSelectsCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'RightClickSelectsCheckBox'
TabOrder = 3
Left = 6
@ -737,6 +726,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object DesignerPaintLazyCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'DesignerPaintLazyCheckBox'
ParentShowHint = False
ShowHint = True
@ -750,6 +740,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
object RubberbandGroupBox: TGroupBox
Align = alLeft
Anchors = [akTop, akLeft]
BorderSpacing.OnChange = nil
BorderSpacing.Around = 6
Caption = 'RubberbandGroupBox'
ClientHeight = 313
@ -761,6 +752,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Top = 142
Width = 210
object RubberbandSelectColorButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -768,6 +760,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 50
end
object RubberbandCreateColorButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -776,6 +769,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object RubberbandSelectColorLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'RubberbandSelectColorLabel'
Color = clNone
Left = 6
@ -785,6 +779,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object RubberbandCreateColorLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'RubberbandCreateColorLabel'
Color = clNone
Left = 6
@ -794,7 +789,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object RubberbandSelectsGrandChildsCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'RubberbandSelectsGrandChildsCheckBox'
TabOrder = 0
Height = 24
@ -813,6 +807,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 646
object ObjectInspectorColorsGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'ObjectInspectorColorsGroupBox'
ClientHeight = 173
ClientWidth = 635
@ -823,6 +818,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Top = 7
Width = 635
object OIBackgroundColorButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -830,6 +826,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 50
end
object OISubPropsColorButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -837,6 +834,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 50
end
object OIReferencesColorButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -844,6 +842,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 50
end
object OIValueColorButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -851,6 +850,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 50
end
object OIDefaultValueColorButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -858,6 +858,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 50
end
object OIPropNameColorButton: TColorButton
BorderSpacing.OnChange = nil
BorderWidth = 2
Left = 6
Height = 23
@ -866,6 +867,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object OIBackgroundColorLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'OIBackgroundColorLabel'
Color = clNone
Left = 65
@ -875,6 +877,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object OISubPropsColorLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'OISubPropsColorLabel'
Color = clNone
Left = 65
@ -884,6 +887,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object OIReferencesColorLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'OIReferencesColorLabel'
Color = clNone
Left = 65
@ -893,6 +897,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object OIValueColorLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'OIValueColorLabel'
Color = clNone
Left = 65
@ -902,6 +907,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object OIDefaultValueColorLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'OIDefaultValueColorLabel'
Color = clNone
Left = 65
@ -911,6 +917,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object OIPropNameColorLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'OIPropNameColorLabel'
Color = clNone
Left = 65
@ -921,6 +928,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object OIMiscGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'OIMiscGroupBox'
ClientHeight = 105
ClientWidth = 635
@ -932,6 +940,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 635
object OIDefaultItemHeightLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'OIDefaultItemHeightLabel'
Color = clNone
Left = 6
@ -941,6 +950,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object OIShowHintCheckBox: TCheckBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'OIShowHintCheckBox'
TabOrder = 0
Left = 6
@ -950,6 +960,8 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object OIDefaultItemHeightSpinEdit: TSpinEdit
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
ClimbRate = 1
MaxValue = 100
TabOrder = 1
Left = 6
@ -969,6 +981,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 646
object BackupHelpLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'BackupHelpLabel'
Color = clNone
Left = 4
@ -978,6 +991,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object BackupProjectGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'BackupProjectGroupBox'
ClientHeight = 201
ClientWidth = 632
@ -989,6 +1003,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 632
object BakProjAddExtLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'BakProjAddExtLabel'
Color = clNone
Left = 117
@ -998,7 +1013,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object BakProjMaxCounterLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'BakProjMaxCounterLabel'
Color = clNone
Left = 118
@ -1008,7 +1022,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object BakProjSubDirLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'BakProjSubDirLabel'
Color = clNone
Left = 117
@ -1018,6 +1031,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object BakProjTypeRadioGroup: TRadioGroup
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'BakProjTypeRadioGroup'
Columns = 2
OnClick = BakTypeRadioGroupClick
@ -1027,6 +1041,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 612
end
object BakProjAddExtComboBox: TComboBox
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 1
Text = 'BakProjAddExtComboBox'
@ -1036,7 +1051,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 100
end
object BakProjMaxCounterComboBox: TComboBox
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 2
Text = 'BakProjMaxCounterComboBox'
@ -1046,7 +1060,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 100
end
object BakProjSubDirComboBox: TComboBox
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 3
Text = 'BakProjSubDirComboBox'
@ -1058,7 +1071,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object BackupOtherGroupBox: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'BackupOtherGroupBox'
ClientHeight = 196
ClientWidth = 632
@ -1070,7 +1082,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 632
object BakOtherAddExtLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'BakOtherAddExtLabel'
Color = clNone
Left = 117
@ -1080,6 +1091,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object BakOtherMaxCounterLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'BakOtherMaxCounterLabel'
Color = clNone
Left = 117
@ -1089,6 +1101,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object BakOtherSubDirLabel: TLabel
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'BakOtherSubDirLabel'
Color = clNone
Left = 117
@ -1098,7 +1111,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object BakOtherTypeRadioGroup: TRadioGroup
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'BakOtherTypeRadioGroup'
Columns = 2
OnClick = BakTypeRadioGroupClick
@ -1108,7 +1120,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 612
end
object BakOtherAddExtComboBox: TComboBox
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 1
Text = 'BakOtherAddExtComboBox'
@ -1118,6 +1129,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 100
end
object BakOtherMaxCounterComboBox: TComboBox
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 2
Text = 'BakOtherMaxCounterComboBox'
@ -1127,6 +1139,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 100
end
object BakOtherSubDirComboBox: TComboBox
BorderSpacing.OnChange = nil
MaxLength = 0
TabOrder = 3
Text = 'BakOtherSubDirComboBox'
@ -1147,7 +1160,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 646
object PascalFileExtRadiogroup: TRadioGroup
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'PascalFileExtRadiogroup'
Columns = 2
ParentColor = True
@ -1158,7 +1170,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object CharcaseFileActionRadioGroup: TRadioGroup
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'CharcaseFileActionRadioGroup'
Columns = 2
ParentColor = True
@ -1169,7 +1180,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object AmbiguousFileActionRadioGroup: TRadioGroup
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'AmbiguousFileActionRadioGroup'
Columns = 2
ParentColor = True
@ -1188,6 +1198,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Top = 28
Width = 646
object Label1: TLabel
BorderSpacing.OnChange = nil
Caption = 'NOTE: only absolute paths are supported now'
Color = clNone
Left = 8
@ -1197,7 +1208,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object LazDocPathsGroupBox: TGroupBox
Align = alTop
BorderSpacing.OnChange = nil
BorderSpacing.Around = 6
Caption = 'LazDocPathsGroupBox'
ClientHeight = 210
@ -1210,7 +1220,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 634
object LazDocListBox: TListBox
Align = alTop
BorderSpacing.OnChange = nil
BorderSpacing.Around = 6
TabOrder = 0
TopIndex = -1
@ -1220,7 +1229,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 622
end
object LazDocAddPathButton: TButton
BorderSpacing.OnChange = nil
Caption = 'LazDocAddPathButton'
OnClick = LazDocAddPathButtonClick
TabOrder = 1
@ -1230,7 +1238,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
Width = 75
end
object LazDocDeletePathButton: TButton
BorderSpacing.OnChange = nil
Caption = 'LazDocDeletePathButton'
OnClick = LazDocDeletePathButtonClick
TabOrder = 2
@ -1241,7 +1248,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object LazDocPathEdit: TEdit
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
TabOrder = 3
Text = 'LazDocPathEdit'
Left = 6
@ -1251,7 +1257,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object LazDocBrowseButton: TButton
Anchors = [akTop, akRight]
BorderSpacing.OnChange = nil
Caption = '...'
OnClick = LazDocBrowseButtonClick
TabOrder = 4
@ -1265,7 +1270,6 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object CancelButton: TButton
Anchors = [akRight, akBottom]
BorderSpacing.OnChange = nil
Caption = 'CancelButton'
OnClick = CancelButtonClick
TabOrder = 1
@ -1276,6 +1280,7 @@ object EnvironmentOptionsDialog: TEnvironmentOptionsDialog
end
object OkButton: TButton
Anchors = [akRight, akBottom]
BorderSpacing.OnChange = nil
Caption = 'Ok'
OnClick = OkButtonClick
TabOrder = 2

702
ide/environmentopts.lrs
View File

@ -14,364 +14,366 @@ LazarusResources.Add('TEnvironmentOptionsDialog','FORMDATA',[
+#24'EnvironmentOptionsDialog'#12'ClientHeight'#3''''#2#11'ClientWidth'#3#138
+#2#8'OnResize'#7#10'FormResize'#13'PixelsPerInch'#2'p'#8'Position'#7#14'poSc'
+'reenCenter'#18'HorzScrollBar.Page'#3#137#2#18'VertScrollBar.Page'#3'&'#2#4
+'Left'#3'<'#1#6'Height'#3''''#2#3'Top'#3'#'#1#5'Width'#3#138#2#0#9'TNotebook'
+'Left'#3'7'#1#6'Height'#3''''#2#3'Top'#3#25#1#5'Width'#3#138#2#0#9'TNotebook'
+#8'Notebook'#5'Align'#7#5'alTop'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
+#8'akBottom'#0#14'OnChangeBounds'#7#20'NotebookChangeBounds'#9'PageIndex'#2#3
+#6'Height'#3#252#1#5'Width'#3#138#2#0#5'TPage'#9'FilesPage'#7'Caption'#6#9'F'
+'ilesPage'#11'ClientWidth'#3#134#2#12'ClientHeight'#3#222#1#4'Left'#2#2#6'He'
+'ight'#3#222#1#3'Top'#2#28#5'Width'#3#134#2#0#6'TLabel'#23'MaxRecentOpenFile'
+'sLabel'#22'BorderSpacing.OnChange'#13#7'Caption'#6#23'MaxRecentOpenFilesLab'
+#8'akBottom'#0#22'BorderSpacing.OnChange'#13#14'OnChangeBounds'#7#20'Noteboo'
+'kChangeBounds'#9'PageIndex'#2#3#6'Height'#3#252#1#5'Width'#3#138#2#0#5'TPag'
+'e'#9'FilesPage'#7'Caption'#6#9'FilesPage'#11'ClientWidth'#3#134#2#12'Client'
+'Height'#3#222#1#4'Left'#2#2#6'Height'#3#222#1#3'Top'#2#28#5'Width'#3#134#2#0
+#6'TLabel'#23'MaxRecentOpenFilesLabel'#7'Caption'#6#23'MaxRecentOpenFilesLab'
+'el'#5'Color'#7#6'clNone'#4'Left'#2#4#6'Height'#2#12#3'Top'#2#10#5'Width'#3
+#152#0#0#0#6'TLabel'#26'MaxRecentProjectFilesLabel'#22'BorderSpacing.OnChang'
+'e'#13#7'Caption'#6#26'MaxRecentProjectFilesLabel'#5'Color'#7#6'clNone'#4'Le'
+'ft'#2#4#6'Height'#2#12#3'Top'#2':'#5'Width'#3#160#0#0#0#9'TComboBox'#26'Max'
+'RecentOpenFilesComboBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'B'
+'orderSpacing.OnChange'#13#13'Items.Strings'#1#6#1'5'#6#2'10'#6#2'15'#6#2'20'
+#6#2'25'#6#2'30'#0#9'MaxLength'#2#0#8'TabOrder'#2#0#4'Left'#2#4#6'Height'#2
+#21#3'Top'#2#26#5'Width'#3'z'#2#0#0#9'TComboBox'#29'MaxRecentProjectFilesCom'
+'boBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnCha'
+'nge'#13#13'Items.Strings'#1#6#1'5'#6#2'10'#6#2'15'#6#2'20'#6#2'25'#6#2'30'#0
+#9'MaxLength'#2#0#8'TabOrder'#2#1#4'Left'#2#4#6'Height'#2#21#3'Top'#2'J'#5'W'
+'idth'#3'z'#2#0#0#9'TCheckBox'#30'OpenLastProjectAtStartCheckBox'#7'Anchors'
+#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'
+#6#30'OpenLastProjectAtStartCheckBox'#8'TabOrder'#2#2#4'Left'#2#4#6'Height'#2
+#24#3'Top'#2'j'#5'Width'#3'z'#2#0#0#9'TGroupBox'#18'LazarusDirGroupBox'#7'An'
+'chors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'C'
+'aption'#6#18'LazarusDirGroupBox'#12'ClientHeight'#2'%'#11'ClientWidth'#3'v'
+#2#11'ParentColor'#9#8'TabOrder'#2#3#4'Left'#2#4#6'Height'#2'6'#3'Top'#3#142
+#0#5'Width'#3'z'#2#0#9'TComboBox'#18'LazarusDirComboBox'#7'Anchors'#11#5'akT'
+'op'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#9'MaxLength'#2#0#8
+'TabOrder'#2#0#4'Text'#6#18'LazarusDirComboBox'#4'Left'#2#6#6'Height'#2#21#3
+'Top'#2#3#5'Width'#3'N'#2#0#0#7'TButton'#16'LazarusDirButton'#7'Anchors'#11#5
+'akTop'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#3'...'#7'OnC'
+'lick'#7#22'DirectoriesButtonClick'#8'TabOrder'#2#1#4'Left'#3'\'#2#6'Height'
+#2#21#3'Top'#2#3#5'Width'#2#20#0#0#0#9'TGroupBox'#20'CompilerPathGroupBox'#7
+'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#20'CompilerPathGro'
+'upBox'#12'ClientHeight'#2'%'#11'ClientWidth'#3'v'#2#11'ParentColor'#9#8'Tab'
+'Order'#2#4#4'Left'#2#4#6'Height'#2'6'#3'Top'#3#197#0#5'Width'#3'z'#2#0#9'TC'
+'omboBox'#20'CompilerPathComboBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRigh'
+'t'#0#9'MaxLength'#2#0#8'TabOrder'#2#0#4'Text'#6#20'CompilerPathComboBox'#4
+#152#0#0#0#6'TLabel'#26'MaxRecentProjectFilesLabel'#7'Caption'#6#26'MaxRecen'
+'tProjectFilesLabel'#5'Color'#7#6'clNone'#4'Left'#2#4#6'Height'#2#12#3'Top'#2
+':'#5'Width'#3#160#0#0#0#9'TComboBox'#26'MaxRecentOpenFilesComboBox'#7'Ancho'
+'rs'#11#5'akTop'#6'akLeft'#7'akRight'#0#13'Items.Strings'#1#6#1'5'#6#2'10'#6
+#2'15'#6#2'20'#6#2'25'#6#2'30'#0#9'MaxLength'#2#0#8'TabOrder'#2#0#4'Left'#2#4
+#6'Height'#2#21#3'Top'#2#26#5'Width'#3'z'#2#0#0#9'TComboBox'#29'MaxRecentPro'
+'jectFilesComboBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#13'Items.S'
+'trings'#1#6#1'5'#6#2'10'#6#2'15'#6#2'20'#6#2'25'#6#2'30'#0#9'MaxLength'#2#0
+#8'TabOrder'#2#1#4'Left'#2#4#6'Height'#2#21#3'Top'#2'J'#5'Width'#3'z'#2#0#0#9
+'TCheckBox'#30'OpenLastProjectAtStartCheckBox'#7'Anchors'#11#5'akTop'#6'akLe'
+'ft'#7'akRight'#0#7'Caption'#6#30'OpenLastProjectAtStartCheckBox'#8'TabOrder'
+#2#2#4'Left'#2#4#6'Height'#2#24#3'Top'#2'j'#5'Width'#3'z'#2#0#0#9'TGroupBox'
+#18'LazarusDirGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Capt'
+'ion'#6#18'LazarusDirGroupBox'#12'ClientHeight'#2'%'#11'ClientWidth'#3'v'#2
+#11'ParentColor'#9#8'TabOrder'#2#3#4'Left'#2#4#6'Height'#2'6'#3'Top'#3#142#0
+#5'Width'#3'z'#2#0#9'TComboBox'#18'LazarusDirComboBox'#7'Anchors'#11#5'akTop'
+#6'akLeft'#7'akRight'#0#9'MaxLength'#2#0#8'TabOrder'#2#0#4'Text'#6#18'Lazaru'
+'sDirComboBox'#4'Left'#2#6#6'Height'#2#21#3'Top'#2#3#5'Width'#3'N'#2#0#0#7'T'
+'Button'#16'LazarusDirButton'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'
+#6#3'...'#7'OnClick'#7#22'DirectoriesButtonClick'#8'TabOrder'#2#1#4'Left'#3
+'\'#2#6'Height'#2#21#3'Top'#2#3#5'Width'#2#20#0#0#0#9'TGroupBox'#20'Compiler'
+'PathGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacin'
+'g.OnChange'#13#7'Caption'#6#20'CompilerPathGroupBox'#12'ClientHeight'#2'%'
+#11'ClientWidth'#3'v'#2#11'ParentColor'#9#8'TabOrder'#2#4#4'Left'#2#4#6'Heig'
+'ht'#2'6'#3'Top'#3#197#0#5'Width'#3'z'#2#0#9'TComboBox'#20'CompilerPathCombo'
+'Box'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChang'
+'e'#13#9'MaxLength'#2#0#8'TabOrder'#2#0#4'Text'#6#20'CompilerPathComboBox'#4
+'Left'#2#6#6'Height'#2#21#3'Top'#2#3#5'Width'#3'N'#2#0#0#7'TButton'#18'Compi'
+'lerPathButton'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#3'...'#7'On'
+'Click'#7#16'FilesButtonClick'#8'TabOrder'#2#1#4'Left'#3'\'#2#6'Height'#2#21
+#3'Top'#2#2#5'Width'#2#20#0#0#0#9'TGroupBox'#20'FPCSourceDirGroupBox'#7'Anch'
+'ors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#20'FPCSourceDirGroupBo'
+'x'#12'ClientHeight'#2'%'#11'ClientWidth'#3'v'#2#11'ParentColor'#9#8'TabOrde'
+'r'#2#5#4'Left'#2#4#6'Height'#2'6'#3'Top'#3#252#0#5'Width'#3'z'#2#0#9'TCombo'
+'Box'#20'FPCSourceDirComboBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
+#9'MaxLength'#2#0#8'TabOrder'#2#0#4'Text'#6#20'FPCSourceDirComboBox'#4'Left'
+#2#6#6'Height'#2#21#3'Top'#2#2#5'Width'#3'N'#2#0#0#7'TButton'#18'FPCSourceDi'
+'rButton'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#3'...'#7'OnClick'
+#7#22'DirectoriesButtonClick'#8'TabOrder'#2#1#4'Left'#3'\'#2#6'Height'#2#21#3
+'Top'#2#3#5'Width'#2#20#0#0#0#9'TGroupBox'#16'MakePathGroupBox'#7'Anchors'#11
+#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#16'MakePathGroupBox'#12'Client'
+'lerPathButton'#7'Anchors'#11#5'akTop'#7'akRight'#0#22'BorderSpacing.OnChang'
+'e'#13#7'Caption'#6#3'...'#7'OnClick'#7#16'FilesButtonClick'#8'TabOrder'#2#1
+#4'Left'#3'\'#2#6'Height'#2#21#3'Top'#2#2#5'Width'#2#20#0#0#0#9'TGroupBox'#20
+'FPCSourceDirGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'Bord'
+'erSpacing.OnChange'#13#7'Caption'#6#20'FPCSourceDirGroupBox'#12'ClientHeigh'
+'t'#2'%'#11'ClientWidth'#3'v'#2#11'ParentColor'#9#8'TabOrder'#2#5#4'Left'#2#4
+#6'Height'#2'6'#3'Top'#3#252#0#5'Width'#3'z'#2#0#9'TComboBox'#20'FPCSourceDi'
+'rComboBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.O'
+'nChange'#13#9'MaxLength'#2#0#8'TabOrder'#2#0#4'Text'#6#20'FPCSourceDirCombo'
+'Box'#4'Left'#2#6#6'Height'#2#21#3'Top'#2#2#5'Width'#3'N'#2#0#0#7'TButton'#18
+'FPCSourceDirButton'#7'Anchors'#11#5'akTop'#7'akRight'#0#22'BorderSpacing.On'
+'Change'#13#7'Caption'#6#3'...'#7'OnClick'#7#22'DirectoriesButtonClick'#8'Ta'
+'bOrder'#2#1#4'Left'#3'\'#2#6'Height'#2#21#3'Top'#2#3#5'Width'#2#20#0#0#0#9
+'TGroupBox'#16'MakePathGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
+#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#16'MakePathGroupBox'#12'Client'
+'Height'#2'%'#11'ClientWidth'#3'v'#2#11'ParentColor'#9#8'TabOrder'#2#6#4'Lef'
+'t'#2#4#6'Height'#2'6'#3'Top'#3'3'#1#5'Width'#3'z'#2#0#9'TComboBox'#16'MakeP'
+'athComboBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#9'MaxLength'#2#0
+#8'TabOrder'#2#0#4'Text'#6#16'MakePathComboBox'#4'Left'#2#6#6'Height'#2#21#3
+'Top'#2#3#5'Width'#3'N'#2#0#0#7'TButton'#14'MakePathButton'#7'Anchors'#11#5
+'akTop'#7'akRight'#0#7'Caption'#6#3'...'#7'OnClick'#7#16'FilesButtonClick'#8
+'TabOrder'#2#1#4'Left'#3'\'#2#6'Height'#2#21#3'Top'#2#3#5'Width'#2#20#0#0#0#9
+'TGroupBox'#20'TestBuildDirGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRi'
+'ght'#0#7'Caption'#6#20'TestBuildDirGroupBox'#12'ClientHeight'#2'%'#11'Clien'
,'tWidth'#3'v'#2#11'ParentColor'#9#8'TabOrder'#2#7#4'Left'#2#4#6'Height'#2'6'
+#3'Top'#3'j'#1#5'Width'#3'z'#2#0#9'TComboBox'#20'TestBuildDirComboBox'#7'Anc'
+'hors'#11#5'akTop'#6'akLeft'#7'akRight'#0#9'MaxLength'#2#0#8'TabOrder'#2#0#4
+'Text'#6#20'TestBuildDirComboBox'#4'Left'#2#6#6'Height'#2#21#3'Top'#2#3#5'Wi'
+'dth'#3'N'#2#0#0#7'TButton'#18'TestBuildDirButton'#7'Anchors'#11#5'akTop'#7
+'akRight'#0#7'Caption'#6#3'...'#7'OnClick'#7#22'DirectoriesButtonClick'#8'Ta'
+'athComboBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing'
+'.OnChange'#13#9'MaxLength'#2#0#8'TabOrder'#2#0#4'Text'#6#16'MakePathComboBo'
+'x'#4'Left'#2#6#6'Height'#2#21#3'Top'#2#3#5'Width'#3'N'#2#0#0#7'TButton'#14
+'MakePathButton'#7'Anchors'#11#5'akTop'#7'akRight'#0#22'BorderSpacing.OnChan'
+'ge'#13#7'Caption'#6#3'...'#7'OnClick'#7#16'FilesButtonClick'#8'TabOrder'#2#1
+#4'Left'#3'\'#2#6'Height'#2#21#3'Top'#2#3#5'Width'#2#20#0#0#0#9'TGroupBox'#20
+'TestBuildDirGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'Bord'
,'erSpacing.OnChange'#13#7'Caption'#6#20'TestBuildDirGroupBox'#12'ClientHeigh'
+'t'#2'%'#11'ClientWidth'#3'v'#2#11'ParentColor'#9#8'TabOrder'#2#7#4'Left'#2#4
+#6'Height'#2'6'#3'Top'#3'j'#1#5'Width'#3'z'#2#0#9'TComboBox'#20'TestBuildDir'
+'ComboBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.On'
+'Change'#13#9'MaxLength'#2#0#8'TabOrder'#2#0#4'Text'#6#20'TestBuildDirComboB'
+'ox'#4'Left'#2#6#6'Height'#2#21#3'Top'#2#3#5'Width'#3'N'#2#0#0#7'TButton'#18
+'TestBuildDirButton'#7'Anchors'#11#5'akTop'#7'akRight'#0#22'BorderSpacing.On'
+'Change'#13#7'Caption'#6#3'...'#7'OnClick'#7#22'DirectoriesButtonClick'#8'Ta'
+'bOrder'#2#1#4'Left'#3'\'#2#6'Height'#2#21#3'Top'#2#2#5'Width'#2#20#0#0#0#0#5
+'TPage'#11'DesktopPage'#7'Caption'#6#11'DesktopPage'#11'ClientWidth'#3#134#2
+#12'ClientHeight'#3#222#1#4'Left'#2#2#6'Height'#3#222#1#3'Top'#2#28#5'Width'
+#3#134#2#0#9'TGroupBox'#16'LanguageGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'
+#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#16'LanguageGroupBox'
+#12'ClientHeight'#2'8'#11'ClientWidth'#3'x'#2#11'ParentColor'#9#8'TabOrder'#2
+#0#4'Left'#2#4#6'Height'#2'8'#3'Top'#2#10#5'Width'#3'x'#2#0#9'TComboBox'#16
+'LanguageComboBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSp'
+'acing.OnChange'#13#9'MaxLength'#2#0#8'TabOrder'#2#0#4'Text'#6#16'LanguageCo'
+'mboBox'#4'Left'#2#6#6'Height'#2#21#3'Top'#2#8#5'Width'#3'd'#2#0#0#0#9'TChec'
+'kBox$ShowHintsForComponentPaletteCheckBox'#22'BorderSpacing.OnChange'#13#7
+'Caption'#6'$ShowHintsForComponentPaletteCheckBox'#8'TabOrder'#2#1#4'Left'#2
+#4#6'Height'#2#24#3'Top'#3'J'#1#5'Width'#3'x'#2#0#0#9'TGroupBox'#16'AutoSave'
+'GroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.On'
+'Change'#13#7'Caption'#6#16'AutoSaveGroupBox'#12'ClientHeight'#3#136#0#11'Cl'
+'ientWidth'#3'x'#2#11'ParentColor'#9#8'TabOrder'#2#2#4'Left'#2#4#6'Height'#3
+#136#0#3'Top'#2'J'#5'Width'#3'x'#2#0#6'TLabel'#27'AutoSaveIntervalInSecsLabe'
+'l'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'
+#13#7'Caption'#6#27'AutoSaveIntervalInSecsLabel'#5'Color'#7#6'clNone'#7'Enab'
+'led'#8#4'Left'#2#6#6'Height'#2#17#3'Top'#2'C'#5'Width'#3'\'#2#0#0#9'TCheckB'
+'ox'#27'AutoSaveEditorFilesCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRi'
+'ght'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#27'AutoSaveEditorFilesChe'
+'ckBox'#7'Enabled'#8#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#2#24#3'Top'#2#4#5
+'Width'#3'd'#2#0#0#9'TCheckBox'#23'AutoSaveProjectCheckBox'#7'Anchors'#11#5
+'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#23
+'AutoSaveProjectCheckBox'#7'Enabled'#8#8'TabOrder'#2#1#4'Left'#2#6#6'Height'
+#2#24#3'Top'#2#30#5'Width'#3'd'#2#0#0#9'TComboBox'#30'AutoSaveIntervalInSecs'
+'ComboBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.On'
+'Change'#13#7'Enabled'#8#13'Items.Strings'#1#6#4'1200'#6#3'600'#6#3'300'#6#3
+'120'#0#9'MaxLength'#2#0#8'TabOrder'#2#2#4'Left'#2#6#6'Height'#2#21#3'Top'#2
+'W'#5'Width'#3'd'#2#0#0#0#9'TGroupBox'#20'DesktopFilesGroupBox'#7'Anchors'#11
+#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6
+#20'DesktopFilesGroupBox'#12'ClientHeight'#2'a'#11'ClientWidth'#3'x'#2#11'Pa'
+'rentColor'#9#8'TabOrder'#2#3#4'Left'#2#4#6'Height'#2'a'#3'Top'#3#218#0#5'Wi'
+'dth'#3'x'#2#0#7'TButton'#31'SaveDesktopSettingsToFileButton'#7'Anchors'#11#5
+'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#31
+'SaveDesktopSettingsToFileButton'#7'OnClick'#7'$SaveDesktopSettingsToFileBut'
+'tonClick'#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#2#25#3'Top'#2#8#5'Width'#3
+'d'#2#0#0#7'TButton!LoadDesktopSettingsFromFileButton'#7'Anchors'#11#5'akTop'
+#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6'!LoadDesk'
+'topSettingsFromFileButton'#7'OnEnter'#7'&LoadDesktopSettingsFromFileButtonC'
+'lick'#8'TabOrder'#2#1#4'Left'#2#6#6'Height'#2#25#3'Top'#2'+'#5'Width'#3'd'#2
+#0#0#0#9'TCheckBox$ShowHintsForMainSpeedButtonsCheckBox'#7'Caption'#6'$ShowH'
+'intsForMainSpeedButtonsCheckBox'#8'TabOrder'#2#4#4'Left'#2#4#6'Height'#2#24
+#3'Top'#3'b'#1#5'Width'#3'x'#2#0#0#9'TCheckBox'#28'MsgViewDblClickJumpsCheck'
+'Box'#7'Caption'#6#28'MsgViewDblClickJumpsCheckBox'#8'TabOrder'#2#5#4'Left'#2
+#4#6'Height'#2#24#3'Top'#3'z'#1#5'Width'#3'x'#2#0#0#0#5'TPage'#11'WindowsPag'
+'e'#7'Caption'#6#11'WindowsPage'#11'ClientWidth'#3#134#2#12'ClientHeight'#3
+#222#1#4'Left'#2#2#6'Height'#3#222#1#3'Top'#2#28#5'Width'#3#134#2#0#9'TCheck'
+'Box!MinimizeAllOnMinimizeMainCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'a'
+'kRight'#0#7'Caption'#6'!MinimizeAllOnMinimizeMainCheckBox'#7'Enabled'#8#8'T'
+'abOrder'#2#0#4'Left'#2#4#6'Height'#2#24#3'Top'#2#10#5'Width'#3'|'#2#0#0#9'T'
+'CheckBox'#20'HideIDEOnRunCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRig'
+'ht'#0#7'Caption'#6#20'HideIDEOnRunCheckBox'#8'TabOrder'#2#1#4'Left'#2#4#6'H'
+'eight'#2#24#3'Top'#2'"'#5'Width'#3'|'#2#0#0#9'TGroupBox'#23'WindowPositions'
+'GroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#7'Capti'
+'on'#6#23'WindowPositionsGroupBox'#12'ClientHeight'#3#143#1#11'ClientWidth'#3
+'|'#2#11'ParentColor'#9#8'TabOrder'#2#2#4'Left'#2#4#6'Height'#3#143#1#3'Top'
,#2'D'#5'Width'#3'|'#2#0#8'TListBox'#22'WindowPositionsListBox'#7'Anchors'#11
+#5'akTop'#6'akLeft'#7'akRight'#0#9'OnMouseUp'#7#29'WindowPositionsListBoxMou'
+'seUp'#8'TabOrder'#2#0#8'TopIndex'#2#255#4'Left'#2#6#6'Height'#2'd'#3'Top'#2
+#6#5'Width'#3'l'#2#0#0#0#0#5'TPage'#14'FormEditorPage'#7'Caption'#6#14'FormE'
+'ditorPage'#11'ClientWidth'#3#134#2#12'ClientHeight'#3#222#1#8'OnResize'#7#20
+'FormEditorPageResize'#4'Left'#2#2#6'Height'#3#222#1#3'Top'#2#28#5'Width'#3
+#134#2#0#9'TGroupBox'#12'GridGroupBox'#5'Align'#7#5'alTop'#22'BorderSpacing.'
+'OnChange'#13#20'BorderSpacing.Around'#2#6#7'Caption'#6#12'GridGroupBox'#12
+'ClientHeight'#2'q'#11'ClientWidth'#3'v'#2#11'ParentColor'#9#8'TabOrder'#2#0
+#4'Left'#2#6#6'Height'#3#130#0#3'Top'#2#6#5'Width'#3'z'#2#0#6'TLabel'#14'Gri'
+'dColorLabel'#22'BorderSpacing.OnChange'#13#7'Caption'#6#14'GridColorLabel'#5
+'Color'#7#6'clNone'#4'Left'#3'"'#1#6'Height'#2#17#3'Top'#2#6#5'Width'#3#145#0
+#0#0#6'TLabel'#14'GridSizeXLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
+#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#14'GridSizeXLabel'#5'Color'#7#6
+'clNone'#4'Left'#2'u'#6'Height'#2#17#3'Top'#2'<'#5'Width'#3#247#1#0#0#6'TLab'
+'el'#14'GridSizeYLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'Bor'
+'derSpacing.OnChange'#13#7'Caption'#6#14'GridSizeYLabel'#5'Color'#7#6'clNone'
+#4'Left'#2'u'#6'Height'#2#17#3'Top'#2'T'#5'Width'#3#247#1#0#0#12'TColorButto'
+'n'#15'GridColorButton'#22'BorderSpacing.OnChange'#13#11'BorderWidth'#2#2#4
+'Left'#3#230#0#6'Height'#2#23#5'Width'#2'2'#0#0#9'TCheckBox'#18'SnapToGridCh'
+'eckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnCh'
+'ange'#13#7'Caption'#6#18'SnapToGridCheckBox'#8'TabOrder'#2#1#4'Left'#2#6#6
+'Height'#2#24#3'Top'#2#26#5'Width'#3'f'#2#0#0#9'TCheckBox'#16'ShowGridCheckB'
+'ox'#22'BorderSpacing.OnChange'#13#7'Caption'#6#16'ShowGridCheckBox'#8'TabOr'
+'der'#2#0#4'Left'#2#6#6'Height'#2#24#5'Width'#3#138#0#0#0#9'TComboBox'#17'Gr'
+'idSizeXComboBox'#22'BorderSpacing.OnChange'#13#13'Items.Strings'#1#6#1'2'#6
+#1'5'#6#1'8'#6#2'10'#6#2'12'#6#2'15'#6#2'20'#6#2'25'#6#2'30'#0#9'MaxLength'#2
+#0#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#2#4'Left'#2#6#6'Height'#2
+#21#3'Top'#2':'#5'Width'#2'd'#0#0#9'TComboBox'#17'GridSizeYComboBox'#22'Bord'
+'erSpacing.OnChange'#13#13'Items.Strings'#1#6#1'2'#6#1'5'#6#1'8'#6#2'10'#6#2
+'12'#6#2'15'#6#2'20'#6#2'25'#6#2'30'#0#9'MaxLength'#2#0#14'ParentShowHint'#8
+#8'ShowHint'#9#8'TabOrder'#2#3#4'Left'#2#6#6'Height'#2#21#3'Top'#2'R'#5'Widt'
+'h'#2'd'#0#0#0#9'TGroupBox'#18'GuideLinesGroupBox'#5'Align'#7#6'alLeft'#7'An'
+'chors'#11#5'akTop'#6'akLeft'#0#22'BorderSpacing.OnChange'#13#20'BorderSpaci'
+'ng.Around'#2#6#7'Caption'#6#18'GuideLinesGroupBox'#12'ClientHeight'#3'9'#1
+#11'ClientWidth'#3#202#0#11'ParentColor'#9#8'TabOrder'#2#1#4'Left'#3#222#0#6
+'Height'#3'J'#1#3'Top'#3#142#0#5'Width'#3#206#0#0#12'TColorButton'#27'GuideL'
+'ineColorLeftTopButton'#22'BorderSpacing.OnChange'#13#11'BorderWidth'#2#2#4
+'Left'#2#6#6'Height'#2#23#3'Top'#2'F'#5'Width'#2'2'#0#0#12'TColorButton'#31
+'GuideLineColorRightBottomButton'#22'BorderSpacing.OnChange'#13#11'BorderWid'
+'th'#2#2#4'Left'#2#6#6'Height'#2#23#3'Top'#2'v'#5'Width'#2'2'#0#0#6'TLabel'
+#26'GuideLineColorLeftTopLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
+#22'BorderSpacing.OnChange'#13#7'Caption'#6#26'GuideLineColorLeftTopLabel'#5
+'Color'#7#6'clNone'#4'Left'#2#6#6'Height'#2#17#3'Top'#2'9'#5'Width'#3#188#0#0
+#0#6'TLabel'#30'GuideLineColorRightBottomLabel'#7'Anchors'#11#5'akTop'#6'akL'
+'eft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#30'GuideLineCo'
+'lorRightBottomLabel'#5'Color'#7#6'clNone'#4'Left'#2#6#6'Height'#2#17#3'Top'
+#2'f'#5'Width'#3#188#0#0#0#9'TCheckBox'#22'ShowGuideLinesCheckBox'#7'Anchors'
+#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'
+#6#22'ShowGuideLinesCheckBox'#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#2#24#5'W'
+'idth'#3#188#0#0#0#9'TCheckBox'#24'SnapToGuideLinesCheckBox'#7'Anchors'#11#5
+'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#24
+'SnapToGuideLinesCheckBox'#8'TabOrder'#2#1#4'Left'#2#6#6'Height'#2#24#3'Top'
+#2#19#5'Width'#3#188#0#0#0#0#9'TGroupBox'#20'FormEditMiscGroupBox'#5'Align'#7
+#6'alLeft'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#20'BorderSpacing.Ar'
+'ound'#2#6#7'Caption'#6#20'FormEditMiscGroupBox'#12'ClientHeight'#3'9'#1#11
+'ClientWidth'#3#202#0#11'ParentColor'#9#8'TabOrder'#2#2#23'AnchorSideRight.C'
+'ontrol'#7#14'FormEditorPage'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'
+#3#178#1#6'Height'#3'J'#1#3'Top'#3#142#0#5'Width'#3#206#0#0#12'TColorButton'
+#18'GrabberColorButton'#11'BorderWidth'#2#2#4'Left'#2#6#6'Height'#2#23#3'Top'
+#2'f'#5'Width'#2'2'#0#0#12'TColorButton'#17'MarkerColorButton'#11'BorderWidt'
+'h'#2#2#4'Left'#2#6#6'Height'#2#23#3'Top'#3#150#0#5'Width'#2'2'#0#0#6'TLabel'
+#17'GrabberColorLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Capti'
+'on'#6#17'GrabberColorLabel'#5'Color'#7#6'clNone'#4'Left'#2#6#6'Height'#2#14
,#3'Top'#2'Y'#5'Width'#3#186#0#0#0#6'TLabel'#16'MarkerColorLabel'#7'Anchors'
+#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#16'MarkerColorLabel'#5'Colo'
+'r'#7#6'clNone'#4'Left'#2#6#6'Height'#2#14#3'Top'#3#134#0#5'Width'#3#186#0#0
+#0#9'TCheckBox'#29'ShowComponentCaptionsCheckBox'#7'Anchors'#11#5'akTop'#6'a'
+'kLeft'#7'akRight'#0#7'Caption'#6#29'ShowComponentCaptionsCheckBox'#8'TabOrd'
+'er'#2#0#4'Left'#2#6#6'Height'#2#24#5'Width'#3#186#0#0#0#9'TCheckBox'#23'Sho'
+'wEditorHintsCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Capti'
+'on'#6#23'ShowEditorHintsCheckBox'#8'TabOrder'#2#1#4'Left'#2#6#6'Height'#2#24
+#3'Top'#2#19#5'Width'#3#186#0#0#0#9'TCheckBox'#29'AutoCreateFormsOnOpenCheck'
+'Box'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChang'
+'e'#13#7'Caption'#6#29'AutoCreateFormsOnOpenCheckBox'#8'TabOrder'#2#2#4'Left'
+#2#6#6'Height'#2#24#3'Top'#2'&'#5'Width'#3#186#0#0#0#9'TCheckBox'#25'RightCl'
+'ickSelectsCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'Border'
+'Spacing.OnChange'#13#7'Caption'#6#25'RightClickSelectsCheckBox'#8'TabOrder'
+#2#3#4'Left'#2#6#6'Height'#2#24#3'Top'#2'9'#5'Width'#3#186#0#0#0#9'TCheckBox'
+#25'DesignerPaintLazyCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
+#7'Caption'#6#25'DesignerPaintLazyCheckBox'#14'ParentShowHint'#8#8'ShowHint'
+#9#8'TabOrder'#2#4#4'Left'#2#6#6'Height'#2#24#3'Top'#3#182#0#5'Width'#3#186#0
+#0#0#0#9'TGroupBox'#18'RubberbandGroupBox'#5'Align'#7#6'alLeft'#7'Anchors'#11
+#5'akTop'#6'akLeft'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#18'Rubberban'
+'dGroupBox'#12'ClientHeight'#3'9'#1#11'ClientWidth'#3#206#0#11'ParentColor'#9
+#8'TabOrder'#2#3#4'Left'#2#6#6'Height'#3'J'#1#3'Top'#3#142#0#5'Width'#3#210#0
+#0#12'TColorButton'#27'RubberbandSelectColorButton'#11'BorderWidth'#2#2#4'Le'
+'ft'#2#6#6'Height'#2#23#3'Top'#2#19#5'Width'#2'2'#0#0#12'TColorButton'#27'Ru'
+'bberbandCreateColorButton'#11'BorderWidth'#2#2#4'Left'#2#6#6'Height'#2#23#3
+'Top'#2'F'#5'Width'#2'2'#0#0#6'TLabel'#26'RubberbandSelectColorLabel'#7'Anch'
+'ors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#26'RubberbandSelectCol'
+'orLabel'#5'Color'#7#6'clNone'#4'Left'#2#6#6'Height'#2#17#3'Top'#2#3#5'Width'
+#3#184#0#0#0#6'TLabel'#26'RubberbandCreateColorLabel'#7'Anchors'#11#5'akTop'
+#6'akLeft'#7'akRight'#0#7'Caption'#6#26'RubberbandCreateColorLabel'#5'Color'
+#7#6'clNone'#4'Left'#2#6#6'Height'#2#17#3'Top'#2'6'#5'Width'#3#184#0#0#0#9'T'
+'CheckBox$RubberbandSelectsGrandChildsCheckBox'#7'Anchors'#11#5'akTop'#6'akL'
+'eft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6'$RubberbandSel'
+'ectsGrandChildsCheckBox'#8'TabOrder'#2#0#6'Height'#2#24#3'Top'#2'f'#5'Width'
+#3#190#0#0#0#0#0#5'TPage'#19'ObjectInspectorPage'#7'Caption'#6#19'ObjectInsp'
+'ectorPage'#11'ClientWidth'#3#134#2#12'ClientHeight'#3#222#1#4'Left'#2#2#6'H'
+'eight'#3#222#1#3'Top'#2#28#5'Width'#3#134#2#0#9'TGroupBox'#29'ObjectInspect'
+'orColorsGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6
+#29'ObjectInspectorColorsGroupBox'#12'ClientHeight'#3#173#0#11'ClientWidth'#3
+'{'#2#11'ParentColor'#9#8'TabOrder'#2#0#4'Left'#2#5#6'Height'#3#173#0#3'Top'
+#2#7#5'Width'#3'{'#2#0#12'TColorButton'#23'OIBackgroundColorButton'#11'Borde'
+'rWidth'#2#2#4'Left'#2#6#6'Height'#2#23#3'Top'#2#5#5'Width'#2'2'#0#0#12'TCol'
+'orButton'#21'OISubPropsColorButton'#11'BorderWidth'#2#2#4'Left'#2#6#6'Heigh'
+'t'#2#23#3'Top'#2#29#5'Width'#2'2'#0#0#12'TColorButton'#23'OIReferencesColor'
+'Button'#11'BorderWidth'#2#2#4'Left'#2#6#6'Height'#2#23#3'Top'#2'5'#5'Width'
+#2'2'#0#0#12'TColorButton'#18'OIValueColorButton'#11'BorderWidth'#2#2#4'Left'
+#2#6#6'Height'#2#23#3'Top'#2'M'#5'Width'#2'2'#0#0#12'TColorButton'#25'OIDefa'
+'ultValueColorButton'#11'BorderWidth'#2#2#4'Left'#2#6#6'Height'#2#23#3'Top'#2
+'e'#5'Width'#2'2'#0#0#12'TColorButton'#21'OIPropNameColorButton'#11'BorderWi'
+'dth'#2#2#4'Left'#2#6#6'Height'#2#23#3'Top'#2'}'#5'Width'#2'2'#0#0#6'TLabel'
+#22'OIBackgroundColorLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7
+'Caption'#6#22'OIBackgroundColorLabel'#5'Color'#7#6'clNone'#4'Left'#2'A'#6'H'
+'eight'#2#17#3'Top'#2#11#5'Width'#3'$'#2#0#0#6'TLabel'#20'OISubPropsColorLab'
+'el'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#20'OISubProp'
+'sColorLabel'#5'Color'#7#6'clNone'#4'Left'#2'A'#6'Height'#2#17#3'Top'#2'#'#5
+'Width'#3'$'#2#0#0#6'TLabel'#22'OIReferencesColorLabel'#7'Anchors'#11#5'akTo'
+'p'#6'akLeft'#7'akRight'#0#7'Caption'#6#22'OIReferencesColorLabel'#5'Color'#7
+#6'clNone'#4'Left'#2'A'#6'Height'#2#17#3'Top'#2';'#5'Width'#3'$'#2#0#0#6'TLa'
+'bel'#17'OIValueColorLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7
+'Caption'#6#17'OIValueColorLabel'#5'Color'#7#6'clNone'#4'Left'#2'A'#6'Height'
+#2#17#3'Top'#2'S'#5'Width'#3'$'#2#0#0#6'TLabel'#24'OIDefaultValueColorLabel'
+#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#24'OIDefaultValu'
+'eColorLabel'#5'Color'#7#6'clNone'#4'Left'#2'A'#6'Height'#2#17#3'Top'#2'k'#5
+'Width'#3'$'#2#0#0#6'TLabel'#20'OIPropNameColorLabel'#7'Anchors'#11#5'akTop'
,#6'akLeft'#7'akRight'#0#7'Caption'#6#20'OIPropNameColorLabel'#5'Color'#7#6'c'
+'lNone'#4'Left'#2'A'#6'Height'#2#17#3'Top'#3#131#0#5'Width'#3'$'#2#0#0#0#9'T'
+'GroupBox'#14'OIMiscGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7
+'Caption'#6#14'OIMiscGroupBox'#12'ClientHeight'#2'i'#11'ClientWidth'#3'{'#2
+#11'ParentColor'#9#8'TabOrder'#2#1#4'Left'#2#5#6'Height'#2'i'#3'Top'#3#186#0
+#5'Width'#3'{'#2#0#6'TLabel'#24'OIDefaultItemHeightLabel'#7'Anchors'#11#5'ak'
+'Top'#6'akLeft'#7'akRight'#0#7'Caption'#6#24'OIDefaultItemHeightLabel'#5'Col'
+'or'#7#6'clNone'#4'Left'#2#6#6'Height'#2#17#3'Top'#2#6#5'Width'#3'_'#2#0#0#9
+'TCheckBox'#18'OIShowHintCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRigh'
+'t'#0#7'Caption'#6#18'OIShowHintCheckBox'#8'TabOrder'#2#0#4'Left'#2#6#6'Heig'
+'ht'#2#24#3'Top'#2'7'#5'Width'#3'_'#2#0#0#9'TSpinEdit'#27'OIDefaultItemHeigh'
+'tSpinEdit'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'MaxValue'#5#0#0#0
+#0#0#0#0#200#5'@'#8'TabOrder'#2#1#4'Left'#2#6#6'Height'#2#20#3'Top'#2#24#5'W'
+'idth'#3'e'#2#0#0#0#0#5'TPage'#10'BackupPage'#7'Caption'#6#10'BackupPage'#11
+'ClientWidth'#3#134#2#12'ClientHeight'#3#222#1#4'Left'#2#2#6'Height'#3#222#1
+#3'Top'#2#28#5'Width'#3#134#2#0#6'TLabel'#15'BackupHelpLabel'#7'Anchors'#11#5
+'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#15'BackupHelpLabel'#5'Color'#7#6
+'clNone'#4'Left'#2#4#6'Height'#2#17#3'Top'#2#7#5'Width'#3'x'#2#0#0#9'TGroupB'
+'ox'#21'BackupProjectGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
+#7'Caption'#6#21'BackupProjectGroupBox'#12'ClientHeight'#3#201#0#11'ClientWi'
+'dth'#3'x'#2#11'ParentColor'#9#8'TabOrder'#2#0#4'Left'#2#4#6'Height'#3#201#0
+#3'Top'#2'"'#5'Width'#3'x'#2#0#6'TLabel'#18'BakProjAddExtLabel'#7'Anchors'#11
+#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#18'BakProjAddExtLabel'#5'Color'
+#7#6'clNone'#4'Left'#2'u'#6'Height'#2#17#3'Top'#2'd'#5'Width'#3#245#1#0#0#6
+'TLabel'#22'BakProjMaxCounterLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRig'
+'ht'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#22'BakProjMaxCounterLabel'
+#5'Color'#7#6'clNone'#4'Left'#2'v'#6'Height'#2#17#3'Top'#2'}'#5'Width'#3#244
+#1#0#0#6'TLabel'#18'BakProjSubDirLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'a'
+'kRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#18'BakProjSubDirLabel'
+#5'Color'#7#6'clNone'#4'Left'#2'u'#6'Height'#2#17#3'Top'#3#154#0#5'Width'#3
+#245#1#0#0#11'TRadioGroup'#21'BakProjTypeRadioGroup'#7'Anchors'#11#5'akTop'#6
+'akLeft'#7'akRight'#0#7'Caption'#6#21'BakProjTypeRadioGroup'#7'Columns'#2#2#7
+'OnClick'#7#22'BakTypeRadioGroupClick'#11'ParentColor'#9#4'Left'#2#6#6'Heigh'
+'t'#2'X'#5'Width'#3'd'#2#0#0#9'TComboBox'#21'BakProjAddExtComboBox'#9'MaxLen'
+'gth'#2#0#8'TabOrder'#2#1#4'Text'#6#21'BakProjAddExtComboBox'#4'Left'#2#10#6
+'Height'#2#21#3'Top'#2'b'#5'Width'#2'd'#0#0#9'TComboBox'#25'BakProjMaxCounte'
+'rComboBox'#22'BorderSpacing.OnChange'#13#9'MaxLength'#2#0#8'TabOrder'#2#2#4
+'Text'#6#25'BakProjMaxCounterComboBox'#4'Left'#2#10#6'Height'#2#21#3'Top'#2
+'}'#5'Width'#2'd'#0#0#9'TComboBox'#21'BakProjSubDirComboBox'#22'BorderSpacin'
+'g.OnChange'#13#9'MaxLength'#2#0#8'TabOrder'#2#3#4'Text'#6#21'BakProjSubDirC'
+'omboBox'#4'Left'#2#10#6'Height'#2#21#3'Top'#3#152#0#5'Width'#2'd'#0#0#0#9'T'
+'GroupBox'#19'BackupOtherGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRigh'
+'t'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#19'BackupOtherGroupBox'#12
+'ClientHeight'#3#196#0#11'ClientWidth'#3'x'#2#11'ParentColor'#9#8'TabOrder'#2
+#1#4'Left'#2#4#6'Height'#3#196#0#3'Top'#3#242#0#5'Width'#3'x'#2#0#6'TLabel'
+#19'BakOtherAddExtLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'Bo'
+'rderSpacing.OnChange'#13#7'Caption'#6#19'BakOtherAddExtLabel'#5'Color'#7#6
+'clNone'#4'Left'#2'u'#6'Height'#2#17#3'Top'#2'a'#5'Width'#3#245#1#0#0#6'TLab'
+'el'#23'BakOtherMaxCounterLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
+#0#7'Caption'#6#23'BakOtherMaxCounterLabel'#5'Color'#7#6'clNone'#4'Left'#2'u'
+#6'Height'#2#17#3'Top'#2'|'#5'Width'#3#245#1#0#0#6'TLabel'#19'BakOtherSubDir'
+'Label'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#19'BakOth'
+'erSubDirLabel'#5'Color'#7#6'clNone'#4'Left'#2'u'#6'Height'#2#17#3'Top'#3#151
+#0#5'Width'#3#245#1#0#0#11'TRadioGroup'#22'BakOtherTypeRadioGroup'#7'Anchors'
+#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'
+#6#22'BakOtherTypeRadioGroup'#7'Columns'#2#2#7'OnClick'#7#22'BakTypeRadioGro'
+'upClick'#11'ParentColor'#9#4'Left'#2#6#6'Height'#2'T'#5'Width'#3'd'#2#0#0#9
+'TComboBox'#22'BakOtherAddExtComboBox'#22'BorderSpacing.OnChange'#13#9'MaxLe'
+'ngth'#2#0#8'TabOrder'#2#1#4'Text'#6#22'BakOtherAddExtComboBox'#4'Left'#2#10
+#6'Height'#2#21#3'Top'#2'_'#5'Width'#2'd'#0#0#9'TComboBox'#26'BakOtherMaxCou'
+'nterComboBox'#9'MaxLength'#2#0#8'TabOrder'#2#2#4'Text'#6#26'BakOtherMaxCoun'
+'terComboBox'#4'Left'#2#10#6'Height'#2#21#3'Top'#2'z'#5'Width'#2'd'#0#0#9'TC'
+'omboBox'#22'BakOtherSubDirComboBox'#9'MaxLength'#2#0#8'TabOrder'#2#3#4'Text'
+#6#22'BakOtherSubDirComboBox'#4'Left'#2#10#6'Height'#2#21#3'Top'#3#149#0#5'W'
,'idth'#2'd'#0#0#0#0#5'TPage'#10'NamingPage'#7'Caption'#6#10'NamingPage'#11'C'
+'lientWidth'#3#134#2#12'ClientHeight'#3#222#1#4'Left'#2#2#6'Height'#3#222#1#3
+'Top'#2#28#5'Width'#3#134#2#0#11'TRadioGroup'#23'PascalFileExtRadiogroup'#7
+#7'akRight'#0#7'Caption'#6#16'LanguageGroupBox'#12'ClientHeight'#2'8'#11'Cli'
+'entWidth'#3'x'#2#11'ParentColor'#9#8'TabOrder'#2#0#4'Left'#2#4#6'Height'#2
+'8'#3'Top'#2#10#5'Width'#3'x'#2#0#9'TComboBox'#16'LanguageComboBox'#7'Anchor'
+'s'#11#5'akTop'#6'akLeft'#7'akRight'#0#9'MaxLength'#2#0#8'TabOrder'#2#0#4'Te'
+'xt'#6#16'LanguageComboBox'#4'Left'#2#6#6'Height'#2#21#3'Top'#2#8#5'Width'#3
+'d'#2#0#0#0#9'TCheckBox$ShowHintsForComponentPaletteCheckBox'#7'Caption'#6'$'
+'ShowHintsForComponentPaletteCheckBox'#8'TabOrder'#2#1#4'Left'#2#4#6'Height'
+#2#24#3'Top'#3'J'#1#5'Width'#3'x'#2#0#0#9'TGroupBox'#16'AutoSaveGroupBox'#7
+'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#16'AutoSaveGroupBo'
+'x'#12'ClientHeight'#3#136#0#11'ClientWidth'#3'x'#2#11'ParentColor'#9#8'TabO'
+'rder'#2#2#4'Left'#2#4#6'Height'#3#136#0#3'Top'#2'J'#5'Width'#3'x'#2#0#6'TLa'
+'bel'#27'AutoSaveIntervalInSecsLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akR'
+'ight'#0#7'Caption'#6#27'AutoSaveIntervalInSecsLabel'#5'Color'#7#6'clNone'#7
+'Enabled'#8#4'Left'#2#6#6'Height'#2#17#3'Top'#2'C'#5'Width'#3'\'#2#0#0#9'TCh'
+'eckBox'#27'AutoSaveEditorFilesCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7
+'akRight'#0#7'Caption'#6#27'AutoSaveEditorFilesCheckBox'#7'Enabled'#8#8'TabO'
+'rder'#2#0#4'Left'#2#6#6'Height'#2#24#3'Top'#2#4#5'Width'#3'd'#2#0#0#9'TChec'
+'kBox'#23'AutoSaveProjectCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRigh'
+'t'#0#7'Caption'#6#23'AutoSaveProjectCheckBox'#7'Enabled'#8#8'TabOrder'#2#1#4
+'Left'#2#6#6'Height'#2#24#3'Top'#2#30#5'Width'#3'd'#2#0#0#9'TComboBox'#30'Au'
+'toSaveIntervalInSecsComboBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
+#7'Enabled'#8#13'Items.Strings'#1#6#4'1200'#6#3'600'#6#3'300'#6#3'120'#0#9'M'
+'axLength'#2#0#8'TabOrder'#2#2#4'Left'#2#6#6'Height'#2#21#3'Top'#2'W'#5'Widt'
+'h'#3'd'#2#0#0#0#9'TGroupBox'#20'DesktopFilesGroupBox'#7'Anchors'#11#5'akTop'
+#6'akLeft'#7'akRight'#0#7'Caption'#6#20'DesktopFilesGroupBox'#12'ClientHeigh'
+'t'#2'a'#11'ClientWidth'#3'x'#2#11'ParentColor'#9#8'TabOrder'#2#3#4'Left'#2#4
+#6'Height'#2'a'#3'Top'#3#218#0#5'Width'#3'x'#2#0#7'TButton'#31'SaveDesktopSe'
+'ttingsToFileButton'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'
+#6#31'SaveDesktopSettingsToFileButton'#7'OnClick'#7'$SaveDesktopSettingsToFi'
+'leButtonClick'#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#2#25#3'Top'#2#8#5'Widt'
+'h'#3'd'#2#0#0#7'TButton!LoadDesktopSettingsFromFileButton'#7'Anchors'#11#5
+'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6'!LoadDesktopSettingsFromFileButt'
+'on'#7'OnEnter'#7'&LoadDesktopSettingsFromFileButtonClick'#8'TabOrder'#2#1#4
+'Left'#2#6#6'Height'#2#25#3'Top'#2'+'#5'Width'#3'd'#2#0#0#0#9'TCheckBox$Show'
+'HintsForMainSpeedButtonsCheckBox'#22'BorderSpacing.OnChange'#13#7'Caption'#6
+'$ShowHintsForMainSpeedButtonsCheckBox'#8'TabOrder'#2#4#4'Left'#2#4#6'Height'
+#2#24#3'Top'#3'b'#1#5'Width'#3'x'#2#0#0#9'TCheckBox'#28'MsgViewDblClickJumps'
+'CheckBox'#22'BorderSpacing.OnChange'#13#7'Caption'#6#28'MsgViewDblClickJump'
+'sCheckBox'#8'TabOrder'#2#5#4'Left'#2#4#6'Height'#2#24#3'Top'#3'z'#1#5'Width'
+#3'x'#2#0#0#0#5'TPage'#11'WindowsPage'#7'Caption'#6#11'WindowsPage'#11'Clien'
+'tWidth'#3#134#2#12'ClientHeight'#3#222#1#4'Left'#2#2#6'Height'#3#222#1#3'To'
+'p'#2#28#5'Width'#3#134#2#0#9'TCheckBox!MinimizeAllOnMinimizeMainCheckBox'#7
+'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7
+'Caption'#6#23'PascalFileExtRadiogroup'#7'Columns'#2#2#11'ParentColor'#9#4'L'
+'eft'#2#4#6'Height'#2'/'#3'Top'#2#10#5'Width'#3'|'#2#0#0#11'TRadioGroup'#28
+'CharcaseFileActionRadioGroup'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
+#22'BorderSpacing.OnChange'#13#7'Caption'#6#28'CharcaseFileActionRadioGroup'
+#7'Columns'#2#2#11'ParentColor'#9#4'Left'#2#4#6'Height'#2'U'#3'Top'#2'>'#5'W'
+'idth'#3'|'#2#0#0#11'TRadioGroup'#29'AmbiguousFileActionRadioGroup'#7'Anchor'
+'s'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Capti'
+'on'#6#29'AmbiguousFileActionRadioGroup'#7'Columns'#2#2#11'ParentColor'#9#4
+'Left'#2#3#6'Height'#2'd'#3'Top'#3#152#0#5'Width'#3'|'#2#0#0#0#5'TPage'#10'L'
+'azDocPage'#7'Caption'#6#10'LazDocPage'#11'ClientWidth'#3#134#2#12'ClientHei'
+'ght'#3#222#1#4'Left'#2#2#6'Height'#3#222#1#3'Top'#2#28#5'Width'#3#134#2#0#6
+'TLabel'#6'Label1'#7'Caption'#6'+NOTE: only absolute paths are supported now'
+#5'Color'#7#6'clNone'#4'Left'#2#8#6'Height'#2#17#3'Top'#3#226#0#5'Width'#3't'
+#2#0#0#9'TGroupBox'#19'LazDocPathsGroupBox'#5'Align'#7#5'alTop'#22'BorderSpa'
+'cing.OnChange'#13#20'BorderSpacing.Around'#2#6#7'Caption'#6#19'LazDocPathsG'
+'roupBox'#12'ClientHeight'#3#210#0#11'ClientWidth'#3'z'#2#11'ParentColor'#9#8
+'TabOrder'#2#0#4'Left'#2#6#6'Height'#3#210#0#3'Top'#2#6#5'Width'#3'z'#2#0#8
+'TListBox'#13'LazDocListBox'#5'Align'#7#5'alTop'#22'BorderSpacing.OnChange'
+#13#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#0#8'TopIndex'#2#255#4'Left'#2
+#6#6'Height'#2'l'#3'Top'#2#6#5'Width'#3'n'#2#0#0#7'TButton'#19'LazDocAddPath'
+'Button'#22'BorderSpacing.OnChange'#13#7'Caption'#6#19'LazDocAddPathButton'#7
+'OnClick'#7#24'LazDocAddPathButtonClick'#8'TabOrder'#2#1#4'Left'#2#6#6'Heigh'
+'t'#2#25#3'Top'#2'z'#5'Width'#2'K'#0#0#7'TButton'#22'LazDocDeletePathButton'
+#22'BorderSpacing.OnChange'#13#7'Caption'#6#22'LazDocDeletePathButton'#7'OnC'
+'lick'#7#27'LazDocDeletePathButtonClick'#8'TabOrder'#2#2#4'Left'#2'Z'#6'Heig'
+'ht'#2#25#3'Top'#2'z'#5'Width'#2'K'#0#0#5'TEdit'#14'LazDocPathEdit'#7'Anchor'
+'s'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#8'TabOr'
+'der'#2#3#4'Text'#6#14'LazDocPathEdit'#4'Left'#2#6#6'Height'#2#23#3'Top'#3
+#154#0#5'Width'#3'N'#2#0#0#7'TButton'#18'LazDocBrowseButton'#7'Anchors'#11#5
+'akTop'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#3'...'#7'OnC'
+'lick'#7#23'LazDocBrowseButtonClick'#8'TabOrder'#2#4#4'Left'#3'Y'#2#6'Height'
+#2#23#3'Top'#3#154#0#5'Width'#2#23#0#0#0#0#0#7'TButton'#12'CancelButton'#7'A'
+'nchors'#11#7'akRight'#8'akBottom'#0#22'BorderSpacing.OnChange'#13#7'Caption'
+#6#12'CancelButton'#7'OnClick'#7#17'CancelButtonClick'#8'TabOrder'#2#1#4'Lef'
+'t'#3'7'#2#6'Height'#2#25#3'Top'#3#4#2#5'Width'#2'K'#0#0#7'TButton'#8'OkButt'
+'on'#7'Anchors'#11#7'akRight'#8'akBottom'#0#7'Caption'#6#2'Ok'#7'OnClick'#7
+#13'OkButtonClick'#8'TabOrder'#2#2#4'Left'#3#229#1#6'Height'#2#25#3'Top'#3#4
+#2#5'Width'#2'K'#0#0#22'TSelectDirectoryDialog'#21'SelectDirectoryDialog'#5
+'Title'#6#16'Select Directory'#11'FilterIndex'#2#0#5'Title'#6#16'Select Dire'
+'ctory'#4'left'#3#0#2#3'top'#2#8#0#0#0
+'Caption'#6'!MinimizeAllOnMinimizeMainCheckBox'#7'Enabled'#8#8'TabOrder'#2#0
+#4'Left'#2#4#6'Height'#2#24#3'Top'#2#10#5'Width'#3'|'#2#0#0#9'TCheckBox'#20
+'HideIDEOnRunCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'Bord'
+'erSpacing.OnChange'#13#7'Caption'#6#20'HideIDEOnRunCheckBox'#8'TabOrder'#2#1
+#4'Left'#2#4#6'Height'#2#24#3'Top'#2'"'#5'Width'#3'|'#2#0#0#9'TGroupBox'#23
+'WindowPositionsGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBo'
+'ttom'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#23'WindowPositionsGroupB'
+'ox'#12'ClientHeight'#3#143#1#11'ClientWidth'#3'|'#2#11'ParentColor'#9#8'Tab'
+'Order'#2#2#4'Left'#2#4#6'Height'#3#143#1#3'Top'#2'D'#5'Width'#3'|'#2#0#8'TL'
,'istBox'#22'WindowPositionsListBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRig'
+'ht'#0#22'BorderSpacing.OnChange'#13#9'OnMouseUp'#7#29'WindowPositionsListBo'
+'xMouseUp'#8'TabOrder'#2#0#8'TopIndex'#2#255#4'Left'#2#6#6'Height'#2'd'#3'To'
+'p'#2#6#5'Width'#3'l'#2#0#0#0#0#5'TPage'#14'FormEditorPage'#7'Caption'#6#14
+'FormEditorPage'#11'ClientWidth'#3#134#2#12'ClientHeight'#3#222#1#8'OnResize'
+#7#20'FormEditorPageResize'#4'Left'#2#2#6'Height'#3#222#1#3'Top'#2#28#5'Widt'
+'h'#3#134#2#0#9'TGroupBox'#12'GridGroupBox'#5'Align'#7#5'alTop'#20'BorderSpa'
+'cing.Around'#2#6#7'Caption'#6#12'GridGroupBox'#12'ClientHeight'#2'q'#11'Cli'
+'entWidth'#3'v'#2#11'ParentColor'#9#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#3
+#130#0#3'Top'#2#6#5'Width'#3'z'#2#0#6'TLabel'#14'GridColorLabel'#7'Caption'#6
+#14'GridColorLabel'#5'Color'#7#6'clNone'#4'Left'#3'"'#1#6'Height'#2#17#3'Top'
+#2#6#5'Width'#3#145#0#0#0#6'TLabel'#14'GridSizeXLabel'#7'Anchors'#11#5'akTop'
+#6'akLeft'#7'akRight'#0#7'Caption'#6#14'GridSizeXLabel'#5'Color'#7#6'clNone'
+#4'Left'#2'u'#6'Height'#2#17#3'Top'#2'<'#5'Width'#3#247#1#0#0#6'TLabel'#14'G'
+'ridSizeYLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#14
+'GridSizeYLabel'#5'Color'#7#6'clNone'#4'Left'#2'u'#6'Height'#2#17#3'Top'#2'T'
+#5'Width'#3#247#1#0#0#12'TColorButton'#15'GridColorButton'#11'BorderWidth'#2
+#2#4'Left'#3#230#0#6'Height'#2#23#5'Width'#2'2'#0#0#9'TCheckBox'#18'SnapToGr'
+'idCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#18'S'
+'napToGridCheckBox'#8'TabOrder'#2#1#4'Left'#2#6#6'Height'#2#24#3'Top'#2#26#5
+'Width'#3'f'#2#0#0#9'TCheckBox'#16'ShowGridCheckBox'#7'Caption'#6#16'ShowGri'
+'dCheckBox'#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#2#24#5'Width'#3#138#0#0#0#9
+'TComboBox'#17'GridSizeXComboBox'#13'Items.Strings'#1#6#1'2'#6#1'5'#6#1'8'#6
+#2'10'#6#2'12'#6#2'15'#6#2'20'#6#2'25'#6#2'30'#0#9'MaxLength'#2#0#14'ParentS'
+'howHint'#8#8'ShowHint'#9#8'TabOrder'#2#2#4'Left'#2#6#6'Height'#2#21#3'Top'#2
+':'#5'Width'#2'd'#0#0#9'TComboBox'#17'GridSizeYComboBox'#13'Items.Strings'#1
+#6#1'2'#6#1'5'#6#1'8'#6#2'10'#6#2'12'#6#2'15'#6#2'20'#6#2'25'#6#2'30'#0#9'Ma'
+'xLength'#2#0#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#3#4'Left'#2#6
+#6'Height'#2#21#3'Top'#2'R'#5'Width'#2'd'#0#0#0#9'TGroupBox'#18'GuideLinesGr'
+'oupBox'#5'Align'#7#6'alLeft'#7'Anchors'#11#5'akTop'#6'akLeft'#0#20'BorderSp'
+'acing.Around'#2#6#7'Caption'#6#18'GuideLinesGroupBox'#12'ClientHeight'#3'9'
+#1#11'ClientWidth'#3#202#0#11'ParentColor'#9#8'TabOrder'#2#1#4'Left'#3#222#0
+#6'Height'#3'J'#1#3'Top'#3#142#0#5'Width'#3#206#0#0#12'TColorButton'#27'Guid'
+'eLineColorLeftTopButton'#11'BorderWidth'#2#2#4'Left'#2#6#6'Height'#2#23#3'T'
+'op'#2'F'#5'Width'#2'2'#0#0#12'TColorButton'#31'GuideLineColorRightBottomBut'
+'ton'#11'BorderWidth'#2#2#4'Left'#2#6#6'Height'#2#23#3'Top'#2'v'#5'Width'#2
+'2'#0#0#6'TLabel'#26'GuideLineColorLeftTopLabel'#7'Anchors'#11#5'akTop'#6'ak'
+'Left'#7'akRight'#0#7'Caption'#6#26'GuideLineColorLeftTopLabel'#5'Color'#7#6
+'clNone'#4'Left'#2#6#6'Height'#2#17#3'Top'#2'9'#5'Width'#3#188#0#0#0#6'TLabe'
+'l'#30'GuideLineColorRightBottomLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'ak'
+'Right'#0#7'Caption'#6#30'GuideLineColorRightBottomLabel'#5'Color'#7#6'clNon'
+'e'#4'Left'#2#6#6'Height'#2#17#3'Top'#2'f'#5'Width'#3#188#0#0#0#9'TCheckBox'
+#22'ShowGuideLinesCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7
+'Caption'#6#22'ShowGuideLinesCheckBox'#8'TabOrder'#2#0#4'Left'#2#6#6'Height'
+#2#24#5'Width'#3#188#0#0#0#9'TCheckBox'#24'SnapToGuideLinesCheckBox'#7'Ancho'
+'rs'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#24'SnapToGuideLinesChec'
+'kBox'#8'TabOrder'#2#1#4'Left'#2#6#6'Height'#2#24#3'Top'#2#19#5'Width'#3#188
+#0#0#0#0#9'TGroupBox'#20'FormEditMiscGroupBox'#5'Align'#7#6'alLeft'#7'Anchor'
+'s'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#20'Bord'
+'erSpacing.Around'#2#6#7'Caption'#6#20'FormEditMiscGroupBox'#12'ClientHeight'
+#3'9'#1#11'ClientWidth'#3#202#0#11'ParentColor'#9#8'TabOrder'#2#2#23'AnchorS'
+'ideRight.Control'#7#14'FormEditorPage'#20'AnchorSideRight.Side'#7#9'asrBott'
+'om'#4'Left'#3#178#1#6'Height'#3'J'#1#3'Top'#3#142#0#5'Width'#3#206#0#0#12'T'
+'ColorButton'#18'GrabberColorButton'#22'BorderSpacing.OnChange'#13#11'Border'
+'Width'#2#2#4'Left'#2#6#6'Height'#2#23#3'Top'#2'f'#5'Width'#2'2'#0#0#12'TCol'
+'orButton'#17'MarkerColorButton'#22'BorderSpacing.OnChange'#13#11'BorderWidt'
+'h'#2#2#4'Left'#2#6#6'Height'#2#23#3'Top'#3#150#0#5'Width'#2'2'#0#0#6'TLabel'
+#17'GrabberColorLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'Bord'
+'erSpacing.OnChange'#13#7'Caption'#6#17'GrabberColorLabel'#5'Color'#7#6'clNo'
+'ne'#4'Left'#2#6#6'Height'#2#14#3'Top'#2'Y'#5'Width'#3#186#0#0#0#6'TLabel'#16
+'MarkerColorLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSp'
+'acing.OnChange'#13#7'Caption'#6#16'MarkerColorLabel'#5'Color'#7#6'clNone'#4
+'Left'#2#6#6'Height'#2#14#3'Top'#3#134#0#5'Width'#3#186#0#0#0#9'TCheckBox'#29
+'ShowComponentCaptionsCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
,#22'BorderSpacing.OnChange'#13#7'Caption'#6#29'ShowComponentCaptionsCheckBox'
+#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#2#24#5'Width'#3#186#0#0#0#9'TCheckBox'
+#23'ShowEditorHintsCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22
+'BorderSpacing.OnChange'#13#7'Caption'#6#23'ShowEditorHintsCheckBox'#8'TabOr'
+'der'#2#1#4'Left'#2#6#6'Height'#2#24#3'Top'#2#19#5'Width'#3#186#0#0#0#9'TChe'
+'ckBox'#29'AutoCreateFormsOnOpenCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7
+'akRight'#0#7'Caption'#6#29'AutoCreateFormsOnOpenCheckBox'#8'TabOrder'#2#2#4
+'Left'#2#6#6'Height'#2#24#3'Top'#2'&'#5'Width'#3#186#0#0#0#9'TCheckBox'#25'R'
+'ightClickSelectsCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'C'
+'aption'#6#25'RightClickSelectsCheckBox'#8'TabOrder'#2#3#4'Left'#2#6#6'Heigh'
+'t'#2#24#3'Top'#2'9'#5'Width'#3#186#0#0#0#9'TCheckBox'#25'DesignerPaintLazyC'
+'heckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnC'
+'hange'#13#7'Caption'#6#25'DesignerPaintLazyCheckBox'#14'ParentShowHint'#8#8
+'ShowHint'#9#8'TabOrder'#2#4#4'Left'#2#6#6'Height'#2#24#3'Top'#3#182#0#5'Wid'
+'th'#3#186#0#0#0#0#9'TGroupBox'#18'RubberbandGroupBox'#5'Align'#7#6'alLeft'#7
+'Anchors'#11#5'akTop'#6'akLeft'#0#22'BorderSpacing.OnChange'#13#20'BorderSpa'
+'cing.Around'#2#6#7'Caption'#6#18'RubberbandGroupBox'#12'ClientHeight'#3'9'#1
+#11'ClientWidth'#3#206#0#11'ParentColor'#9#8'TabOrder'#2#3#4'Left'#2#6#6'Hei'
+'ght'#3'J'#1#3'Top'#3#142#0#5'Width'#3#210#0#0#12'TColorButton'#27'Rubberban'
+'dSelectColorButton'#22'BorderSpacing.OnChange'#13#11'BorderWidth'#2#2#4'Lef'
+'t'#2#6#6'Height'#2#23#3'Top'#2#19#5'Width'#2'2'#0#0#12'TColorButton'#27'Rub'
+'berbandCreateColorButton'#22'BorderSpacing.OnChange'#13#11'BorderWidth'#2#2
+#4'Left'#2#6#6'Height'#2#23#3'Top'#2'F'#5'Width'#2'2'#0#0#6'TLabel'#26'Rubbe'
+'rbandSelectColorLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'Bor'
+'derSpacing.OnChange'#13#7'Caption'#6#26'RubberbandSelectColorLabel'#5'Color'
+#7#6'clNone'#4'Left'#2#6#6'Height'#2#17#3'Top'#2#3#5'Width'#3#184#0#0#0#6'TL'
+'abel'#26'RubberbandCreateColorLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akR'
+'ight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#26'RubberbandCreateColor'
+'Label'#5'Color'#7#6'clNone'#4'Left'#2#6#6'Height'#2#17#3'Top'#2'6'#5'Width'
+#3#184#0#0#0#9'TCheckBox$RubberbandSelectsGrandChildsCheckBox'#7'Anchors'#11
+#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6'$RubberbandSelectsGrandChildsC'
+'heckBox'#8'TabOrder'#2#0#6'Height'#2#24#3'Top'#2'f'#5'Width'#3#190#0#0#0#0#0
+#5'TPage'#19'ObjectInspectorPage'#7'Caption'#6#19'ObjectInspectorPage'#11'Cl'
+'ientWidth'#3#134#2#12'ClientHeight'#3#222#1#4'Left'#2#2#6'Height'#3#222#1#3
+'Top'#2#28#5'Width'#3#134#2#0#9'TGroupBox'#29'ObjectInspectorColorsGroupBox'
+#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13
+#7'Caption'#6#29'ObjectInspectorColorsGroupBox'#12'ClientHeight'#3#173#0#11
+'ClientWidth'#3'{'#2#11'ParentColor'#9#8'TabOrder'#2#0#4'Left'#2#5#6'Height'
+#3#173#0#3'Top'#2#7#5'Width'#3'{'#2#0#12'TColorButton'#23'OIBackgroundColorB'
+'utton'#22'BorderSpacing.OnChange'#13#11'BorderWidth'#2#2#4'Left'#2#6#6'Heig'
+'ht'#2#23#3'Top'#2#5#5'Width'#2'2'#0#0#12'TColorButton'#21'OISubPropsColorBu'
+'tton'#22'BorderSpacing.OnChange'#13#11'BorderWidth'#2#2#4'Left'#2#6#6'Heigh'
+'t'#2#23#3'Top'#2#29#5'Width'#2'2'#0#0#12'TColorButton'#23'OIReferencesColor'
+'Button'#22'BorderSpacing.OnChange'#13#11'BorderWidth'#2#2#4'Left'#2#6#6'Hei'
+'ght'#2#23#3'Top'#2'5'#5'Width'#2'2'#0#0#12'TColorButton'#18'OIValueColorBut'
+'ton'#22'BorderSpacing.OnChange'#13#11'BorderWidth'#2#2#4'Left'#2#6#6'Height'
+#2#23#3'Top'#2'M'#5'Width'#2'2'#0#0#12'TColorButton'#25'OIDefaultValueColorB'
+'utton'#22'BorderSpacing.OnChange'#13#11'BorderWidth'#2#2#4'Left'#2#6#6'Heig'
+'ht'#2#23#3'Top'#2'e'#5'Width'#2'2'#0#0#12'TColorButton'#21'OIPropNameColorB'
+'utton'#22'BorderSpacing.OnChange'#13#11'BorderWidth'#2#2#4'Left'#2#6#6'Heig'
+'ht'#2#23#3'Top'#2'}'#5'Width'#2'2'#0#0#6'TLabel'#22'OIBackgroundColorLabel'
+#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13
+#7'Caption'#6#22'OIBackgroundColorLabel'#5'Color'#7#6'clNone'#4'Left'#2'A'#6
+'Height'#2#17#3'Top'#2#11#5'Width'#3'$'#2#0#0#6'TLabel'#20'OISubPropsColorLa'
+'bel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChang'
+'e'#13#7'Caption'#6#20'OISubPropsColorLabel'#5'Color'#7#6'clNone'#4'Left'#2
+'A'#6'Height'#2#17#3'Top'#2'#'#5'Width'#3'$'#2#0#0#6'TLabel'#22'OIReferences'
+'ColorLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.'
+'OnChange'#13#7'Caption'#6#22'OIReferencesColorLabel'#5'Color'#7#6'clNone'#4
+'Left'#2'A'#6'Height'#2#17#3'Top'#2';'#5'Width'#3'$'#2#0#0#6'TLabel'#17'OIVa'
+'lueColorLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpaci'
+'ng.OnChange'#13#7'Caption'#6#17'OIValueColorLabel'#5'Color'#7#6'clNone'#4'L'
+'eft'#2'A'#6'Height'#2#17#3'Top'#2'S'#5'Width'#3'$'#2#0#0#6'TLabel'#24'OIDef'
+'aultValueColorLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'Borde'
,'rSpacing.OnChange'#13#7'Caption'#6#24'OIDefaultValueColorLabel'#5'Color'#7#6
+'clNone'#4'Left'#2'A'#6'Height'#2#17#3'Top'#2'k'#5'Width'#3'$'#2#0#0#6'TLabe'
+'l'#20'OIPropNameColorLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22
+'BorderSpacing.OnChange'#13#7'Caption'#6#20'OIPropNameColorLabel'#5'Color'#7
+#6'clNone'#4'Left'#2'A'#6'Height'#2#17#3'Top'#3#131#0#5'Width'#3'$'#2#0#0#0#9
+'TGroupBox'#14'OIMiscGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
+#22'BorderSpacing.OnChange'#13#7'Caption'#6#14'OIMiscGroupBox'#12'ClientHeig'
+'ht'#2'i'#11'ClientWidth'#3'{'#2#11'ParentColor'#9#8'TabOrder'#2#1#4'Left'#2
+#5#6'Height'#2'i'#3'Top'#3#186#0#5'Width'#3'{'#2#0#6'TLabel'#24'OIDefaultIte'
+'mHeightLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacin'
+'g.OnChange'#13#7'Caption'#6#24'OIDefaultItemHeightLabel'#5'Color'#7#6'clNon'
+'e'#4'Left'#2#6#6'Height'#2#17#3'Top'#2#6#5'Width'#3'_'#2#0#0#9'TCheckBox'#18
+'OIShowHintCheckBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'Border'
+'Spacing.OnChange'#13#7'Caption'#6#18'OIShowHintCheckBox'#8'TabOrder'#2#0#4
+'Left'#2#6#6'Height'#2#24#3'Top'#2'7'#5'Width'#3'_'#2#0#0#9'TSpinEdit'#27'OI'
+'DefaultItemHeightSpinEdit'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22
+'BorderSpacing.OnChange'#13#9'ClimbRate'#2#1#8'MaxValue'#2'd'#8'TabOrder'#2#1
+#4'Left'#2#6#6'Height'#2#20#3'Top'#2#24#5'Width'#3'e'#2#0#0#0#0#5'TPage'#10
+'BackupPage'#7'Caption'#6#10'BackupPage'#11'ClientWidth'#3#134#2#12'ClientHe'
+'ight'#3#222#1#4'Left'#2#2#6'Height'#3#222#1#3'Top'#2#28#5'Width'#3#134#2#0#6
+'TLabel'#15'BackupHelpLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22
+'BorderSpacing.OnChange'#13#7'Caption'#6#15'BackupHelpLabel'#5'Color'#7#6'cl'
+'None'#4'Left'#2#4#6'Height'#2#17#3'Top'#2#7#5'Width'#3'x'#2#0#0#9'TGroupBox'
+#21'BackupProjectGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22
+'BorderSpacing.OnChange'#13#7'Caption'#6#21'BackupProjectGroupBox'#12'Client'
+'Height'#3#201#0#11'ClientWidth'#3'x'#2#11'ParentColor'#9#8'TabOrder'#2#0#4
+'Left'#2#4#6'Height'#3#201#0#3'Top'#2'"'#5'Width'#3'x'#2#0#6'TLabel'#18'BakP'
+'rojAddExtLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpac'
+'ing.OnChange'#13#7'Caption'#6#18'BakProjAddExtLabel'#5'Color'#7#6'clNone'#4
+'Left'#2'u'#6'Height'#2#17#3'Top'#2'd'#5'Width'#3#245#1#0#0#6'TLabel'#22'Bak'
+'ProjMaxCounterLabel'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Captio'
+'n'#6#22'BakProjMaxCounterLabel'#5'Color'#7#6'clNone'#4'Left'#2'v'#6'Height'
+#2#17#3'Top'#2'}'#5'Width'#3#244#1#0#0#6'TLabel'#18'BakProjSubDirLabel'#7'An'
+'chors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#18'BakProjSubDirLabe'
+'l'#5'Color'#7#6'clNone'#4'Left'#2'u'#6'Height'#2#17#3'Top'#3#154#0#5'Width'
+#3#245#1#0#0#11'TRadioGroup'#21'BakProjTypeRadioGroup'#7'Anchors'#11#5'akTop'
+#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#21'BakPro'
+'jTypeRadioGroup'#7'Columns'#2#2#7'OnClick'#7#22'BakTypeRadioGroupClick'#11
+'ParentColor'#9#4'Left'#2#6#6'Height'#2'X'#5'Width'#3'd'#2#0#0#9'TComboBox'
+#21'BakProjAddExtComboBox'#22'BorderSpacing.OnChange'#13#9'MaxLength'#2#0#8
+'TabOrder'#2#1#4'Text'#6#21'BakProjAddExtComboBox'#4'Left'#2#10#6'Height'#2
+#21#3'Top'#2'b'#5'Width'#2'd'#0#0#9'TComboBox'#25'BakProjMaxCounterComboBox'
+#9'MaxLength'#2#0#8'TabOrder'#2#2#4'Text'#6#25'BakProjMaxCounterComboBox'#4
+'Left'#2#10#6'Height'#2#21#3'Top'#2'}'#5'Width'#2'd'#0#0#9'TComboBox'#21'Bak'
+'ProjSubDirComboBox'#9'MaxLength'#2#0#8'TabOrder'#2#3#4'Text'#6#21'BakProjSu'
+'bDirComboBox'#4'Left'#2#10#6'Height'#2#21#3'Top'#3#152#0#5'Width'#2'd'#0#0#0
+#9'TGroupBox'#19'BackupOtherGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akR'
+'ight'#0#7'Caption'#6#19'BackupOtherGroupBox'#12'ClientHeight'#3#196#0#11'Cl'
+'ientWidth'#3'x'#2#11'ParentColor'#9#8'TabOrder'#2#1#4'Left'#2#4#6'Height'#3
+#196#0#3'Top'#3#242#0#5'Width'#3'x'#2#0#6'TLabel'#19'BakOtherAddExtLabel'#7
+'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#19'BakOtherAddExtL'
+'abel'#5'Color'#7#6'clNone'#4'Left'#2'u'#6'Height'#2#17#3'Top'#2'a'#5'Width'
+#3#245#1#0#0#6'TLabel'#23'BakOtherMaxCounterLabel'#7'Anchors'#11#5'akTop'#6
+'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#23'BakOther'
+'MaxCounterLabel'#5'Color'#7#6'clNone'#4'Left'#2'u'#6'Height'#2#17#3'Top'#2
+'|'#5'Width'#3#245#1#0#0#6'TLabel'#19'BakOtherSubDirLabel'#7'Anchors'#11#5'a'
+'kTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#19
+'BakOtherSubDirLabel'#5'Color'#7#6'clNone'#4'Left'#2'u'#6'Height'#2#17#3'Top'
+#3#151#0#5'Width'#3#245#1#0#0#11'TRadioGroup'#22'BakOtherTypeRadioGroup'#7'A'
+'nchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#22'BakOtherTypeRadi'
+'oGroup'#7'Columns'#2#2#7'OnClick'#7#22'BakTypeRadioGroupClick'#11'ParentCol'
+'or'#9#4'Left'#2#6#6'Height'#2'T'#5'Width'#3'd'#2#0#0#9'TComboBox'#22'BakOth'
+'erAddExtComboBox'#9'MaxLength'#2#0#8'TabOrder'#2#1#4'Text'#6#22'BakOtherAdd'
+'ExtComboBox'#4'Left'#2#10#6'Height'#2#21#3'Top'#2'_'#5'Width'#2'd'#0#0#9'TC'
,'omboBox'#26'BakOtherMaxCounterComboBox'#22'BorderSpacing.OnChange'#13#9'Max'
+'Length'#2#0#8'TabOrder'#2#2#4'Text'#6#26'BakOtherMaxCounterComboBox'#4'Left'
+#2#10#6'Height'#2#21#3'Top'#2'z'#5'Width'#2'd'#0#0#9'TComboBox'#22'BakOtherS'
+'ubDirComboBox'#22'BorderSpacing.OnChange'#13#9'MaxLength'#2#0#8'TabOrder'#2
+#3#4'Text'#6#22'BakOtherSubDirComboBox'#4'Left'#2#10#6'Height'#2#21#3'Top'#3
+#149#0#5'Width'#2'd'#0#0#0#0#5'TPage'#10'NamingPage'#7'Caption'#6#10'NamingP'
+'age'#11'ClientWidth'#3#134#2#12'ClientHeight'#3#222#1#4'Left'#2#2#6'Height'
+#3#222#1#3'Top'#2#28#5'Width'#3#134#2#0#11'TRadioGroup'#23'PascalFileExtRadi'
+'ogroup'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#23'Pasca'
+'lFileExtRadiogroup'#7'Columns'#2#2#11'ParentColor'#9#4'Left'#2#4#6'Height'#2
+'/'#3'Top'#2#10#5'Width'#3'|'#2#0#0#11'TRadioGroup'#28'CharcaseFileActionRad'
+'ioGroup'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#28'Char'
+'caseFileActionRadioGroup'#7'Columns'#2#2#11'ParentColor'#9#4'Left'#2#4#6'He'
+'ight'#2'U'#3'Top'#2'>'#5'Width'#3'|'#2#0#0#11'TRadioGroup'#29'AmbiguousFile'
+'ActionRadioGroup'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6
+#29'AmbiguousFileActionRadioGroup'#7'Columns'#2#2#11'ParentColor'#9#4'Left'#2
+#3#6'Height'#2'd'#3'Top'#3#152#0#5'Width'#3'|'#2#0#0#0#5'TPage'#10'LazDocPag'
+'e'#7'Caption'#6#10'LazDocPage'#11'ClientWidth'#3#134#2#12'ClientHeight'#3
+#222#1#4'Left'#2#2#6'Height'#3#222#1#3'Top'#2#28#5'Width'#3#134#2#0#6'TLabel'
+#6'Label1'#22'BorderSpacing.OnChange'#13#7'Caption'#6'+NOTE: only absolute p'
+'aths are supported now'#5'Color'#7#6'clNone'#4'Left'#2#8#6'Height'#2#17#3'T'
+'op'#3#226#0#5'Width'#3't'#2#0#0#9'TGroupBox'#19'LazDocPathsGroupBox'#5'Alig'
+'n'#7#5'alTop'#20'BorderSpacing.Around'#2#6#7'Caption'#6#19'LazDocPathsGroup'
+'Box'#12'ClientHeight'#3#210#0#11'ClientWidth'#3'z'#2#11'ParentColor'#9#8'Ta'
+'bOrder'#2#0#4'Left'#2#6#6'Height'#3#210#0#3'Top'#2#6#5'Width'#3'z'#2#0#8'TL'
+'istBox'#13'LazDocListBox'#5'Align'#7#5'alTop'#20'BorderSpacing.Around'#2#6#8
+'TabOrder'#2#0#8'TopIndex'#2#255#4'Left'#2#6#6'Height'#2'l'#3'Top'#2#6#5'Wid'
+'th'#3'n'#2#0#0#7'TButton'#19'LazDocAddPathButton'#7'Caption'#6#19'LazDocAdd'
+'PathButton'#7'OnClick'#7#24'LazDocAddPathButtonClick'#8'TabOrder'#2#1#4'Lef'
+'t'#2#6#6'Height'#2#25#3'Top'#2'z'#5'Width'#2'K'#0#0#7'TButton'#22'LazDocDel'
+'etePathButton'#7'Caption'#6#22'LazDocDeletePathButton'#7'OnClick'#7#27'LazD'
+'ocDeletePathButtonClick'#8'TabOrder'#2#2#4'Left'#2'Z'#6'Height'#2#25#3'Top'
+#2'z'#5'Width'#2'K'#0#0#5'TEdit'#14'LazDocPathEdit'#7'Anchors'#11#5'akTop'#6
+'akLeft'#7'akRight'#0#8'TabOrder'#2#3#4'Text'#6#14'LazDocPathEdit'#4'Left'#2
+#6#6'Height'#2#23#3'Top'#3#154#0#5'Width'#3'N'#2#0#0#7'TButton'#18'LazDocBro'
+'wseButton'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#3'...'#7'OnClic'
+'k'#7#23'LazDocBrowseButtonClick'#8'TabOrder'#2#4#4'Left'#3'Y'#2#6'Height'#2
+#23#3'Top'#3#154#0#5'Width'#2#23#0#0#0#0#0#7'TButton'#12'CancelButton'#7'Anc'
+'hors'#11#7'akRight'#8'akBottom'#0#7'Caption'#6#12'CancelButton'#7'OnClick'#7
+#17'CancelButtonClick'#8'TabOrder'#2#1#4'Left'#3'7'#2#6'Height'#2#25#3'Top'#3
+#4#2#5'Width'#2'K'#0#0#7'TButton'#8'OkButton'#7'Anchors'#11#7'akRight'#8'akB'
+'ottom'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#2'Ok'#7'OnClick'#7#13'O'
+'kButtonClick'#8'TabOrder'#2#2#4'Left'#3#229#1#6'Height'#2#25#3'Top'#3#4#2#5
+'Width'#2'K'#0#0#22'TSelectDirectoryDialog'#21'SelectDirectoryDialog'#5'Titl'
+'e'#6#16'Select Directory'#11'FilterIndex'#2#0#5'Title'#6#16'Select Director'
+'y'#4'left'#3#0#2#3'top'#2#8#0#0#0
]);

142
images/components/tfloatspinedit.xpm Normal file
View File

@ -0,0 +1,142 @@
/* XPM */
static char * tfloatspinedit_xpm[] = {
"23 16 123 2",
" c None",
". c #929292",
"+ c #747474",
"@ c #818181",
"# c #7C7C7C",
"$ c #7D7D7D",
"% c #777777",
"& c #7E7E7E",
"* c #878787",
"= c #888888",
"- c #7A7A7A",
"; c #858585",
"> c #7B7B7B",
", c #8A8A8A",
"' c #868686",
") c #787878",
"! c #727272",
"~ c #0B0B0B",
"{ c #000000",
"] c #030303",
"^ c #050505",
"/ c #0A0A0A",
"( c #040404",
"_ c #FFFFFF",
": c #F9F9F9",
"< c #FCFCFC",
"[ c #FDFDFD",
"} c #BEBEBE",
"| c #FFFDFF",
"1 c #FEFCFF",
"2 c #FEFEFF",
"3 c #010000",
"4 c #020202",
"5 c #C2C2C2",
"6 c #020003",
"7 c #FFFAFF",
"8 c #FCFDFF",
"9 c #FAFBF3",
"0 c #FFFFFA",
"a c #FFFEFF",
"b c #010103",
"c c #FFFFFD",
"d c #F8BDBD",
"e c #EF6464",
"f c #E81F1F",
"g c #F06E6E",
"h c #FEFFFF",
"i c #EB3E3E",
"j c #FCE3E3",
"k c #FCE2E2",
"l c #EB4040",
"m c #FDF0F0",
"n c #000105",
"o c #FCFFFF",
"p c #E82020",
"q c #FEFDFD",
"r c #FEFCFC",
"s c #E82121",
"t c #F6A9A9",
"u c #F07070",
"v c #F17B7B",
"w c #000103",
"x c #FBFFFF",
"y c #FCE4E4",
"z c #EB3F3F",
"A c #FDF4F4",
"B c #E82525",
"C c #F8FAFF",
"D c #FBFEFF",
"E c #F3BBBC",
"F c #EF6363",
"G c #EF6666",
"H c #E92F2F",
"I c #F17D7D",
"J c #EF6767",
"K c #F38F8F",
"L c #000201",
"M c #FEFFFD",
"N c #050503",
"O c #FEFFFB",
"P c #F9FBFF",
"Q c #FBFCFF",
"R c #C5C5C5",
"S c #F8F8F8",
"T c #8D8D8D",
"U c #FDFEF9",
"V c #FCFEF9",
"W c #FDFDFB",
"X c #FCFEFB",
"Y c #FCFFF2",
"Z c #FCFFF6",
"` c #FEFFF4",
" . c #FFFFF3",
".. c #FEFFF5",
"+. c #FFFFFB",
"@. c #BCBCBC",
"#. c #C2C2C0",
"$. c #C3C0C7",
"%. c #C2C1C6",
"&. c #C2C0CB",
"*. c #C2BFD0",
"=. c #C3C1CE",
"-. c #BEBFBA",
";. c #C9CBC0",
">. c #BBBCB7",
",. c #BEBEBC",
"'. c #B9B8B4",
"). c #C2C3BE",
"!. c #B7B7B5",
"~. c #CACACA",
"{. c #B5B5B5",
"]. c #BBBBBB",
"^. c #FAFAFC",
"/. c #FDFAFF",
"(. c #FDFBFF",
"_. c #FDFCFA",
":. c #FDFBFC",
"<. c #FDF9FF",
"[. c #FCF8FF",
"}. c #FEFDF9",
"|. c #F8F8F0",
"1. c #FFFEFC",
"2. c #FAF7FE",
". + @ @ @ @ @ @ @ @ # # $ % & * = - ; > , ' ) ",
"! ~ { { { { { { { { ] ^ { / { { { ] { ( { { _ ",
"@ { _ _ _ _ _ _ _ _ _ : _ < _ < _ [ < _ _ } _ ",
"@ { | _ _ _ _ _ _ _ _ 1 2 { { { 3 { 4 { [ 5 _ ",
"& 6 7 _ _ _ _ _ _ _ _ _ 8 { 9 0 { 8 a { _ 5 _ ",
"& b | _ _ _ _ _ _ _ _ _ _ { c { { { a { _ 5 _ ",
"& b a d e e d _ _ f g g _ { _ h a 8 _ { _ 5 _ ",
"& b _ i j k l _ _ f m _ _ { { { { { { { _ 5 _ ",
"& n o p q r s _ _ t u v _ { { { { { { { _ 5 _ ",
"& w x i y j z _ _ _ A B _ { _ C _ 8 h { _ 5 _ ",
"& w D E F G d H _ I J K _ { _ { { { h { 8 5 _ ",
"& L o _ _ _ _ _ _ _ _ _ _ { _ D { 8 M { _ 5 _ ",
"+ N O o o 8 _ _ x x P Q _ { { { { { { { [ R S ",
"T { U V W _ 8 X Y _ _ _ _ Z ` Y ...+.S _ @._ ",
", { #.5 $.%.#.#.%.&.*.=.-.;.>.,.'.).!.~.{.]._ ",
"# ^./././.(._.:./.<.[./.}.|.1.a | 2._ _ _ _ [ "};

52
images/components_images.lrs
View File

@ -1431,6 +1431,58 @@ LazarusResources.Add('tfilenameedit','XPM',[
+'oo#$ $$$$ ",'#10'"oooooo#$$$$$$$$$$$$$$$ ",'#10'"oooooo# '
+' "'#10'};'#10
]);
LazarusResources.Add('tfloatspinedit','XPM',[
'/* XPM */'#10'static char * tfloatspinedit_xpm[] = {'#10'"23 16 123 2",'#10
+'" '#9'c None",'#10'". '#9'c #929292",'#10'"+ '#9'c #747474",'#10'"@ '#9'c '
+'#818181",'#10'"# '#9'c #7C7C7C",'#10'"$ '#9'c #7D7D7D",'#10'"% '#9'c #77777'
+'7",'#10'"& '#9'c #7E7E7E",'#10'"* '#9'c #878787",'#10'"= '#9'c #888888",'#10
+'"- '#9'c #7A7A7A",'#10'"; '#9'c #858585",'#10'"> '#9'c #7B7B7B",'#10'", '#9
+'c #8A8A8A",'#10'"'' '#9'c #868686",'#10'") '#9'c #787878",'#10'"! '#9'c #72'
+'7272",'#10'"~ '#9'c #0B0B0B",'#10'"{ '#9'c #000000",'#10'"] '#9'c #030303",'
+#10'"^ '#9'c #050505",'#10'"/ '#9'c #0A0A0A",'#10'"( '#9'c #040404",'#10'"_ '
+#9'c #FFFFFF",'#10'": '#9'c #F9F9F9",'#10'"< '#9'c #FCFCFC",'#10'"[ '#9'c #F'
+'DFDFD",'#10'"} '#9'c #BEBEBE",'#10'"| '#9'c #FFFDFF",'#10'"1 '#9'c #FEFCFF"'
+','#10'"2 '#9'c #FEFEFF",'#10'"3 '#9'c #010000",'#10'"4 '#9'c #020202",'#10
+'"5 '#9'c #C2C2C2",'#10'"6 '#9'c #020003",'#10'"7 '#9'c #FFFAFF",'#10'"8 '#9
+'c #FCFDFF",'#10'"9 '#9'c #FAFBF3",'#10'"0 '#9'c #FFFFFA",'#10'"a '#9'c #FFF'
+'EFF",'#10'"b '#9'c #010103",'#10'"c '#9'c #FFFFFD",'#10'"d '#9'c #F8BDBD",'
+#10'"e '#9'c #EF6464",'#10'"f '#9'c #E81F1F",'#10'"g '#9'c #F06E6E",'#10'"h '
+#9'c #FEFFFF",'#10'"i '#9'c #EB3E3E",'#10'"j '#9'c #FCE3E3",'#10'"k '#9'c #F'
+'CE2E2",'#10'"l '#9'c #EB4040",'#10'"m '#9'c #FDF0F0",'#10'"n '#9'c #000105"'
+','#10'"o '#9'c #FCFFFF",'#10'"p '#9'c #E82020",'#10'"q '#9'c #FEFDFD",'#10
+'"r '#9'c #FEFCFC",'#10'"s '#9'c #E82121",'#10'"t '#9'c #F6A9A9",'#10'"u '#9
+'c #F07070",'#10'"v '#9'c #F17B7B",'#10'"w '#9'c #000103",'#10'"x '#9'c #FBF'
+'FFF",'#10'"y '#9'c #FCE4E4",'#10'"z '#9'c #EB3F3F",'#10'"A '#9'c #FDF4F4",'
+#10'"B '#9'c #E82525",'#10'"C '#9'c #F8FAFF",'#10'"D '#9'c #FBFEFF",'#10'"E '
+#9'c #F3BBBC",'#10'"F '#9'c #EF6363",'#10'"G '#9'c #EF6666",'#10'"H '#9'c #E'
+'92F2F",'#10'"I '#9'c #F17D7D",'#10'"J '#9'c #EF6767",'#10'"K '#9'c #F38F8F"'
+','#10'"L '#9'c #000201",'#10'"M '#9'c #FEFFFD",'#10'"N '#9'c #050503",'#10
+'"O '#9'c #FEFFFB",'#10'"P '#9'c #F9FBFF",'#10'"Q '#9'c #FBFCFF",'#10'"R '#9
+'c #C5C5C5",'#10'"S '#9'c #F8F8F8",'#10'"T '#9'c #8D8D8D",'#10'"U '#9'c #FDF'
+'EF9",'#10'"V '#9'c #FCFEF9",'#10'"W '#9'c #FDFDFB",'#10'"X '#9'c #FCFEFB",'
+#10'"Y '#9'c #FCFFF2",'#10'"Z '#9'c #FCFFF6",'#10'"` '#9'c #FEFFF4",'#10'" .'
+#9'c #FFFFF3",'#10'"..'#9'c #FEFFF5",'#10'"+.'#9'c #FFFFFB",'#10'"@.'#9'c #B'
+'CBCBC",'#10'"#.'#9'c #C2C2C0",'#10'"$.'#9'c #C3C0C7",'#10'"%.'#9'c #C2C1C6"'
+','#10'"&.'#9'c #C2C0CB",'#10'"*.'#9'c #C2BFD0",'#10'"=.'#9'c #C3C1CE",'#10
+'"-.'#9'c #BEBFBA",'#10'";.'#9'c #C9CBC0",'#10'">.'#9'c #BBBCB7",'#10'",.'#9
+'c #BEBEBC",'#10'"''.'#9'c #B9B8B4",'#10'").'#9'c #C2C3BE",'#10'"!.'#9'c #B7'
+'B7B5",'#10'"~.'#9'c #CACACA",'#10'"{.'#9'c #B5B5B5",'#10'"].'#9'c #BBBBBB",'
+#10'"^.'#9'c #FAFAFC",'#10'"/.'#9'c #FDFAFF",'#10'"(.'#9'c #FDFBFF",'#10'"_.'
+#9'c #FDFCFA",'#10'":.'#9'c #FDFBFC",'#10'"<.'#9'c #FDF9FF",'#10'"[.'#9'c #F'
+'CF8FF",'#10'"}.'#9'c #FEFDF9",'#10'"|.'#9'c #F8F8F0",'#10'"1.'#9'c #FFFEFC"'
+','#10'"2.'#9'c #FAF7FE",'#10'". + @ @ @ @ @ @ @ @ # # $ % & * = - ; > , '' '
+') ",'#10'"! ~ { { { { { { { { ] ^ { / { { { ] { ( { { _ ",'#10'"@ { _ _ _ _'
+' _ _ _ _ _ : _ < _ < _ [ < _ _ } _ ",'#10'"@ { | _ _ _ _ _ _ _ _ 1 2 { { { '
+'3 { 4 { [ 5 _ ",'#10'"& 6 7 _ _ _ _ _ _ _ _ _ 8 { 9 0 { 8 a { _ 5 _ ",'#10
+'"& b | _ _ _ _ _ _ _ _ _ _ { c { { { a { _ 5 _ ",'#10'"& b a d e e d _ _ f '
+'g g _ { _ h a 8 _ { _ 5 _ ",'#10'"& b _ i j k l _ _ f m _ _ { { { { { { { _'
+' 5 _ ",'#10'"& n o p q r s _ _ t u v _ { { { { { { { _ 5 _ ",'#10'"& w x i '
+'y j z _ _ _ A B _ { _ C _ 8 h { _ 5 _ ",'#10'"& w D E F G d H _ I J K _ { _'
+' { { { h { 8 5 _ ",'#10'"& L o _ _ _ _ _ _ _ _ _ _ { _ D { 8 M { _ 5 _ ",'
+#10'"+ N O o o 8 _ _ x x P Q _ { { { { { { { [ R S ",'#10'"T { U V W _ 8 X Y'
+' _ _ _ _ Z ` Y ...+.S _ @._ ",'#10'", { #.5 $.%.#.#.%.&.*.=.-.;.>.,.''.).!'
+'.~.{.]._ ",'#10'"# ^./././.(._.:./.<.[./.}.|.1.a | 2._ _ _ _ [ "};'#10
]);
LazarusResources.Add('tfontdialog','XPM',[
'/* XPM */'#10'static char * tfontdialog_xpm[] = {'#10'"22 20 10 1",'#10'" '#9
+'c None",'#10'".'#9'c #848484",'#10'"+'#9'c #FFFFFF",'#10'"@'#9'c #000000",'

128
lcl/include/spinedit.inc
View File

@ -17,7 +17,7 @@
}
{-----------------------------------------------------------------------------}
procedure TCustomSpinEdit.UpdateControl;
procedure TCustomFloatSpinEdit.UpdateControl;
begin
if MaxValue<MinValue then fMaxValue:=MinValue;
if Value<fMinValue then Value:=fMinValue;
@ -27,16 +27,16 @@ begin
fValueNeedsUpdate:=true;
exit;
end;
TWSCustomSpinEditClass(WidgetSetClass).UpdateControl(Self);
TWSCustomFloatSpinEditClass(WidgetSetClass).UpdateControl(Self);
fValueNeedsUpdate:=false;
end;
function TCustomSpinEdit.ValueIsStored: boolean;
function TCustomFloatSpinEdit.ValueIsStored: boolean;
begin
Result:=true; // fpc bug, default value is always 0
end;
procedure TCustomSpinEdit.TextChanged;
procedure TCustomFloatSpinEdit.TextChanged;
begin
if Value=fLastValueOnChange then exit;
fLastValueOnChange:=Value;
@ -45,48 +45,48 @@ begin
if HandleAllocated and (not (csLoading in ComponentState)) then Change;
end;
procedure TCustomSpinEdit.SetMaxValue(const AValue: single);
procedure TCustomFloatSpinEdit.SetMaxValue(const AValue: single);
begin
if FMaxValue=AValue then exit;
FMaxValue:=AValue;
UpdateControl;
end;
function TCustomSpinEdit.ClimbRateIsStored: boolean;
function TCustomFloatSpinEdit.ClimbRateIsStored: boolean;
begin
Result := FClimbRate <> 1;
end;
function TCustomSpinEdit.GetModified: Boolean;
function TCustomFloatSpinEdit.GetModified: Boolean;
begin
Result := FModified;
end;
function TCustomSpinEdit.GetSelLength: integer;
function TCustomFloatSpinEdit.GetSelLength: integer;
begin
if HandleAllocated then
FSelLength := TWSCustomSpinEditClass(WidgetSetClass).GetSelLength(Self);
FSelLength := TWSCustomFloatSpinEditClass(WidgetSetClass).GetSelLength(Self);
Result:= FSelLength;
end;
function TCustomSpinEdit.GetSelStart: integer;
function TCustomFloatSpinEdit.GetSelStart: integer;
begin
if HandleAllocated then
FSelStart:= TWSCustomSpinEditClass(WidgetSetClass).GetSelStart(Self);
FSelStart:= TWSCustomFloatSpinEditClass(WidgetSetClass).GetSelStart(Self);
Result:= FSelStart;
end;
function TCustomSpinEdit.GetSelText: String;
function TCustomFloatSpinEdit.GetSelText: String;
begin
Result:= Copy(Text, SelStart + 1, SelLength)
end;
function TCustomSpinEdit.MaxValueIsStored: boolean;
function TCustomFloatSpinEdit.MaxValueIsStored: boolean;
begin
Result:=true; // fpc bug, default value is always 0
end;
function TCustomSpinEdit.MinValueIsStored: boolean;
function TCustomFloatSpinEdit.MinValueIsStored: boolean;
begin
Result:=true; // fpc bug, default value is always 0
end;
@ -94,33 +94,33 @@ end;
{-----------------------------------------------------------------------------}
procedure TCustomSpinEdit.SetMinValue(const AValue: single);
procedure TCustomFloatSpinEdit.SetMinValue(const AValue: single);
begin
if FMinValue=AValue then exit;
FMinValue:=AValue;
UpdateControl;
end;
procedure TCustomSpinEdit.SetModified(const AValue: Boolean);
procedure TCustomFloatSpinEdit.SetModified(const AValue: Boolean);
begin
FModified := AValue;
end;
procedure TCustomSpinEdit.SetSelLength(const AValue: integer);
procedure TCustomFloatSpinEdit.SetSelLength(const AValue: integer);
begin
FSelLength:= AValue;
if HandleAllocated then
TWSCustomSpinEditClass(WidgetSetClass).SetSelLength(Self, FSelLength);
TWSCustomFloatSpinEditClass(WidgetSetClass).SetSelLength(Self, FSelLength);
end;
procedure TCustomSpinEdit.SetSelStart(const AValue: integer);
procedure TCustomFloatSpinEdit.SetSelStart(const AValue: integer);
begin
FSelStart:= AValue;
if HandleAllocated then
TWSCustomSpinEditClass(WidgetSetClass).SetSelStart(Self, FSelStart);
TWSCustomFloatSpinEditClass(WidgetSetClass).SetSelStart(Self, FSelStart);
end;
procedure TCustomSpinEdit.SetSelText(const AValue: String);
procedure TCustomFloatSpinEdit.SetSelText(const AValue: String);
var
OldText, NewText: string;
begin
@ -130,21 +130,21 @@ begin
Text:=NewText;
end;
procedure TCustomSpinEdit.SetValueEmpty(const AValue: boolean);
procedure TCustomFloatSpinEdit.SetValueEmpty(const AValue: boolean);
begin
if FValueEmpty=AValue then exit;
FValueEmpty:=AValue;
UpdateControl;
end;
procedure TCustomSpinEdit.SetClimbRate(const Num : Single);
procedure TCustomFloatSpinEdit.SetClimbRate(const Num : Single);
begin
if fClimbRate = Num then exit;
fClimbRate := Num;
UpdateControl;
end;
procedure TCustomSpinEdit.InitializeWnd;
procedure TCustomFloatSpinEdit.InitializeWnd;
var
ASelStart, ASelLength : integer;
begin
@ -158,13 +158,13 @@ begin
end;
end;
procedure TCustomSpinEdit.Loaded;
procedure TCustomFloatSpinEdit.Loaded;
begin
inherited Loaded;
if fValueNeedsUpdate then UpdateControl;
end;
procedure TCustomSpinEdit.Change;
procedure TCustomFloatSpinEdit.Change;
begin
if [csLoading,csDestroying,csDesigning]*ComponentState<>[] then exit;
EditingDone;
@ -172,7 +172,7 @@ begin
end;
{-----------------------------------------------------------------------------}
Procedure TCustomSpinEdit.SetValue(const num : Single);
Procedure TCustomFloatSpinEdit.SetValue(const num : Single);
begin
if FValue = Num then exit;
FValue := Num;
@ -182,16 +182,16 @@ begin
end;
{-----------------------------------------------------------------------------}
Function TCustomSpinEdit.GetValue: Single;
Function TCustomFloatSpinEdit.GetValue: Single;
begin
if HandleAllocated and (not fValueNeedsUpdate) then begin
FValue := TWSCustomSpinEditClass(WidgetSetClass).GetValue(Self);
FValue := TWSCustomFloatSpinEditClass(WidgetSetClass).GetValue(Self);
end;
Result := fValue;
end;
{-----------------------------------------------------------------------------}
procedure TCustomSpinEdit.SetDecimals(Num : Integer);
procedure TCustomFloatSpinEdit.SetDecimals(Num : Integer);
begin
if fDecimals = Num then exit;
fDecimals := Num;
@ -199,7 +199,7 @@ begin
end;
{-----------------------------------------------------------------------------}
constructor TCustomSpinEdit.Create(TheOwner : TComponent);
constructor TCustomFloatSpinEdit.Create(TheOwner : TComponent);
begin
inherited Create(TheOwner);
fCompStyle := csSpinEdit;
@ -217,18 +217,18 @@ begin
end;
{-----------------------------------------------------------------------------}
destructor TCustomSpinEdit.Destroy;
destructor TCustomFloatSpinEdit.Destroy;
begin
inherited Destroy;
end;
procedure TCustomSpinEdit.DestroyComponent;
procedure TCustomFloatSpinEdit.DestroyComponent;
begin
GetValue;
inherited DestroyComponent;
end;
procedure TCustomSpinEdit.SelectAll;
procedure TCustomFloatSpinEdit.SelectAll;
begin
if Text <> '' then begin
SetSelStart(0);
@ -236,28 +236,80 @@ begin
end;
end;
procedure TCustomSpinEdit.ClearSelection;
procedure TCustomFloatSpinEdit.ClearSelection;
begin
if SelLength > 0 then
SelText := '';
end;
procedure TCustomSpinEdit.CopyToClipboard;
procedure TCustomFloatSpinEdit.CopyToClipboard;
begin
Clipboard.AsText := SelText;
end;
procedure TCustomSpinEdit.CutToClipboard;
procedure TCustomFloatSpinEdit.CutToClipboard;
begin
CopyToClipboard;
ClearSelection;
end;
procedure TCustomSpinEdit.PasteFromClipboard;
procedure TCustomFloatSpinEdit.PasteFromClipboard;
begin
if Clipboard.HasFormat(CF_TEXT) then
SelText := Clipboard.AsText;
end;
{ TCustomSpinEdit }
function TCustomSpinEdit.GetClimbRate: integer;
begin
Result:=round(FClimbRate);
end;
function TCustomSpinEdit.GetMaxValue: integer;
begin
Result:=round(FMaxValue);
end;
function TCustomSpinEdit.GetMinValue: integer;
begin
Result:=round(FMinValue);
end;
function TCustomSpinEdit.GetValue: integer;
begin
Result:=round(inherited GetValue);
end;
procedure TCustomSpinEdit.SetClimbRate(const AValue: integer);
begin
if ClimbRate=AValue then exit;
inherited SetClimbRate(AValue);
end;
procedure TCustomSpinEdit.SetMaxValue(const AValue: integer);
begin
if MaxValue=AValue then exit;
inherited SetMaxValue(AValue);
end;
procedure TCustomSpinEdit.SetMinValue(const AValue: integer);
begin
if MinValue=AValue then exit;
inherited SetMinValue(AValue);
end;
procedure TCustomSpinEdit.SetValue(const AValue: integer);
begin
if Value=AValue then exit;
inherited SetValue(AValue);
end;
constructor TCustomSpinEdit.Create(TheOwner: TComponent);
begin
inherited Create(TheOwner);
fDecimals:=0;
end;
// included by spin.pp

12
lcl/interfaces/carbon/carbonwsspin.pp
View File

@ -39,17 +39,17 @@ uses
type
{ TCarbonWSCustomSpinEdit }
{ TCarbonWSCustomFloatSpinEdit }
TCarbonWSCustomSpinEdit = class(TWSCustomSpinEdit)
TCarbonWSCustomFloatSpinEdit = class(TWSCustomFloatSpinEdit)
private
protected
public
end;
{ TCarbonWSSpinEdit }
{ TCarbonWSFloatSpinEdit }
TCarbonWSSpinEdit = class(TWSSpinEdit)
TCarbonWSFloatSpinEdit = class(TWSFloatSpinEdit)
private
protected
public
@ -66,7 +66,7 @@ initialization
// To improve speed, register only classes
// which actually implement something
////////////////////////////////////////////////////
// RegisterWSComponent(TCustomSpinEdit, TCarbonWSCustomSpinEdit);
// RegisterWSComponent(TSpinEdit, TCarbonWSSpinEdit);
// RegisterWSComponent(TCustomFloatSpinEdit, TCarbonWSCustomFloatSpinEdit);
// RegisterWSComponent(TFloatSpinEdit, TCarbonWSFloatSpinEdit);
////////////////////////////////////////////////////
end.

12
lcl/interfaces/gnome/gnomewsspin.pp
View File

@ -39,17 +39,17 @@ uses
type
{ TGnomeWSCustomSpinEdit }
{ TGnomeWSCustomFloatSpinEdit }
TGnomeWSCustomSpinEdit = class(TWSCustomSpinEdit)
TGnomeWSCustomFloatSpinEdit = class(TWSCustomFloatSpinEdit)
private
protected
public
end;
{ TGnomeWSSpinEdit }
{ TGnomeWSFloatSpinEdit }
TGnomeWSSpinEdit = class(TWSSpinEdit)
TGnomeWSFloatSpinEdit = class(TWSFloatSpinEdit)
private
protected
public
@ -66,7 +66,7 @@ initialization
// To improve speed, register only classes
// which actually implement something
////////////////////////////////////////////////////
// RegisterWSComponent(TCustomSpinEdit, TGnomeWSCustomSpinEdit);
// RegisterWSComponent(TSpinEdit, TGnomeWSSpinEdit);
// RegisterWSComponent(TCustomFloatSpinEdit, TGnomeWSCustomFloatSpinEdit);
// RegisterWSComponent(TFloatSpinEdit, TGnomeWSFloatSpinEdit);
////////////////////////////////////////////////////
end.

87
lcl/interfaces/gtk/gtkwsspin.pp
View File

@ -36,26 +36,26 @@ uses
type
{ TGtkWSCustomSpinEdit }
{ TGtkWSCustomFloatSpinEdit }
TGtkWSCustomSpinEdit = class(TWSCustomSpinEdit)
TGtkWSCustomFloatSpinEdit = class(TWSCustomFloatSpinEdit)
private
protected
public
class function GetSelStart(const ACustomSpinEdit: TCustomSpinEdit): integer; override;
class function GetSelLength(const ACustomSpinEdit: TCustomSpinEdit): integer; override;
class function GetValue(const ACustomSpinEdit: TCustomSpinEdit): single; override;
class function GetSelStart(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): integer; override;
class function GetSelLength(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): integer; override;
class function GetValue(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): single; override;
class procedure SetSelStart(const ACustomSpinEdit: TCustomSpinEdit; NewStart: integer); override;
class procedure SetSelLength(const ACustomSpinEdit: TCustomSpinEdit; NewLength: integer); override;
class procedure SetSelStart(const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewStart: integer); override;
class procedure SetSelLength(const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewLength: integer); override;
class procedure UpdateControl(const ACustomSpinEdit: TCustomSpinEdit); override;
class procedure UpdateControl(const ACustomFloatSpinEdit: TCustomFloatSpinEdit); override;
end;
function GetGtkSpinEntry(Spin: PGtkSpinButton): PGtkEntry;
function GetSpinGtkEntry(Spin: TCustomSpinEdit): PGtkEntry;
function GetGtkSpinEditable(Spin: PGtkSpinButton): PGtkOldEditable;
function GetSpinGtkEditable(Spin: TCustomSpinEdit): PGtkOldEditable;
function GetSpinGtkEntry(Spin: TCustomFloatSpinEdit): PGtkEntry;
function GetGtkFloatSpinEditable(Spin: PGtkSpinButton): PGtkOldEditable;
function GetSpinGtkEditable(Spin: TCustomFloatSpinEdit): PGtkOldEditable;
implementation
@ -64,78 +64,81 @@ begin
Result:=PGtkEntry(@(Spin^.entry));
end;
function GetSpinGtkEntry(Spin: TCustomSpinEdit): PGtkEntry;
function GetSpinGtkEntry(Spin: TCustomFloatSpinEdit): PGtkEntry;
begin
Result:=GetGtkSpinEntry(PGtkSpinButton(Spin.Handle));
end;
function GetGtkSpinEditable(Spin: PGtkSpinButton): PGtkOldEditable;
function GetGtkFloatSpinEditable(Spin: PGtkSpinButton): PGtkOldEditable;
begin
Result:=PGtkOldEditable(@(Spin^.entry));
end;
function GetSpinGtkEditable(Spin: TCustomSpinEdit): PGtkOldEditable;
function GetSpinGtkEditable(Spin: TCustomFloatSpinEdit): PGtkOldEditable;
begin
Result:=GetGtkSpinEditable(PGtkSpinButton(Spin.Handle));
Result:=GetGtkFloatSpinEditable(PGtkSpinButton(Spin.Handle));
end;
{ TGtkWSCustomSpinEdit }
{ TGtkWSCustomFloatSpinEdit }
//const
// GtkValueEmpty: array[boolean] of integer = (0,1);
function TGtkWSCustomSpinEdit.GetSelStart(const ACustomSpinEdit: TCustomSpinEdit
function TGtkWSCustomFloatSpinEdit.GetSelStart(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit
): integer;
begin
Result := WidgetGetSelStart(PGtkWidget(GetSpinGtkEntry(ACustomSpinEdit)));
Result :=
WidgetGetSelStart(PGtkWidget(GetSpinGtkEntry(ACustomFloatSpinEdit)));
end;
function TGtkWSCustomSpinEdit.GetSelLength(
const ACustomSpinEdit: TCustomSpinEdit): integer;
function TGtkWSCustomFloatSpinEdit.GetSelLength(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit): integer;
begin
with GetSpinGtkEditable(ACustomSpinEdit)^ do
with GetSpinGtkEditable(ACustomFloatSpinEdit)^ do
Result := Abs(integer(selection_end_pos)-integer(selection_start_pos));
end;
function TGtkWSCustomSpinEdit.GetValue(const ACustomSpinEdit: TCustomSpinEdit
): single;
function TGtkWSCustomFloatSpinEdit.GetValue(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit): single;
begin
Result:=gtk_spin_button_get_value_as_float(
PGtkSpinButton(ACustomSpinEdit.Handle));
PGtkSpinButton(ACustomFloatSpinEdit.Handle));
end;
procedure TGtkWSCustomSpinEdit.SetSelStart(
const ACustomSpinEdit: TCustomSpinEdit; NewStart: integer);
procedure TGtkWSCustomFloatSpinEdit.SetSelStart(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewStart: integer);
begin
gtk_editable_set_position(GetSpinGtkEditable(ACustomSpinEdit), NewStart);
gtk_editable_set_position(GetSpinGtkEditable(ACustomFloatSpinEdit), NewStart);
end;
procedure TGtkWSCustomSpinEdit.SetSelLength(
const ACustomSpinEdit: TCustomSpinEdit; NewLength: integer);
procedure TGtkWSCustomFloatSpinEdit.SetSelLength(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewLength: integer);
begin
WidgetSetSelLength(PGtkWidget(GetSpinGtkEntry(ACustomSpinEdit)),NewLength);
WidgetSetSelLength(PGtkWidget(GetSpinGtkEntry(ACustomFloatSpinEdit)),
NewLength);
end;
procedure TGtkWSCustomSpinEdit.UpdateControl(
const ACustomSpinEdit: TCustomSpinEdit);
procedure TGtkWSCustomFloatSpinEdit.UpdateControl(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit);
var
AnAdjustment: PGtkAdjustment;
wHandle: HWND;
SpinWidget: PGtkSpinButton;
begin
wHandle := ACustomSpinEdit.Handle;
wHandle := ACustomFloatSpinEdit.Handle;
SpinWidget:=GTK_SPIN_BUTTON(Pointer(wHandle));
AnAdjustment:=gtk_spin_button_get_adjustment(SpinWidget);
if (AnAdjustment^.lower<>ACustomSpinEdit.MinValue)
or (AnAdjustment^.upper<>ACustomSpinEdit.MaxValue) then
if (AnAdjustment^.lower<>ACustomFloatSpinEdit.MinValue)
or (AnAdjustment^.upper<>ACustomFloatSpinEdit.MaxValue) then
begin
AnAdjustment^.lower:=ACustomSpinEdit.MinValue;
AnAdjustment^.upper:=ACustomSpinEdit.MaxValue;
AnAdjustment^.lower:=ACustomFloatSpinEdit.MinValue;
AnAdjustment^.upper:=ACustomFloatSpinEdit.MaxValue;
gtk_adjustment_changed(AnAdjustment);
end;
gtk_spin_button_set_digits(SpinWidget, ACustomSpinEdit.DecimalPlaces);
gtk_spin_button_set_value(SpinWidget,ACustomSpinEdit.Value);
AnAdjustment^.step_increment := ACustomSpinEdit.ClimbRate;
gtk_spin_button_set_digits(SpinWidget, ACustomFloatSpinEdit.DecimalPlaces);
gtk_spin_button_set_value(SpinWidget,ACustomFloatSpinEdit.Value);
AnAdjustment^.step_increment := ACustomFloatSpinEdit.ClimbRate;
end;
initialization
@ -146,7 +149,7 @@ initialization
// To improve speed, register only classes
// which actually implement something
////////////////////////////////////////////////////
RegisterWSComponent(TCustomSpinEdit, TGtkWSCustomSpinEdit);
// RegisterWSComponent(TSpinEdit, TGtkWSSpinEdit);
RegisterWSComponent(TCustomFloatSpinEdit, TGtkWSCustomFloatSpinEdit);
// RegisterWSComponent(TFloatSpinEdit, TGtkWSFloatSpinEdit);
////////////////////////////////////////////////////
end.

12
lcl/interfaces/gtk2/gtk2wsspin.pp
View File

@ -39,17 +39,17 @@ uses
type
{ TGtk2WSCustomSpinEdit }
{ TGtk2WSCustomFloatSpinEdit }
TGtk2WSCustomSpinEdit = class(TWSCustomSpinEdit)
TGtk2WSCustomFloatSpinEdit = class(TWSCustomFloatSpinEdit)
private
protected
public
end;
{ TGtk2WSSpinEdit }
{ TGtk2WSFloatSpinEdit }
TGtk2WSSpinEdit = class(TWSSpinEdit)
TGtk2WSFloatSpinEdit = class(TWSFloatSpinEdit)
private
protected
public
@ -66,7 +66,7 @@ initialization
// To improve speed, register only classes
// which actually implement something
////////////////////////////////////////////////////
// RegisterWSComponent(TCustomSpinEdit, TGtk2WSCustomSpinEdit);
// RegisterWSComponent(TSpinEdit, TGtk2WSSpinEdit);
// RegisterWSComponent(TCustomFloatSpinEdit, TGtk2WSCustomFloatSpinEdit);
// RegisterWSComponent(TFloatSpinEdit, TGtk2WSFloatSpinEdit);
////////////////////////////////////////////////////
end.

12
lcl/interfaces/qt/qtwsspin.pp
View File

@ -39,17 +39,17 @@ uses
type
{ TQtWSCustomSpinEdit }
{ TQtWSCustomFloatSpinEdit }
TQtWSCustomSpinEdit = class(TWSCustomSpinEdit)
TQtWSCustomSpinEdit = class(TWSCustomFloatSpinEdit)
private
protected
public
end;
{ TQtWSSpinEdit }
{ TQtWSFloatSpinEdit }
TQtWSSpinEdit = class(TWSSpinEdit)
TQtWSFloatSpinEdit = class(TWSFloatSpinEdit)
private
protected
public
@ -66,7 +66,7 @@ initialization
// To improve speed, register only classes
// which actually implement something
////////////////////////////////////////////////////
// RegisterWSComponent(TCustomSpinEdit, TQtWSCustomSpinEdit);
// RegisterWSComponent(TSpinEdit, TQtWSSpinEdit);
// RegisterWSComponent(TCustomFloatSpinEdit, TQtWSCustomFloatSpinEdit);
// RegisterWSComponent(TFloatSpinEdit, TQtWSFloatSpinEdit);
////////////////////////////////////////////////////
end.

10
lcl/interfaces/win32/win32callback.inc
View File

@ -704,7 +704,7 @@ Begin
BN_CLICKED: LMessage.Msg := LM_CLICKED;
BN_KILLFOCUS: LMessage.Msg := LM_EXIT;
end
else if (lWinControl is TCustomEdit) or (lWinControl is TCustomSpinEdit) then
else if (lWinControl is TCustomEdit) or (lWinControl is TCustomFloatSpinEdit) then
case Hi(WParam) of
EN_CHANGE: LMessage.Msg := CM_TEXTCHANGED;
end
@ -805,8 +805,8 @@ Begin
Assert(False, 'Trace:WindowProc - Got WM_DESTROY');
if lWinControl is TCheckListBox then
TWin32CheckListBoxStrings.DeleteItemRecords(Window);
if lWinControl is TCustomSpinEdit then
DestroySpinEditBuddy(Window);
if lWinControl is TCustomFloatSpinEdit then
DestroyFloatSpinEditBuddy(Window);
if lWinControl is TCustomComboBox then
DisposeComboEditWindowInfo(TCustomComboBox(lWinControl));
if WindowInfo^.Overlay<>HWND(nil) then
@ -879,8 +879,8 @@ Begin
else
EnableApplicationWindows(Window);
If (lWinControl is TCustomSpinEdit) then
EnableSpinEditBuddy(Window, WParam<>0);
If (lWinControl is TCustomFloatSpinEdit) then
EnableFloatSpinEditBuddy(Window, WParam<>0);
// ugly hack to give bitbtns a nice look
// When no theming active, the internal image needs to be
// recreated when the enabled state is changed

4
lcl/interfaces/win32/win32winapi.inc
View File

@ -2112,7 +2112,7 @@ var
begin
Result:=false;
WindowInfo := GetWindowInfo(Handle);
if (WindowInfo^.WinControl is TCustomSpinEdit) then
if (WindowInfo^.WinControl is TCustomFloatSpinEdit) then
Handle := Windows.SendMessage(Handle, UDM_GETBUDDY, 0, 0);
if not Windows.GetWindowRect(Handle,@R) then exit;
LeftTop.X:=R.Left;
@ -2198,7 +2198,7 @@ begin
else
Dec(Height, Windows.GetSystemMetrics(SM_CYCAPTION));
if (WindowInfo^.WinControl is TCustomSpinEdit) then
if (WindowInfo^.WinControl is TCustomFloatSpinEdit) then
AdjustForBuddySize;
end;

77
lcl/interfaces/win32/win32wsspin.pp
View File

@ -40,9 +40,9 @@ uses
type
{ TWin32WSCustomSpinEdit }
{ TWin32WSCustomFloatSpinEdit }
TWin32WSCustomSpinEdit = class(TWSCustomSpinEdit)
TWin32WSCustomFloatSpinEdit = class(TWSCustomFloatSpinEdit)
private
protected
public
@ -50,20 +50,20 @@ type
var Left, Top, Width, Height: integer; var SuppressMove: boolean); override;
class function CreateHandle(const AWinControl: TWinControl;
const AParams: TCreateParams): HWND; override;
class function GetSelStart(const ACustomSpinEdit: TCustomSpinEdit): integer; override;
class function GetSelLength(const ACustomSpinEdit: TCustomSpinEdit): integer; override;
class function GetValue(const ACustomSpinEdit: TCustomSpinEdit): single; override;
class function GetSelStart(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): integer; override;
class function GetSelLength(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): integer; override;
class function GetValue(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): single; override;
class procedure SetSelStart(const ACustomSpinEdit: TCustomSpinEdit; NewStart: integer); override;
class procedure SetSelLength(const ACustomSpinEdit: TCustomSpinEdit; NewLength: integer); override;
class procedure SetSelStart(const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewStart: integer); override;
class procedure SetSelLength(const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewLength: integer); override;
class procedure ShowHide(const AWinControl: TWinControl); override;
class procedure UpdateControl(const ACustomSpinEdit: TCustomSpinEdit); override;
class procedure UpdateControl(const ACustomFloatSpinEdit: TCustomFloatSpinEdit); override;
end;
{ TWin32WSSpinEdit }
{ TWin32WSFloatSpinEdit }
TWin32WSSpinEdit = class(TWSSpinEdit)
TWin32WSFloatSpinEdit = class(TWSFloatSpinEdit)
private
protected
public
@ -72,25 +72,26 @@ type
implementation
{ TWin32WSCustomSpinEdit }
{ TWin32WSCustomFloatSpinEdit }
procedure UpdateSpinEditControl(const Handle: HWND; const ASpinEdit: TCustomSpinEdit);
procedure UpdateFloatSpinEditControl(const Handle: HWND;
const AFloatSpinEdit: TCustomFloatSpinEdit);
var
minval, maxval: integer;
begin
// initialize extremes
minval := Trunc(ASpinEdit.MinValue);
maxval := Trunc(ASpinEdit.MaxValue);
minval := Trunc(AFloatSpinEdit.MinValue);
maxval := Trunc(AFloatSpinEdit.MaxValue);
if (minval = 0) and (maxval = 0) then
begin
minval := low(integer);
maxval := high(integer);
end;
SendMessage(Handle, UDM_SETRANGE32, minval, maxval);
SendMessage(Handle, UDM_SETPOS32, 0, LParam(Trunc(ASpinEdit.Value)));
SendMessage(Handle, UDM_SETPOS32, 0, LParam(Trunc(AFloatSpinEdit.Value)));
end;
function TWin32WSCustomSpinEdit.CreateHandle(const AWinControl: TWinControl;
function TWin32WSCustomFloatSpinEdit.CreateHandle(const AWinControl: TWinControl;
const AParams: TCreateParams): HWND;
var
Params: TCreateWindowExParams;
@ -106,7 +107,7 @@ begin
0, 0, // size - ignored for buddy
Parent, 0, HInstance, Buddy,
0, 0, 0);
UpdateSpinEditControl(Window, TCustomSpinEdit(AWinControl));
UpdateFloatSpinEditControl(Window, TCustomFloatSpinEdit(AWinControl));
end;
// create window
FinishCreateWindow(AWinControl, Params, true);
@ -117,7 +118,7 @@ begin
Result := Params.Window;
end;
procedure TWin32WSCustomSpinEdit.AdaptBounds(const AWinControl: TWinControl;
procedure TWin32WSCustomFloatSpinEdit.AdaptBounds(const AWinControl: TWinControl;
var Left, Top, Width, Height: integer; var SuppressMove: boolean);
var
WinHandle, BuddyHandle: HWND;
@ -131,32 +132,41 @@ begin
SuppressMove := true;
end;
function TWin32WSCustomSpinEdit.GetSelStart(const ACustomSpinEdit: TCustomSpinEdit): integer;
function TWin32WSCustomFloatSpinEdit.GetSelStart(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit): integer;
begin
Result := EditGetSelStart(SendMessage(ACustomSpinEdit.Handle, UDM_GETBUDDY, 0, 0));
Result := EditGetSelStart(SendMessage(ACustomFloatSpinEdit.Handle,
UDM_GETBUDDY, 0, 0));
end;
function TWin32WSCustomSpinEdit.GetSelLength(const ACustomSpinEdit: TCustomSpinEdit): integer;
function TWin32WSCustomFloatSpinEdit.GetSelLength(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit): integer;
begin
Result := EditGetSelLength(SendMessage(ACustomSpinEdit.Handle, UDM_GETBUDDY, 0, 0));
Result := EditGetSelLength(SendMessage(ACustomFloatSpinEdit.Handle,
UDM_GETBUDDY, 0, 0));
end;
function TWin32WSCustomSpinEdit.GetValue(const ACustomSpinEdit: TCustomSpinEdit): single;
function TWin32WSCustomFloatSpinEdit.GetValue(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit): single;
begin
Result := SendMessage(ACustomSpinEdit.Handle, UDM_GETPOS32, 0, 0);
Result := SendMessage(ACustomFloatSpinEdit.Handle, UDM_GETPOS32, 0, 0);
end;
procedure TWin32WSCustomSpinEdit.SetSelStart(const ACustomSpinEdit: TCustomSpinEdit; NewStart: integer);
procedure TWin32WSCustomFloatSpinEdit.SetSelStart(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewStart: integer);
begin
EditSetSelStart(SendMessage(ACustomSpinEdit.Handle, UDM_GETBUDDY, 0, 0), NewStart);
EditSetSelStart(SendMessage(ACustomFloatSpinEdit.Handle, UDM_GETBUDDY, 0, 0),
NewStart);
end;
procedure TWin32WSCustomSpinEdit.SetSelLength(const ACustomSpinEdit: TCustomSpinEdit; NewLength: integer);
procedure TWin32WSCustomFloatSpinEdit.SetSelLength(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewLength: integer);
begin
EditSetSelLength(SendMessage(ACustomSpinEdit.Handle, UDM_GETBUDDY, 0, 0), NewLength);
EditSetSelLength(SendMessage(ACustomFloatSpinEdit.Handle, UDM_GETBUDDY, 0, 0),
NewLength);
end;
procedure TWin32WSCustomSpinEdit.ShowHide(const AWinControl: TWinControl);
procedure TWin32WSCustomFloatSpinEdit.ShowHide(const AWinControl: TWinControl);
var
Buddy: HWND;
begin
@ -170,9 +180,10 @@ begin
end;
procedure TWin32WSCustomSpinEdit.UpdateControl(const ACustomSpinEdit: TCustomSpinEdit);
procedure TWin32WSCustomFloatSpinEdit.UpdateControl(
const ACustomFloatSpinEdit: TCustomFloatSpinEdit);
begin
UpdateSpinEditControl(ACustomSpinEdit.Handle, ACustomSpinEdit);
UpdateFloatSpinEditControl(ACustomFloatSpinEdit.Handle, ACustomFloatSpinEdit);
end;
initialization
@ -183,7 +194,7 @@ initialization
// To improve speed, register only classes
// which actually implement something
////////////////////////////////////////////////////
RegisterWSComponent(TCustomSpinEdit, TWin32WSCustomSpinEdit);
// RegisterWSComponent(TSpinEdit, TWin32WSSpinEdit);
RegisterWSComponent(TCustomFloatSpinEdit, TWin32WSCustomFloatSpinEdit);
// RegisterWSComponent(TFloatSpinEdit, TWin32WSFloatSpinEdit);
////////////////////////////////////////////////////
end.

80
lcl/spin.pp
View File

@ -33,9 +33,9 @@ uses
Classes, Controls, SysUtils, LCLType, LMessages, ClipBrd, StdCtrls;
type
{ TCustomSpinEdit }
{ TCustomFloatSpinEdit }
TCustomSpinEdit = class(TWinControl)
TCustomFloatSpinEdit = class(TWinControl)
private
fClimbRate: Single;
fDecimals: Integer;
@ -68,7 +68,7 @@ type
protected
procedure TextChanged; override;
procedure SetDecimals(Num: Integer);
Function GetValue: Single;
function GetValue: Single;
procedure SetValue(const Num: Single);
procedure SetClimbRate(const Num: Single);
procedure InitializeWnd; override;
@ -91,23 +91,72 @@ type
property Text;
public
property DecimalPlaces: Integer read FDecimals write SetDecimals default 2;
property ClimbRate : Single read FClimbRate write SetClimbRate stored ClimbRateIsStored;
property MinValue: single read FMinValue write SetMinValue stored MinValueIsStored;
property MaxValue: single read FMaxValue write SetMaxValue stored MaxValueIsStored;
property ClimbRate: Single read FClimbRate write SetClimbRate default 1;
property MinValue: single read FMinValue write SetMinValue default 0;
property MaxValue: single read FMaxValue write SetMaxValue default 100;
property TabStop default true;
property Value: Single read GetValue write SetValue stored ValueIsStored;
property Value: Single read GetValue write SetValue default 0;
property ValueEmpty: boolean read FValueEmpty write SetValueEmpty default False;
end;
{ TFloatSpinEdit }
TFloatSpinEdit = class(TCustomFloatSpinEdit)
published
// name compatebility for old configs
// strreamed data now still can be read
// TODO: remove
property Decimal_Places: Integer write SetDecimals;
property Climb_Rate : Single write SetClimbRate;
property Align;
property Anchors;
property BorderSpacing;
property Constraints;
property DecimalPlaces;
property Enabled;
property MaxValue;
property MinValue;
property OnChange;
property OnChangeBounds;
property OnClick;
property OnEnter;
property OnExit;
property OnKeyDown;
property OnKeyPress;
property OnKeyUp;
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
property OnResize;
property ParentShowHint;
property PopupMenu;
property ShowHint;
property TabStop;
property TabOrder;
property Value;
property Visible;
end;
{ TCustomSpinEdit }
TCustomSpinEdit = class(TCustomFloatSpinEdit)
private
function GetClimbRate: integer;
function GetMaxValue: integer;
function GetMinValue: integer;
function GetValue: integer;
procedure SetClimbRate(const AValue: integer);
procedure SetMaxValue(const AValue: integer);
procedure SetMinValue(const AValue: integer);
procedure SetValue(const AValue: integer);
public
constructor Create(TheOwner: TComponent); override;
public
property Value: integer read GetValue write SetValue;
property MinValue: integer read GetMinValue write SetMinValue;
property MaxValue: integer read GetMaxValue write SetMaxValue;
property ClimbRate: integer read GetClimbRate write SetClimbRate;
end;
{ TSpinEdit }
TSpinEdit = class(TCustomSpinEdit)
published
property Align;
@ -115,7 +164,6 @@ type
property BorderSpacing;
property ClimbRate;
property Constraints;
property DecimalPlaces;
property Enabled;
property MaxValue;
property MinValue;
@ -143,14 +191,14 @@ type
procedure Register;
Implementation
implementation
uses
WSSpin;
procedure Register;
begin
RegisterComponents('Misc',[TSpinEdit]);
RegisterComponents('Misc',[TSpinEdit,TFloatSpinEdit]);
end;
{$I spinedit.inc}

40
lcl/widgetset/wsspin.pp
View File

@ -49,54 +49,54 @@ uses
WSLCLClasses, WSControls;
type
{ TWSCustomSpinEdit }
{ TWSCustomFloatSpinEdit }
TWSCustomSpinEdit = class(TWSWinControl)
class function GetSelStart(const ACustomSpinEdit: TCustomSpinEdit): integer; virtual;
class function GetSelLength(const ACustomSpinEdit: TCustomSpinEdit): integer; virtual;
class function GetValue(const ACustomSpinEdit: TCustomSpinEdit): single; virtual;
TWSCustomFloatSpinEdit = class(TWSWinControl)
class function GetSelStart(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): integer; virtual;
class function GetSelLength(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): integer; virtual;
class function GetValue(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): single; virtual;
class procedure SetSelStart(const ACustomSpinEdit: TCustomSpinEdit; NewStart: integer); virtual;
class procedure SetSelLength(const ACustomSpinEdit: TCustomSpinEdit; NewLength: integer); virtual;
class procedure SetSelStart(const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewStart: integer); virtual;
class procedure SetSelLength(const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewLength: integer); virtual;
class procedure UpdateControl(const ACustomSpinEdit: TCustomSpinEdit); virtual;
class procedure UpdateControl(const ACustomFloatSpinEdit: TCustomFloatSpinEdit); virtual;
end;
TWSCustomSpinEditClass = class of TWSCustomSpinEdit;
TWSCustomFloatSpinEditClass = class of TWSCustomFloatSpinEdit;
{ TWSSpinEdit }
{ TWSFloatSpinEdit }
TWSSpinEdit = class(TWSCustomSpinEdit)
TWSFloatSpinEdit = class(TWSCustomFloatSpinEdit)
end;
implementation
{ TWSCustomSpinEdit }
{ TWSCustomFloatSpinEdit }
function TWSCustomSpinEdit.GetSelStart(const ACustomSpinEdit: TCustomSpinEdit): integer;
function TWSCustomFloatSpinEdit.GetSelStart(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): integer;
begin
result := -1;
end;
function TWSCustomSpinEdit.GetSelLength(const ACustomSpinEdit: TCustomSpinEdit): integer;
function TWSCustomFloatSpinEdit.GetSelLength(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): integer;
begin
result := 0;
end;
function TWSCustomSpinEdit.GetValue(const ACustomSpinEdit: TCustomSpinEdit): single;
function TWSCustomFloatSpinEdit.GetValue(const ACustomFloatSpinEdit: TCustomFloatSpinEdit): single;
begin
result := 0.0;
end;
procedure TWSCustomSpinEdit.SetSelStart(const ACustomSpinEdit: TCustomSpinEdit; NewStart: integer);
procedure TWSCustomFloatSpinEdit.SetSelStart(const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewStart: integer);
begin
end;
procedure TWSCustomSpinEdit.SetSelLength(const ACustomSpinEdit: TCustomSpinEdit; NewLength: integer);
procedure TWSCustomFloatSpinEdit.SetSelLength(const ACustomFloatSpinEdit: TCustomFloatSpinEdit; NewLength: integer);
begin
end;
procedure TWSCustomSpinEdit.UpdateControl(const ACustomSpinEdit: TCustomSpinEdit);
procedure TWSCustomFloatSpinEdit.UpdateControl(const ACustomFloatSpinEdit: TCustomFloatSpinEdit);
begin
end;
@ -106,7 +106,7 @@ initialization
// To improve speed, register only classes
// which actually implement something
////////////////////////////////////////////////////
RegisterWSComponent(TCustomSpinEdit, TWSCustomSpinEdit);
// RegisterWSComponent(TSpinEdit, TWSSpinEdit);
RegisterWSComponent(TCustomFloatSpinEdit, TWSCustomFloatSpinEdit);
// RegisterWSComponent(TFloatSpinEdit, TWSFloatSpinEdit);
////////////////////////////////////////////////////
end.

4
packager/pkgoptionsdlg.pas
View File

@ -584,7 +584,6 @@ begin
with VersionMajorSpinEdit do begin
Name:='VersionMajorSpinEdit';
Parent:=VersionGroupBox;
Decimal_Places:=0;
MinValue:=0;
MaxValue:=9999;
end;
@ -600,7 +599,6 @@ begin
with VersionMinorSpinEdit do begin
Name:='VersionMinorSpinEdit';
Parent:=VersionGroupBox;
Decimal_Places:=0;
MinValue:=0;
MaxValue:=9999;
end;
@ -616,7 +614,6 @@ begin
with VersionReleaseSpinEdit do begin
Name:='VersionReleaseSpinEdit';
Parent:=VersionGroupBox;
Decimal_Places:=0;
MinValue:=0;
MaxValue:=9999;
end;
@ -632,7 +629,6 @@ begin
with VersionBuildSpinEdit do begin
Name:='VersionBuildSpinEdit';
Parent:=VersionGroupBox;
Decimal_Places:=0;
MinValue:=0;
MaxValue:=9999;
end;