diff --git a/components/jvcllaz/packages/JvCoreLaz.lpk b/components/jvcllaz/packages/JvCoreLaz.lpk index bf0c366fd..43dd69410 100644 --- a/components/jvcllaz/packages/JvCoreLaz.lpk +++ b/components/jvcllaz/packages/JvCoreLaz.lpk @@ -10,7 +10,7 @@ - + @@ -19,7 +19,8 @@ - + @@ -53,11 +54,11 @@ - - - + + + diff --git a/components/jvcllaz/packages/JvNavigationPaneLaz.lpk b/components/jvcllaz/packages/JvNavigationPaneLaz.lpk new file mode 100644 index 000000000..099c1a6f1 --- /dev/null +++ b/components/jvcllaz/packages/JvNavigationPaneLaz.lpk @@ -0,0 +1,57 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/components/jvcllaz/packages/JvNavigationPaneLaz.pas b/components/jvcllaz/packages/JvNavigationPaneLaz.pas new file mode 100644 index 000000000..10437fe77 --- /dev/null +++ b/components/jvcllaz/packages/JvNavigationPaneLaz.pas @@ -0,0 +1,21 @@ +{ This file was automatically created by Lazarus. Do not edit! +This source is only used to compile and install the package. + } + +unit JvNavigationPaneLaz; + +interface + +uses + JvNavigationPaneReg, JvNavigationPane, LazarusPackageIntf; + +implementation + +procedure Register; +begin + RegisterUnit('JvNavigationPaneReg', @JvNavigationPaneReg.Register); +end; + +initialization + RegisterPackage('JvNavigationPaneLaz', @Register); +end. diff --git a/components/jvcllaz/packages/JvNavigationPaneReg.pp b/components/jvcllaz/packages/JvNavigationPaneReg.pp new file mode 100644 index 000000000..c5e9601cb --- /dev/null +++ b/components/jvcllaz/packages/JvNavigationPaneReg.pp @@ -0,0 +1,26 @@ +unit JvNavigationPaneReg; + +{$mode objfpc}{$H+} + +interface + +uses + Classes, LResources, SysUtils; + +procedure Register; + +implementation + uses JvNavigationPane; + +procedure Register; +begin + RegisterComponents('JvNavPane',[TJvNavigationPane, TJvNavIconButton, + TJvNavPanelButton, TJvNavPanelHeader, TJvNavPanelDivider, TJvOutlookSplitter, + TJvNavPaneStyleManager, TJvNavPaneToolPanel]); +end; + +initialization + {$I JvNavigationPaneLaz.lrs} + +end. + diff --git a/components/jvcllaz/packages/JvXPBarLaz.lpk b/components/jvcllaz/packages/JvXPBarLaz.lpk index ef80e5236..ea3893301 100644 --- a/components/jvcllaz/packages/JvXPBarLaz.lpk +++ b/components/jvcllaz/packages/JvXPBarLaz.lpk @@ -43,14 +43,17 @@ - + - - + + + + + diff --git a/components/jvcllaz/resource/JvNavigationPaneLaz.lrs b/components/jvcllaz/resource/JvNavigationPaneLaz.lrs new file mode 100644 index 000000000..4d186b3f4 --- /dev/null +++ b/components/jvcllaz/resource/JvNavigationPaneLaz.lrs @@ -0,0 +1,561 @@ +LazarusResources.Add('TJVNAVIGATIONPANE','BMP',[ + 'BMv'#6#0#0#0#0#0#0'6'#4#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#8#0#0#0#0#0'@'#2#0 + +#0#146#11#0#0#146#11#0#0#0#1#0#0#0#1#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128 + +#128#0#128#0#0#0#128#0#128#0#128#128#0#0#192#192#192#0#192#220#192#0#240#202 + +#166#0#0' @'#0#0' `'#0#0' '#128#0#0' '#160#0#0' '#192#0#0' '#224#0#0'@'#0#0#0 + +'@ '#0#0'@@'#0#0'@`'#0#0'@'#128#0#0'@'#160#0#0'@'#192#0#0'@'#224#0#0'`'#0#0#0 + +'` '#0#0'`@'#0#0'``'#0#0'`'#128#0#0'`'#160#0#0'`'#192#0#0'`'#224#0#0#128#0#0 + +#0#128' '#0#0#128'@'#0#0#128'`'#0#0#128#128#0#0#128#160#0#0#128#192#0#0#128 + +#224#0#0#160#0#0#0#160' '#0#0#160'@'#0#0#160'`'#0#0#160#128#0#0#160#160#0#0 + +#160#192#0#0#160#224#0#0#192#0#0#0#192' '#0#0#192'@'#0#0#192'`'#0#0#192#128#0 + +#0#192#160#0#0#192#192#0#0#192#224#0#0#224#0#0#0#224' '#0#0#224'@'#0#0#224'`' + +#0#0#224#128#0#0#224#160#0#0#224#192#0#0#224#224#0'@'#0#0#0'@'#0' '#0'@'#0'@' + +#0'@'#0'`'#0'@'#0#128#0'@'#0#160#0'@'#0#192#0'@'#0#224#0'@ '#0#0'@ '#0'@ @' + +#0'@ `'#0'@ '#128#0'@ '#160#0'@ '#192#0'@ '#224#0'@@'#0#0'@@ '#0'@@@'#0'@@`' + +#0'@@'#128#0'@@'#160#0'@@'#192#0'@@'#224#0'@`'#0#0'@` '#0'@`@'#0'@``'#0'@`' + +#128#0'@`'#160#0'@`'#192#0'@`'#224#0'@'#128#0#0'@'#128' '#0'@'#128'@'#0'@' + +#128'`'#0'@'#128#128#0'@'#128#160#0'@'#128#192#0'@'#128#224#0'@'#160#0#0'@' + +#160' '#0'@'#160'@'#0'@'#160'`'#0'@'#160#128#0'@'#160#160#0'@'#160#192#0'@' + +#160#224#0'@'#192#0#0'@'#192' '#0'@'#192'@'#0'@'#192'`'#0'@'#192#128#0'@'#192 + +#160#0'@'#192#192#0'@'#192#224#0'@'#224#0#0'@'#224' '#0'@'#224'@'#0'@'#224'`' + +#0'@'#224#128#0'@'#224#160#0'@'#224#192#0'@'#224#224#0#128#0#0#0#128#0' '#0 + +#128#0'@'#0#128#0'`'#0#128#0#128#0#128#0#160#0#128#0#192#0#128#0#224#0#128' ' + +#0#0#128' '#0#128' @'#0#128' `'#0#128' '#128#0#128' '#160#0#128' '#192#0#128 + +' '#224#0#128'@'#0#0#128'@ '#0#128'@@'#0#128'@`'#0#128'@'#128#0#128'@'#160#0 + +#128'@'#192#0#128'@'#224#0#128'`'#0#0#128'` '#0#128'`@'#0#128'``'#0#128'`' + +#128#0#128'`'#160#0#128'`'#192#0#128'`'#224#0#128#128#0#0#128#128' '#0#128 + +#128'@'#0#128#128'`'#0#128#128#128#0#128#128#160#0#128#128#192#0#128#128#224 + +#0#128#160#0#0#128#160' '#0#128#160'@'#0#128#160'`'#0#128#160#128#0#128#160 + +#160#0#128#160#192#0#128#160#224#0#128#192#0#0#128#192' '#0#128#192'@'#0#128 + +#192'`'#0#128#192#128#0#128#192#160#0#128#192#192#0#128#192#224#0#128#224#0#0 + +#128#224' '#0#128#224'@'#0#128#224'`'#0#128#224#128#0#128#224#160#0#128#224 + +#192#0#128#224#224#0#192#0#0#0#192#0' '#0#192#0'@'#0#192#0'`'#0#192#0#128#0 + +#192#0#160#0#192#0#192#0#192#0#224#0#192' '#0#0#192' '#0#192' @'#0#192' `'#0 + +#192' '#128#0#192' '#160#0#192' '#192#0#192' '#224#0#192'@'#0#0#192'@ '#0#192 + +'@@'#0#192'@`'#0#192'@'#128#0#192'@'#160#0#192'@'#192#0#192'@'#224#0#192'`'#0 + +#0#192'` '#0#192'`@'#0#192'``'#0#192'`'#128#0#192'`'#160#0#192'`'#192#0#192 + +'`'#224#0#192#128#0#0#192#128' '#0#192#128'@'#0#192#128'`'#0#192#128#128#0 + +#192#128#160#0#192#128#192#0#192#128#224#0#192#160#0#0#192#160' '#0#192#160 + +'@'#0#192#160'`'#0#192#160#128#0#192#160#160#0#192#160#192#0#192#160#224#0 + +#192#192#0#0#192#192' '#0#192#192'@'#0#192#192'`'#0#192#192#128#0#192#192#160 + +#0#240#251#255#0#164#160#160#0#128#128#128#0#0#0#255#0#0#255#0#0#0#255#255#0 + +#255#0#0#0#255#0#255#0#255#255#0#0#255#255#255#0#199'>>>>>'#0#9#7'f'#7#9#236 + +#9'I'#9#254#252#252#252#252#252#252#252'>>>>>>'#0#9#7#164#8#9#236#9'II'#254 + +#252#252#251#251#252#252#252'>>>>>>'#0#9#9#7#8#9#9#9'I'#9#254#252#251#252#252 + +#251#252#252'?>>>>>'#0#9#9#9#9#9#9#9#9#9#254#252#251#252#252#251#252#252'??>' + +'>>>'#0#0#0#0#0#0#0#0#0#0#254#252#252#252#252#251#252#252'???>>>'#0#9#9#9#9#9 + +#9#9#9#9#254#252#252#252#252#251#252#252'????>>'#0#9#237#236#236#236#163#9#9 + +#9#254#252#252#252#252#251#252#252'?????>'#0#9#9#9#7#174#247#9#9'I'#254#252 + +#252#252#252#252#252#252'??????'#0#9#7#9#7#175#247#9'I'#9#254#254#254#254#254 + +#254#254#254'??????'#0#9#9#9#9#9#227#9'Q'#9#9#9#146#9'R'#9#9'R??????'#0#9#229 + +#229#229#220#220#9#9'RR'#9#9#9#9#9#9#9'??????'#0#9#9#9#9#9#9#9#9#9#9#9#9#9#9 + +#9#9#9'??????'#0#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217 + +#217#217'??????'#0#217#217#217#217#217#217'R'#255'R'#255'R'#255'R'#255'R'#255 + +#217'??????'#0#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218 + +#218#218'??????'#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255'??????'#0#255#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255'??????'#0#255#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255'??????'#0#255#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255'??????'#0#255#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255'??????'#0#255#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255'7?????'#0#255#255#255#255#255#255#255#255 + +#255#255#255#255#255#255#255#255#255'77????'#0#218#218#218#218#218#218#218 + +#218#218#218#218#218#218#218#218#218#218'777???'#0#218#218#218#218#218#218 + +#218#218#218#218#218#218#218#218#218#218#218 +]); +LazarusResources.Add('TJVNAVICONBUTTON','BMP',[ + 'BMv'#6#0#0#0#0#0#0'6'#4#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#8#0#0#0#0#0'@'#2#0 + +#0'R'#11#0#0'R'#11#0#0#0#1#0#0#0#1#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128#128 + +#0#128#0#0#0#128#0#128#0#128#128#0#0#192#192#192#0#192#220#192#0#240#202#166 + +#0#16#156#247#0#255#0#0#0#255#255#0#0#0#231#165#0#0#231#198#0#198#0#231#0#0 + +#198#231#0#0#231#231#0#8#148#239#0#16#148#239#0#16#156#247#0#24#156#247#0'!' + +#165#247#0')'#165#247#0'1'#173#247#0'1'#181#247#0'9'#181#247#0'B'#189#247#0 + +'J'#189#247#0'R'#198#247#0'Z'#198#255#0'Z'#206#255#0'c'#206#255#0'k'#214#255 + +#0's'#214#255#0'{'#222#255#0#132#231#255#0#140#231#255#0#0#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#240#251#255#0#164#160 + +#160#0#128#128#128#0#0#0#255#0#0#255#0#0#0#255#255#0#255#0#0#0#255#0#255#0 + +#255#255#0#0#255#255#255#0#15#14#14#14#14#14#14#14#14#14#14#14#14#13#13#13#12 + +#11#11#11#11#11#11#11#14#18#18#18#18#18#18#18#18#18#18#18#18#18#18#18#12#11 + +#11'&&'#11#11#11#14#19#19#19#19#19#19#19#19#19#19#19#19#19#19#19#12#11'&'#11 + +#11'&'#11#11#17#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#12#11'&'#11#11 + +'&'#11#11#17#21#21#21#21#21#21#21#21#21#21#21#21#21#21#21#12#11#11#11#11'&' + +#11#11#17#22#22#22#22#22#22#22#22#22#22#22#22#22#22#22#12#11#11#11#11'&'#11 + +#11#17#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#12#11#11#11#11'&'#11#11 + +#17#24#24#24#24#24#24#24#24#24#24#0#24#24#24#24#12#11#11#11#11#11#11#11#17#25 + +#25#25#25#25#25#25#25#25#0#0#0#25#25#25#12#12#12#12#12#12#12#12#17#26#26#26 + +#26#26#26#26#26#0#0#0#0#0#26#26#26#26#26#26#26#26#26#14#17#27#27#27#27#27#27 + +#27#27#27#27#27#27#27#27#27#27#27#27#27#27#27#27#14#17#28#28#28#28#28#28#28 + +#28#28#28#28#28#28#28#28#28#28#28#28#28#28#28#14#17#29#29#29#29#29#29#29#29 + +#29#29#29#29#29#29#29#29#29#29#29#29#29#29#14#17#30#30#30#30#30#30#30#0#0#30 + +#0#0#30#30#30#30#30#30#30#30#30#30#14#17#31#31#31#31#31#31#31#31#0#0#31#0#0 + +#31#31#31#31#31#31#31#31#31#14#17' '#0#0' '#0#0' '#14#17'!!!!' + +'!!!!'#0#0'!'#0#0'!!!!!!!!!'#14#17'"""""""'#0#0'"'#0#0'""""""""""'#14#17'###' + ,'###################'#14#17'######################'#14#17'$$$$$$$$$$$$$$$$$$' + +'$$$$'#14#16'%%%%%%%%%%%%%%%%%%%%%%'#14#16#16#17#17#17#17#17#17#17#17#17#17 + +#17#17#17#17#17#17#17#17#14#14#14#14#16#16#16#17#17#17#17#17#17#17#17#17#17 + +#17#17#17#17#17#17#17#17#14#14#14 +]); +LazarusResources.Add('TJVNAVPANELBUTTON','BMP',[ + 'BMv'#6#0#0#0#0#0#0'6'#4#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#8#0#0#0#0#0'@'#2#0 + +#0'R'#11#0#0'R'#11#0#0#0#1#0#0#0#1#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128#128 + +#0#128#0#0#0#128#0#128#0#128#128#0#0#192#192#192#0#192#220#192#0#240#202#166 + +#0'J91'#0#255#0#0#0#255#255#0#0#24#16#16#0'!'#24#16#0'!'#24#24#0')'#24#24#0 + +')!'#24#0'1)!'#0'J9)'#0'J91'#0'cRB'#0'kRB'#0'kRJ'#0'{cR'#0'{kZ'#0#140'sZ'#0 + +#148'sZ'#0#148'sc'#0#148'{c'#0#165'{c'#0#148'{k'#0#173#132'k'#0#173#140's'#0 + +#181#140's'#0#189#148's'#0#181#148'{'#0#181#156'{'#0#189#156'{'#0#206#156'{' + +#0#181#148#132#0#206#156#132#0#198#165#132#0#214#165#132#0#239#173#132#0#239 + +#181#132#0#189#156#140#0#206#165#140#0#214#173#140#0#222#173#140#0#231#181 + +#140#0#239#181#140#0#214#181#148#0#222#181#148#0#239#181#148#0#247#189#148#0 + +#222#189#156#0#231#189#156#0#247#198#156#0#231#198#165#0#239#198#165#0#247 + +#198#165#0#0#231#165#0#239#206#173#0#247#206#173#0#198#181#181#0#222#198#181 + +#0#255#214#181#0#222#198#189#0#222#206#189#0#255#214#189#0#255#222#189#0#222 + +#206#198#0#222#214#198#0#231#214#198#0#255#222#198#0#0#231#198#0#231#214#206 + +#0#231#222#206#0#255#231#206#0#231#222#214#0#198#0#231#0#0#198#231#0#0#231 + +#231#0#0#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#240#251#255#0#164#160#160#0#128#128#128#0 + +#0#0#255#0#0#255#0#0#0#255#255#0#255#0#0#0#255#0#255#0#255#255#0#0#255#255 + +#255#0'QLLLLLLLLLLLL>>>'#12#11#11#11#11#11#11#11'LLLLLLLLLLLLLL>>'#12#11#11 + +'TT'#11#11#11'LLLLLLLLLLLLLLL>'#12#11'T'#11#11'T'#11#11'SLLLLLLLLLLLLLLL'#12 + +#11'T'#11#11'T'#11#11'SSLLLLLLLLLLLLLL'#12#11#11#11#11'T'#11#11'SSSLLLLLLLLL' + +'LLLL'#12#11#11#11#11'T'#11#11'SA(((((((((((((('#12#11#11#11#11'T'#11#11'SB,' + +',,,,,,,,,,,,,'#12#11#11#11#11#11#11#11'SB,,,,,,,,,,,,,,'#12#12#12#12#12#12 + +#12#12'SB3333333333333333333333SB6666666666666666666666SD7777" 71 ''1 ++ 1' + +''' #2SE::::'#15#24#10#27#10#24#10#22#10#24'0'#17#28')'#14'!'#17#30'SE====' + +#15'!'#22#22#15'!'#22#22#15'!='#0'00'#0'='#15#26'SH===='#15#10#18'&'#15'$'#23 + +#23#15#21'*'#0#24'*'#18#26#18'!SH@@@@'#15#25#10#29'4<88'#15#31';'#0'$<848'#9 + +'SH@@@@.((@@@@@.;@('#9'@@@@@SJCCCCCCCCCCCCCCCCCCCCCCSMGGGGGGGGGGGGGGGGGGGGGG' + +'SMKKKKKKKKKKKKKKKKKKKKKKSMOOOOOOOOOOOOOOOOOOOOOORNOOOOOOOOOOOOOOOOOOOOOORRS' + +'SSSSSSSSSSSSSSSSSLLLLRRRSSSSSSSSSSSSSSSSSSLLL' +]); +LazarusResources.Add('TJVNAVPANELHEADER','BMP',[ + 'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0 + +#192#6#0#0'R'#11#0#0'R'#11#0#0#0#0#0#0#0#0#0#0#192#0#224#0#224#192#0#224#192 + +#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224 + +#192#0#224#192#0#224#192#0#224#160#0#224#160#0#224#160#255#255#0#255#0#0#255 + +#0#0#255#0#0#255#0#0#255#0#0#255#0#0#255#0#0#0#224#192#0#224#192#0#224#192#0 + +#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224 + +#192#0#224#192#0#224#192#0#224#192#0#224#160#0#224#160#255#255#0#255#0#0#255 + +#0#0#0#255#255#0#255#255#255#0#0#255#0#0#255#0#0#0#224#192#0#224#192#0#224 + +#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0 + +#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#160#255#255#0#255#0#0 + +#0#255#255#255#0#0#255#0#0#0#255#255#255#0#0#255#0#0#0#224#224#0#224#192#0 + +#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224 + +#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#255#255#0 + +#255#0#0#0#255#255#255#0#0#255#0#0#0#255#255#255#0#0#255#0#0#0#224#224#0#224 + +#224#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0 + +#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#255#255 + +#0#255#0#0#255#0#0#255#0#0#255#0#0#0#255#255#255#0#0#255#0#0#0#224#224#0#224 + +#224#0#224#224#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0 + +#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#0#224#192#255#255 + +#0#255#0#0#255#0#0#255#0#0#255#0#0#0#255#255#255#0#0#255#0#0#0#224#224#148'8' + +#6#148'B'#16#148'B'#16#148'B'#16#148'B'#16#148'B'#16#148'B'#16#148'B'#16#148 + +'B'#16#148'B'#16#148'B'#16#148'B'#16#148'B'#16#148'B'#16#148'B'#16#255#255#0 + +#255#0#0#255#0#0#255#0#0#255#0#0#0#255#255#255#0#0#255#0#0#0#224#224#150'9'#7 + +#154'F'#18#154'F'#18#154'F'#18#154'F'#18#154'F'#18#154'F'#18#154'F'#18#154'F' + +#18#154'F'#18#154'F'#18#154'F'#18#154'F'#18#154'F'#18#154'F'#18#255#255#0#255 + +#0#0#255#0#0#255#0#0#255#0#0#255#0#0#255#0#0#255#0#0#0#224#224#152'<'#10#157 + +'K'#24#157'K'#24#157'K'#24#157'K'#24#157'K'#24#157'K'#24#157'K'#24#157'K'#24 + +#157'K'#24#157'K'#24#157'K'#24#157'K'#24#157'K'#24#157'K'#24#255#255#0#255 + +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#0#224#224 + +#155'='#10#165'O'#24#165'O'#24#165'O'#24#165'O'#24#165'O'#24#165'O'#24#165'O' + +#24#165'O'#24#165'O'#24#165'O'#24#165'O'#24#165'O'#24#165'O'#24#165'O'#24#165 + +'O'#24#165'O'#24#165'O'#24#165'O'#24#165'O'#24#165'O'#24#165'O'#24#165'O'#24 + +#0#224#224#156'?'#14#168'U!'#168'U!'#189#128'Y'#187'|T'#168'U!'#188'~W'#168 + +'U!'#185'xO'#191#132'^'#168'U!'#191#132'^'#203#157#128#190#130'\'#196#144'n' + +#183'tJ'#203#157#128#169'V#'#197#146'p'#178'j='#168'U!'#168'U!'#168'U!'#0#224 + +#224#158'A'#15#173'Y#'#173'Y#'#221#187#165#217#179#154#195#135'`'#249#244#241 + +#199#143'j'#212#169#141#226#197#178#188'wK'#248#242#238#231#208#193#236#217 + +#205#235#215#203#185'sE'#255#255#255#175'])'#241#228#219#197#138'd'#173'Y#' + +#173'Y#'#173'Y#'#0#224#224#161'C'#17#178'])'#178'])'#224#189#168#219#180#156 + +#209#158''#248#242#237#213#167#139#215#171#144#228#198#180#192'{P'#249#243 + +#239#209#161#130#214#168#141#236#215#202#187'o@'#255#255#255#180'a.'#242#228 + +#220#201#141'h'#178'])'#178'])'#178'])'#0#224#224#162'E'#19#181'a-'#181'a-' + +#224#190#170#221#182#158#246#237#232#212#165#136#251#246#243#216#173#147#229 + +#199#181#181'a-'#201#140'i'#234#211#197#255#255#255#236#216#203#189'rD'#255 + +#255#255#182'e3'#243#229#221#202#143'k'#181'a-'#181'a-'#181'a-'#0#224#224#165 + +'G'#21#189'f1'#189'f1'#228#193#171#224#185#160#238#217#204#205#140'c'#240#222 + +#210#221#176#149#231#201#182#203#135']'#251#247#245#217#167#137#231#200#181 + +#238#217#204#196'wG'#255#255#255#190'j6'#244#230#221#208#147'n'#189'f1'#189 + +'f1'#189'f1'#0#224#224#165'I'#24#189'j7'#189'j7'#228#194#174#250#245#241#232 + +#204#187#189'j7'#229#197#177#250#243#239#231#202#185#191'n>'#222#183#158#236 + +#213#198#236#213#198#203#138'c'#194'uG'#236#213#198#190'l;'#244#230#222#208 + +#150's'#189'j7'#189'j7'#189'j7'#0#224#224#168'K'#25#195'o:'#195'o:'#230#196 + +#175#255#255#255#212#151'o'#195'o:'#209#143'd'#255#255#255#234#204#186#195'o' + +':'#195'o:'#195'o:'#195'o:'#195'o:'#199'zI'#236#213#198#196'r>'#245#231#223 + +#213#154't'#195'o:'#195'o:'#195'o:'#0#224#224#169'M'#28#198'sB'#198'sB'#212 + +#151'r'#222#176#147#200'yJ'#198'sB'#199'vF'#222#176#147#213#154'v'#198'sB' + +#198'sB'#198'sB'#198'sB'#198'sB'#200'yJ'#222#176#147#198'tD'#218#166#133#205 + +#133'Z'#198'sB'#198'sB'#198'sB'#0#224#224#173'O'#30#206'yE'#206'yE'#206'yE' + +#206'yE'#206'yE'#206'yE'#206'yE'#206'yE'#206'yE'#206'yE'#206'yE'#206'yE'#206 + +'yE'#206'yE'#206'yE'#206'yE'#206'yE'#206'yE'#206'yE'#206'yE'#206'yE'#206'yE' + +#0#224#224#174'Q'#31#208'}J'#208'}J'#208'}J'#208'}J'#208'}J'#208'}J'#208'}J' + +#208'}J'#208'}J'#208'}J'#208'}J'#208'}J'#208'}J'#208'}J'#208'}J'#208'}J'#208 + +'}J'#208'}J'#208'}J'#208'}J'#208'}J'#208'}J'#0#224#224#176'S '#214#130'K'#214 + +#130'K'#214#130'K'#214#130'K'#214#130'K'#214#130'K'#214#130'K'#214#130'K'#214 + ,#130'K'#214#130'K'#214#130'K'#214#130'K'#214#130'K'#214#130'K'#214#130'K'#214 + +#130'K'#214#130'K'#214#130'K'#214#130'K'#214#130'K'#214#130'K'#214#130'K'#0 + +#192#224#160'?'#15#176'T#'#176'T#'#176'T#'#176'T#'#176'T#'#176'T#'#176'T#' + +#176'T#'#176'T#'#176'T#'#176'T#'#176'T#'#176'T#'#176'T#'#176'T#'#176'T#'#176 + +'T#'#176'T#'#176'T#'#176'T#'#176'T#'#176'T#'#0#192#224#0#192#224#0#224#224#0 + +#224#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224 + +#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224#224#0 + +#224#224#0#224#224#0#224#192#0#224#192#0#224#192#0#224#192#0#192#224#0#192 + +#224#0#192#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224#224#0 + +#224#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224 + +#224#0#224#224#0#224#224#0#224#224#0#224#224#0#224#192#0#224#192#0#224#192 +]); +LazarusResources.Add('TJVNAVPANELDIVIDER','BMP',[ + 'BMv'#6#0#0#0#0#0#0'6'#4#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#8#0#0#0#0#0'@'#2#0 + +#0'R'#11#0#0'R'#11#0#0#0#1#0#0#0#1#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128#128 + +#0#128#0#0#0#128#0#128#0#128#128#0#0#192#192#192#0#192#220#192#0#240#202#166 + +#0'J91'#0#255#255#0#0#16#16#8#0#165'B'#16#0'!'#24#24#0'!!'#24#0'1!'#24#0'9)!' + +#0'B1)'#0'J1)'#0'J91'#0'R91'#0'cR9'#0'cJB'#0'cRB'#0'kRB'#0'kRJ'#0'kZJ'#0'sZJ' + +#0#132'cJ'#0#132'cR'#0#132'kZ'#0#156'{k'#0#173#140'k'#0#181#140'k'#0#181#140 + +'s'#0#189#148's'#0#181#148'{'#0#189#148'{'#0#181#156'{'#0#198#156'{'#0#206 + +#165'{'#0#181#156#132#0#189#156#132#0#206#165#132#0#214#165#132#0#239#173#132 + +#0#189#165#140#0#198#165#140#0#214#165#140#0#214#173#140#0#222#173#140#0#231 + +#181#140#0#239#181#140#0#206#173#148#0#214#173#148#0#214#181#148#0#231#181 + +#148#0#239#189#148#0#222#189#156#0#247#189#156#0#231#189#165#0#231#198#165#0 + +#247#198#165#0#0#231#165#0#247#206#173#0#247#214#181#0#255#214#181#0#255#222 + +#198#0#0#231#198#0#255#231#198#0#255#231#206#0#198#0#231#0#0#198#231#0#0#231 + +#231#0#0#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255 + +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0 + +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255 + +#255#255#0#240#251#255#0#164#160#160#0#128#128#128#0#0#0#255#0#0#255#0#0#0 + +#255#255#0#255#0#0#0#255#0#255#0#255#255#0#0#255#255#255#0'HEEEEEEEEEEEE@@@' + +#11#252#252#252#252#252#252#252'EEEEEEEEEEEEEE@@'#11#252#252'KK'#252#252#252 + +'EEEEEEEEEEEEEEE@'#11#252'K'#252#252'K'#252#252'JEEEEEEEEEEEEEEE'#11#252'K' + +#252#252'K'#252#252'JJEEEEEEEEEEEEEE'#11#252#252#252#252'K'#252#252'JJJEEEEE' + +'EEEEEEEE'#11#252#252#252#252'K'#252#252'J'#13#13#13#13#13#13#13#13#13#13#13 + +#13#13#13#13#11#252#252#252#252'K'#252#252'J...............'#11#252#252#252 + +#252#252#252#252'J...............'#11#11#11#11#11#11#11#11'J5555555555555555' + +'5555555J:::::-'#16#16#16'(:$'#30'::'#21'::'#30'$4'#16#16'J:::::,'#18'44'#21 + +')!'#24':3'#17'3:'#25'!'#16'44J<<<<<1'#10'<<<'#15'#'#25'<'#18','#17'<'#25'#' + +#15'< OldHitTest then begin Rect := Bounds(0, FTopSpace, Width, FHeaderHeight); // header - Invalidate; + InvalidateRect(Handle, @Rect, False); if FShowLinkCursor then if FHitTest <> htNone then Cursor := crHandPoint @@ -2073,6 +2081,10 @@ var ACanvas.Font.Color := FHotTrackColor; ARect.Bottom := ARect.Top + FHeaderHeight; Dec(ARect.Right, 3); + //{$IFDEF USEJVCL} + //DrawText(ACanvas, Caption, -1, ARect, + // DT_SINGLELINE or DT_LEFT or DT_VCENTER or DT_END_ELLIPSIS or DT_NOPREFIX); + //{$ELSE} DrawText(ACanvas.Handle, PChar(Caption), Length(Caption), ARect, DT_SINGLELINE or DT_LEFT or DT_VCENTER or DT_END_ELLIPSIS or DT_NOPREFIX); end; diff --git a/components/jvcllaz/run/JvXPCore.pas b/components/jvcllaz/run/JvXPCore.pas index f6ab4c0f1..e12aa6ec7 100644 --- a/components/jvcllaz/run/JvXPCore.pas +++ b/components/jvcllaz/run/JvXPCore.pas @@ -34,9 +34,9 @@ unit JvXPCore; interface uses - Classes, Controls, Forms, Graphics, LCLIntf, LCLType, LMessages; + Classes, Controls, Forms, Graphics, JvComponent, LCLIntf, LCLType, LMessages; -(* 23.09.2007 - SESS - unused +(******************** NOT CONVERTED const { color constants. @@ -82,7 +82,7 @@ type blRight, // right line blBottom // bottom line ); -23.09.2007 - SESS - unused *) +******************** NOT CONVERTED *) type TJvXPControlStyle = set of @@ -111,7 +111,7 @@ type dsFocused // focused ); -(* 23.09.2007 - SESS - unused +(******************** NOT CONVERTED TJvXPGlyphLayout = ( glBottom, // bottom glyph @@ -135,7 +135,7 @@ type published property Version: string read FVersion write SetVersion stored False; end; -23.09.2007 - SESS - unused *) +******************** NOT CONVERTED *) type TJvXPWinControl = class(TWinControl) @@ -145,7 +145,7 @@ type { baseclass for focusable control descendants. } - TJvXPCustomControl = class(TCustomControl) + TJvXPCustomControl = class(TJvCustomControl) private FClicking: Boolean; FDrawState: TJvXPDrawState; @@ -154,7 +154,6 @@ type FModalResult: TModalResult; FOnMouseLeave: TNotifyEvent; FOnMouseEnter: TNotifyEvent; - FVersion: string; procedure SetVersion(const Value: string); procedure CMFocusChanged(var Msg: TLMessage); message CM_FOCUSCHANGED; procedure CMDialogChar(var Msg: TCMDialogChar); message CM_DIALOGCHAR; @@ -164,7 +163,7 @@ type procedure CMMouseLeave(var Msg: TLMessage); message CM_MOUSELEAVE; procedure CMParentColorChanged(var Msg: TLMessage); message CM_PARENTCOLORCHANGED; - //21.09.07 - SESS + //LCL doesnt fire it //procedure CMParentFontChanged(var Msg: TLMessage); message CM_PARENTFONTCHANGED; procedure CMTextChanged(var Msg: TLMessage); message CM_TEXTCHANGED; @@ -202,11 +201,9 @@ type property DrawState: TJvXPDrawState read FDrawState write FDrawState; property IsLocked: Boolean read FIsLocked write FIsLocked; property IsSibling: Boolean read FIsSibling write FIsSibling; - published - property Version: string read FVersion write SetVersion stored False; end; -(* 23.09.2007 - SESS - unused +(******************** NOT CONVERTED TJvXPUnlimitedControl = class(TJvXPCustomControl) published //property BevelInner; @@ -226,10 +223,7 @@ type property Constraints; property DragCursor; property DragKind; - - //21.09.07 - SESS resolver - //property OnCanResize; - + property OnCanResize; property DragMode; //property Enabled; property Font; @@ -310,13 +304,13 @@ type property Style: TJvXPStyle read FStyle write FStyle; property StyleManager: TJvXPStyleManager read FStyleManager write SetStyleManager; end; -23.09.2007 - SESS - unused *) +******************** NOT CONVERTED *) TJvXPGradientColors = 2..255; TJvXPGradientStyle = (gsLeft, gsTop, gsRight, gsBottom); -(* 23.09.2007 - SESS - unused +(******************** NOT CONVERTED TJvXPGradient = class(TPersistent) private FColors: TJvXPGradientColors; @@ -346,34 +340,32 @@ type property StartColor: TColor read FStartColor write SetStartColor default clGray; property Style: TJvXPGradientStyle read FGradientStyle write SetGradientStyle default gsLeft; end; -23.09.2007 - SESS - unused *) +******************** NOT CONVERTED *) implementation -(* 23.09.2007 - SESS - Original strings -uses - JvXPCoreUtils; - +(******************** NOT CONVERTED +{$IFNDEF USEJVCL} resourcestring RsCopyright = 'Design eXperience. (c) 2002 M. Hoffmann Version '; RsCopyright2 = 'Design eXperience II - (c) 2002 M. Hoffmann Version '; RsVersion = '2.0.1'; // always increase version number on new releases! -*) - -(* 23.09.2007 - SESS - unused +{$ENDIF !USEJVCL} //=== { TJvXPCustomComponent } =============================================== constructor TJvXPCustomComponent.Create(AOwner: TComponent); begin inherited Create(AOwner); + {$IFNDEF USEJVCL} FVersion := RsCopyright + RsVersion; + {$ENDIF !USEJVCL} end; procedure TJvXPCustomComponent.SetVersion(const Value: string); begin // do not enable overwriting this constant. end; -23.09.2007 - SESS - unused *) +******************** NOT CONVERTED *) //=== { TJvXPCustomControl } ================================================= @@ -390,9 +382,6 @@ begin FIsLocked := False; FIsSibling := False; FModalResult := 0; - // 23.09.2007 - SESS - // FVersion := RsCopyright2 + RsVersion; - FVersion := 'JvXP (JVCL) for Lazarus 1.0'; end; procedure TJvXPCustomControl.SetVersion(const Value: string); @@ -482,7 +471,7 @@ begin HookParentColorChanged; end; -//21.09.07 - SESS resolver +//LCL doesnt fire it... (* procedure TJvXPCustomControl.CMParentFontChanged(var Msg: TLMessage); begin @@ -650,7 +639,7 @@ begin // does the cursor is over another supported control? GetCursorPos(CurrentPos); - //21.09.2007 - SESS resolver + //TODO: //NewControl := FindVCLWindow(CurrentPos); NewControl := nil; if (NewControl <> nil) and (NewControl <> Self) and @@ -694,7 +683,7 @@ begin InternalRedraw; end; -(* 23.09.2007 - SESS - unused +(******************** NOT CONVERTED //=== { TJvXPStyle } ========================================================= constructor TJvXPStyle.Create(AOwner: TComponent); @@ -908,6 +897,7 @@ begin Parent.InternalRedraw; end; end; -*) +******************** NOT CONVERTED *) + end. diff --git a/components/jvcllaz/run/JvXPCoreUtils.pas b/components/jvcllaz/run/JvXPCoreUtils.pas index dadb05783..7aed02eb3 100644 --- a/components/jvcllaz/run/JvXPCoreUtils.pas +++ b/components/jvcllaz/run/JvXPCoreUtils.pas @@ -40,7 +40,7 @@ uses function JvXPMethodsEqual(const Method1, Method2: TMethod): Boolean; procedure JvXPDrawLine(const ACanvas: TCanvas; const X1, Y1, X2, Y2: Integer); -(* 23.09.2007 - SESS - unused +(******************** NOT CONVERTED - NOT USED procedure JvXPCreateGradientRect(const AWidth, AHeight: Integer; const StartColor, EndColor: TColor; const AColors: TJvXPGradientColors; const Style: TJvXPGradientStyle; const Dithered: Boolean; var Bitmap: TBitmap); @@ -57,17 +57,19 @@ procedure JvXPConvertToGray2(Bitmap: TBitmap); procedure JvXPRenderText(const AParent: TControl; const ACanvas: TCanvas; ACaption: TCaption; const AFont: TFont; const AEnabled, AShowAccelChar: Boolean; var ARect: TRect; AFlags: Integer); -23.09.2007 - SESS - unused *) +******************** NOT CONVERTED *) + procedure JvXPFrame3D(const ACanvas: TCanvas; const ARect: TRect; const TopColor, BottomColor: TColor; const Swapped: Boolean = False); -(* 23.09.2007 - SESS - unused + +(******************** NOT CONVERTED - NOT USED procedure JvXPColorizeBitmap(Bitmap: TBitmap; const AColor: TColor); procedure JvXPSetDrawFlags(const AAlignment: TAlignment; const AWordWrap: Boolean; var Flags: Integer); procedure JvXPPlaceText(const AParent: TControl; const ACanvas: TCanvas; const AText: TCaption; const AFont: TFont; const AEnabled, AShowAccelChar: Boolean; const AAlignment: TAlignment; const AWordWrap: Boolean; var Rect: TRect); -23.09.2007 - SESS - unused *) +******************** NOT CONVERTED *) implementation @@ -76,7 +78,7 @@ begin Result := (Method1.Code = Method2.Code) and (Method1.Data = Method2.Data); end; -(* 23.09.2007 - SESS - unused +(******************** NOT USED procedure JvXPCreateGradientRect(const AWidth, AHeight: Integer; const StartColor, EndColor: TColor; const AColors: TJvXPGradientColors; const Style: TJvXPGradientStyle; const Dithered: Boolean; var Bitmap: TBitmap); @@ -220,7 +222,7 @@ begin end; end; end; -*) +******************** NOT USED *) procedure JvXPDrawLine(const ACanvas: TCanvas; const X1, Y1, X2, Y2: Integer); begin @@ -231,7 +233,7 @@ begin end; end; -(* 23.09.2007 - SESS - unused +(******************** NOT CONVERTED - NOT USED procedure JvXPAdjustBoundRect(const BorderWidth: Byte; const ShowBoundLines: Boolean; const BoundLines: TJvXPBoundLines; var Rect: TRect); @@ -322,7 +324,7 @@ begin DoDrawText; end; end; -23.09.2007 - SESS - unused *) +******************** NOT CONVERTED *) procedure JvXPFrame3D(const ACanvas: TCanvas; const ARect: TRect; const TopColor, BottomColor: TColor; const Swapped: Boolean = False); @@ -352,7 +354,7 @@ begin end; end; -(* 23.09.2007 - SESS - unused +(******************** NOT CONVERTED procedure JvXPColorizeBitmap(Bitmap: TBitmap; const AColor: TColor); var ColorMap: TBitmap; @@ -413,7 +415,7 @@ begin OffsetRect(Rect, DX, (OH - Rect.Bottom) div 2); JvXPRenderText(AParent, ACanvas, AText, AFont, AEnabled, AShowAccelChar, Rect, Flags); end; -23.09.2007 - SESS - unused *) +******************** NOT CONVERTED *) end.