Стартовый пул
This commit is contained in:
563
bgracontrols/test/test_bcExpandPanels/test_bcExpandPanel.lpi
Normal file
563
bgracontrols/test/test_bcExpandPanels/test_bcExpandPanel.lpi
Normal file
@@ -0,0 +1,563 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<CONFIG>
|
||||
<ProjectOptions>
|
||||
<Version Value="12"/>
|
||||
<General>
|
||||
<Flags>
|
||||
<CompatibilityMode Value="True"/>
|
||||
</Flags>
|
||||
<Title Value="test_bcExpandPanel"/>
|
||||
<UseXPManifest Value="True"/>
|
||||
</General>
|
||||
<VersionInfo>
|
||||
<Language Value=""/>
|
||||
<CharSet Value=""/>
|
||||
</VersionInfo>
|
||||
<BuildModes Count="2" Active="Debug">
|
||||
<Item1 Name="Debug" Default="True"/>
|
||||
<Item2 Name="Release">
|
||||
<CompilerOptions>
|
||||
<Version Value="11"/>
|
||||
<SearchPaths>
|
||||
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||
</SearchPaths>
|
||||
<Parsing>
|
||||
<SyntaxOptions>
|
||||
<UseAnsiStrings Value="False"/>
|
||||
</SyntaxOptions>
|
||||
</Parsing>
|
||||
<CodeGeneration>
|
||||
<SmartLinkUnit Value="True"/>
|
||||
<Optimizations>
|
||||
<OptimizationLevel Value="3"/>
|
||||
</Optimizations>
|
||||
</CodeGeneration>
|
||||
<Linking>
|
||||
<Debugging>
|
||||
<GenerateDebugInfo Value="False"/>
|
||||
<RunWithoutDebug Value="True"/>
|
||||
</Debugging>
|
||||
<LinkSmart Value="True"/>
|
||||
<Options>
|
||||
<Win32>
|
||||
<GraphicApplication Value="True"/>
|
||||
</Win32>
|
||||
</Options>
|
||||
</Linking>
|
||||
</CompilerOptions>
|
||||
</Item2>
|
||||
</BuildModes>
|
||||
<PublishOptions>
|
||||
<Version Value="2"/>
|
||||
</PublishOptions>
|
||||
<RunParams>
|
||||
<local>
|
||||
<LaunchingApplication PathPlusParams="/usr/X11R6/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
|
||||
</local>
|
||||
<FormatVersion Value="2"/>
|
||||
<Modes Count="1">
|
||||
<Mode0 Name="default">
|
||||
<local>
|
||||
<LaunchingApplication PathPlusParams="/usr/X11R6/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
|
||||
</local>
|
||||
</Mode0>
|
||||
</Modes>
|
||||
</RunParams>
|
||||
<RequiredPackages Count="2">
|
||||
<Item1>
|
||||
<PackageName Value="bgracontrols"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<PackageName Value="LCL"/>
|
||||
</Item2>
|
||||
</RequiredPackages>
|
||||
<Units Count="44">
|
||||
<Unit0>
|
||||
<Filename Value="test_bcExpandPanel.lpr"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<CursorPos X="24" Y="6"/>
|
||||
<UsageCount Value="86"/>
|
||||
</Unit0>
|
||||
<Unit1>
|
||||
<Filename Value="test_bcexpandpanel_unit1.pas"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<ComponentName Value="bcExpandPanelForm1"/>
|
||||
<HasResources Value="True"/>
|
||||
<ResourceBaseClass Value="Form"/>
|
||||
<UnitName Value="test_bcExpandPanel_unit1"/>
|
||||
<IsVisibleTab Value="True"/>
|
||||
<TopLine Value="90"/>
|
||||
<CursorPos X="17" Y="92"/>
|
||||
<UsageCount Value="86"/>
|
||||
<Loaded Value="True"/>
|
||||
<LoadedDesigner Value="True"/>
|
||||
</Unit1>
|
||||
<Unit2>
|
||||
<Filename Value="../../../expandpanels/expandpanels.pas"/>
|
||||
<UnitName Value="ExpandPanels"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="1158"/>
|
||||
<CursorPos X="45" Y="1171"/>
|
||||
<UsageCount Value="86"/>
|
||||
</Unit2>
|
||||
<Unit3>
|
||||
<Filename Value="/LinuxPrograms/lazarus/lcl/controls.pp"/>
|
||||
<UnitName Value="Controls"/>
|
||||
<TopLine Value="96"/>
|
||||
<CursorPos X="31" Y="119"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit3>
|
||||
<Unit4>
|
||||
<Filename Value="/usr/share/fpcsrc/2.4.0/rtl/objpas/classes/classesh.inc"/>
|
||||
<TopLine Value="1765"/>
|
||||
<CursorPos X="10" Y="1788"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit4>
|
||||
<Unit5>
|
||||
<Filename Value="/LinuxPrograms/lazarus/lcl/extctrls.pp"/>
|
||||
<UnitName Value="ExtCtrls"/>
|
||||
<TopLine Value="38"/>
|
||||
<CursorPos X="35" Y="38"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit5>
|
||||
<Unit6>
|
||||
<Filename Value="/LinuxPrograms/lazarus/lcl/lclclasses.pp"/>
|
||||
<UnitName Value="LCLClasses"/>
|
||||
<TopLine Value="15"/>
|
||||
<CursorPos X="3" Y="38"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit6>
|
||||
<Unit7>
|
||||
<Filename Value="/LinuxPrograms/lazarus/lcl/calendar.pp"/>
|
||||
<UnitName Value="Calendar"/>
|
||||
<TopLine Value="90"/>
|
||||
<CursorPos X="17" Y="113"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit7>
|
||||
<Unit8>
|
||||
<Filename Value="/LinuxPrograms/lazarus/lcl/include/control.inc"/>
|
||||
<TopLine Value="30"/>
|
||||
<CursorPos X="24" Y="61"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit8>
|
||||
<Unit9>
|
||||
<Filename Value="/LinuxPrograms/lazarus/lcl/lclproc.pas"/>
|
||||
<UnitName Value="LCLProc"/>
|
||||
<TopLine Value="1520"/>
|
||||
<CursorPos X="56" Y="1549"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit9>
|
||||
<Unit10>
|
||||
<Filename Value="../../../expandpanels/pexpandpanels.pas"/>
|
||||
<UnitName Value="Pexpandpanels"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<CursorPos X="15" Y="19"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit10>
|
||||
<Unit11>
|
||||
<Filename Value="../../../expandpanels/icons.lrs"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<CursorPos X="17"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit11>
|
||||
<Unit12>
|
||||
<Filename Value="../../../../Projects/test/effects_panel/effects_panel_main.pas"/>
|
||||
<ComponentName Value="Form1"/>
|
||||
<HasResources Value="True"/>
|
||||
<ResourceBaseClass Value="Form"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<CursorPos X="11" Y="7"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit12>
|
||||
<Unit13>
|
||||
<Filename Value="../../../expandpanels/developement test project/effects_panel/effects_panel_main.pas"/>
|
||||
<ComponentName Value="Form1"/>
|
||||
<HasResources Value="True"/>
|
||||
<ResourceBaseClass Value="Form"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="93"/>
|
||||
<CursorPos Y="96"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit13>
|
||||
<Unit14>
|
||||
<Filename Value="../../../expandpanels/expandpanels_o.pas"/>
|
||||
<UnitName Value="ExpandPanels"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="2008"/>
|
||||
<CursorPos Y="2025"/>
|
||||
<UsageCount Value="7"/>
|
||||
</Unit14>
|
||||
<Unit15>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/extctrls.pp"/>
|
||||
<UnitName Value="ExtCtrls"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="1016"/>
|
||||
<CursorPos X="29" Y="1018"/>
|
||||
<UsageCount Value="31"/>
|
||||
</Unit15>
|
||||
<Unit16>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/controls.pp"/>
|
||||
<UnitName Value="Controls"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="2275"/>
|
||||
<CursorPos X="20" Y="2285"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit16>
|
||||
<Unit17>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/include/wincontrol.inc"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="7744"/>
|
||||
<CursorPos X="3" Y="7689"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit17>
|
||||
<Unit18>
|
||||
<Filename Value="../../../expandpanels/to-do.txt"/>
|
||||
<EditorIndex Value="2"/>
|
||||
<CursorPos X="81" Y="23"/>
|
||||
<UsageCount Value="35"/>
|
||||
<Loaded Value="True"/>
|
||||
<DefaultSyntaxHighlighter Value="Text"/>
|
||||
</Unit18>
|
||||
<Unit19>
|
||||
<Filename Value="../../BCExpandPanels.txt"/>
|
||||
<EditorIndex Value="1"/>
|
||||
<CursorPos X="31"/>
|
||||
<UsageCount Value="76"/>
|
||||
<Loaded Value="True"/>
|
||||
<DefaultSyntaxHighlighter Value="Text"/>
|
||||
</Unit19>
|
||||
<Unit20>
|
||||
<Filename Value="../../../expandpanels/expandpanels_subpanel.pas"/>
|
||||
<UnitName Value="ExpandPanels"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="22"/>
|
||||
<CursorPos Y="34"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit20>
|
||||
<Unit21>
|
||||
<Filename Value="../../../expandpanels/_subpanel/expandpanels_subpanel.pas"/>
|
||||
<UnitName Value="ExpandPanels"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="2329"/>
|
||||
<CursorPos X="12" Y="2308"/>
|
||||
<UsageCount Value="8"/>
|
||||
</Unit21>
|
||||
<Unit22>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/include/custompanel.inc"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="89"/>
|
||||
<CursorPos X="3" Y="94"/>
|
||||
<UsageCount Value="22"/>
|
||||
</Unit22>
|
||||
<Unit23>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/graphics.pp"/>
|
||||
<UnitName Value="Graphics"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="1162"/>
|
||||
<CursorPos X="15" Y="1171"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit23>
|
||||
<Unit24>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/include/canvas.inc"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="1034"/>
|
||||
<CursorPos X="15" Y="1045"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit24>
|
||||
<Unit25>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/include/lclintfh.inc"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="56"/>
|
||||
<CursorPos X="10" Y="67"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit25>
|
||||
<Unit26>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/include/intfbaselcl.inc"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="341"/>
|
||||
<CursorPos X="3" Y="344"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit26>
|
||||
<Unit27>
|
||||
<Filename Value="../../../expandpanels/developement test project/unit1.pas"/>
|
||||
<ComponentName Value="Form1"/>
|
||||
<HasResources Value="True"/>
|
||||
<ResourceBaseClass Value="Form"/>
|
||||
<UnitName Value="Unit1"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="44"/>
|
||||
<CursorPos Y="55"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit27>
|
||||
<Unit28>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/buttons.pp"/>
|
||||
<UnitName Value="Buttons"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="318"/>
|
||||
<CursorPos X="17" Y="326"/>
|
||||
<UsageCount Value="18"/>
|
||||
</Unit28>
|
||||
<Unit29>
|
||||
<Filename Value="../../../expandpanels/developement test project/unit1_onepanel.lfm"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="202"/>
|
||||
<UsageCount Value="8"/>
|
||||
<DefaultSyntaxHighlighter Value="LFM"/>
|
||||
</Unit29>
|
||||
<Unit30>
|
||||
<Filename Value="../../../../../../Development/FreePascal/fpc/rtl/objpas/types.pp"/>
|
||||
<UnitName Value="Types"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="451"/>
|
||||
<CursorPos X="3" Y="453"/>
|
||||
<UsageCount Value="9"/>
|
||||
</Unit30>
|
||||
<Unit31>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/include/rasterimage.inc"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="814"/>
|
||||
<CursorPos Y="829"/>
|
||||
<UsageCount Value="12"/>
|
||||
</Unit31>
|
||||
<Unit32>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/include/custombitmap.inc"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="484"/>
|
||||
<CursorPos Y="504"/>
|
||||
<UsageCount Value="11"/>
|
||||
</Unit32>
|
||||
<Unit33>
|
||||
<Filename Value="../../../../../../Development/FreePascal/fpc/rtl/objpas/math.pp"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="2072"/>
|
||||
<CursorPos X="3" Y="2075"/>
|
||||
<UsageCount Value="11"/>
|
||||
</Unit33>
|
||||
<Unit34>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/stdctrls.pp"/>
|
||||
<UnitName Value="StdCtrls"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="1122"/>
|
||||
<CursorPos X="3" Y="1127"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit34>
|
||||
<Unit35>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/include/customcontrol.inc"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="89"/>
|
||||
<CursorPos X="15" Y="92"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit35>
|
||||
<Unit36>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/widgetset/wscontrols.pp"/>
|
||||
<UnitName Value="WSControls"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="470"/>
|
||||
<CursorPos X="10" Y="486"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit36>
|
||||
<Unit37>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/widgetset/wsfactory.pas"/>
|
||||
<UnitName Value="WSFactory"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="30"/>
|
||||
<CursorPos X="10" Y="41"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit37>
|
||||
<Unit38>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/include/speedbutton.inc"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="854"/>
|
||||
<CursorPos X="3" Y="856"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit38>
|
||||
<Unit39>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/dialogs.pp"/>
|
||||
<UnitName Value="Dialogs"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<TopLine Value="255"/>
|
||||
<CursorPos X="31" Y="257"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit39>
|
||||
<Unit40>
|
||||
<Filename Value="../../../../../../Development/FreePascal/lazarus/lcl/include/colorbutton.inc"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<CursorPos X="35" Y="127"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit40>
|
||||
<Unit41>
|
||||
<Filename Value="../../../expandpanels/expandpanels_glyphs.lrs"/>
|
||||
<EditorIndex Value="-1"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit41>
|
||||
<Unit42>
|
||||
<Filename Value="../../BCExpandPanels.pas"/>
|
||||
<EditorIndex Value="3"/>
|
||||
<TopLine Value="593"/>
|
||||
<CursorPos X="3" Y="597"/>
|
||||
<UsageCount Value="10"/>
|
||||
<Loaded Value="True"/>
|
||||
<DefaultSyntaxHighlighter Value="Delphi"/>
|
||||
</Unit42>
|
||||
<Unit43>
|
||||
<Filename Value="../../../../Projects/DigIt/DigIt_Twain32Comm.lpr"/>
|
||||
<EditorIndex Value="4"/>
|
||||
<TopLine Value="76"/>
|
||||
<CursorPos X="16" Y="92"/>
|
||||
<UsageCount Value="10"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit43>
|
||||
</Units>
|
||||
<JumpHistory Count="16" HistoryIndex="15">
|
||||
<Position1>
|
||||
<Filename Value="test_bcexpandpanel_unit1.pas"/>
|
||||
<Caret Line="130" TopLine="116"/>
|
||||
</Position1>
|
||||
<Position2>
|
||||
<Filename Value="test_bcexpandpanel_unit1.pas"/>
|
||||
<Caret Line="129" TopLine="115"/>
|
||||
</Position2>
|
||||
<Position3>
|
||||
<Filename Value="test_bcexpandpanel_unit1.pas"/>
|
||||
<Caret Line="128" TopLine="114"/>
|
||||
</Position3>
|
||||
<Position4>
|
||||
<Filename Value="test_bcexpandpanel_unit1.pas"/>
|
||||
<Caret Line="127" TopLine="113"/>
|
||||
</Position4>
|
||||
<Position5>
|
||||
<Filename Value="test_bcexpandpanel_unit1.pas"/>
|
||||
<Caret Line="130" TopLine="116"/>
|
||||
</Position5>
|
||||
<Position6>
|
||||
<Filename Value="test_bcexpandpanel_unit1.pas"/>
|
||||
<Caret Line="9" Column="38"/>
|
||||
</Position6>
|
||||
<Position7>
|
||||
<Filename Value="test_bcexpandpanel_unit1.pas"/>
|
||||
<Caret Line="129" Column="23" TopLine="117"/>
|
||||
</Position7>
|
||||
<Position8>
|
||||
<Filename Value="../../BCExpandPanels.pas"/>
|
||||
<Caret Line="18" Column="36" TopLine="10"/>
|
||||
</Position8>
|
||||
<Position9>
|
||||
<Filename Value="../../BCExpandPanels.pas"/>
|
||||
<Caret Line="20" Column="21"/>
|
||||
</Position9>
|
||||
<Position10>
|
||||
<Filename Value="../../BCExpandPanels.pas"/>
|
||||
<Caret Line="2177" Column="10" TopLine="2163"/>
|
||||
</Position10>
|
||||
<Position11>
|
||||
<Filename Value="../../BCExpandPanels.pas"/>
|
||||
<Caret Line="2439" Column="10" TopLine="2426"/>
|
||||
</Position11>
|
||||
<Position12>
|
||||
<Filename Value="../../BCExpandPanels.pas"/>
|
||||
<Caret Line="2460" Column="11" TopLine="2447"/>
|
||||
</Position12>
|
||||
<Position13>
|
||||
<Filename Value="test_bcexpandpanel_unit1.pas"/>
|
||||
<Caret Column="24" TopLine="46"/>
|
||||
</Position13>
|
||||
<Position14>
|
||||
<Filename Value="test_bcexpandpanel_unit1.pas"/>
|
||||
<Caret Line="92" Column="17" TopLine="90"/>
|
||||
</Position14>
|
||||
<Position15>
|
||||
<Filename Value="../../BCExpandPanels.pas"/>
|
||||
<Caret Line="139" Column="59" TopLine="129"/>
|
||||
</Position15>
|
||||
<Position16>
|
||||
<Filename Value="../../BCExpandPanels.pas"/>
|
||||
<Caret Line="79" Column="20" TopLine="68"/>
|
||||
</Position16>
|
||||
</JumpHistory>
|
||||
</ProjectOptions>
|
||||
<CompilerOptions>
|
||||
<Version Value="11"/>
|
||||
<SearchPaths>
|
||||
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||
</SearchPaths>
|
||||
<Parsing>
|
||||
<SyntaxOptions>
|
||||
<IncludeAssertionCode Value="True"/>
|
||||
<UseAnsiStrings Value="False"/>
|
||||
</SyntaxOptions>
|
||||
</Parsing>
|
||||
<CodeGeneration>
|
||||
<Checks>
|
||||
<IOChecks Value="True"/>
|
||||
<RangeChecks Value="True"/>
|
||||
<OverflowChecks Value="True"/>
|
||||
<StackChecks Value="True"/>
|
||||
</Checks>
|
||||
<VerifyObjMethodCallValidity Value="True"/>
|
||||
</CodeGeneration>
|
||||
<Linking>
|
||||
<Debugging>
|
||||
<DebugInfoType Value="dsDwarf3"/>
|
||||
<UseHeaptrc Value="True"/>
|
||||
<TrashVariables Value="True"/>
|
||||
<UseExternalDbgSyms Value="True"/>
|
||||
</Debugging>
|
||||
<Options>
|
||||
<Win32>
|
||||
<GraphicApplication Value="True"/>
|
||||
</Win32>
|
||||
</Options>
|
||||
</Linking>
|
||||
</CompilerOptions>
|
||||
<Debugging>
|
||||
<BreakPoints Count="5">
|
||||
<Item1>
|
||||
<Kind Value="bpkSource"/>
|
||||
<WatchScope Value="wpsLocal"/>
|
||||
<WatchKind Value="wpkWrite"/>
|
||||
<Source Value="../../../expandpanels/expandpanels.pas"/>
|
||||
<Line Value="3362"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<Kind Value="bpkSource"/>
|
||||
<WatchScope Value="wpsLocal"/>
|
||||
<WatchKind Value="wpkWrite"/>
|
||||
<Source Value="../../../expandpanels/expandpanels.pas"/>
|
||||
<Line Value="3379"/>
|
||||
</Item2>
|
||||
<Item3>
|
||||
<Kind Value="bpkSource"/>
|
||||
<WatchScope Value="wpsLocal"/>
|
||||
<WatchKind Value="wpkWrite"/>
|
||||
<Source Value="../../../expandpanels/expandpanels.pas"/>
|
||||
<Line Value="2964"/>
|
||||
</Item3>
|
||||
<Item4>
|
||||
<Kind Value="bpkSource"/>
|
||||
<WatchScope Value="wpsLocal"/>
|
||||
<WatchKind Value="wpkWrite"/>
|
||||
<Source Value="../../../expandpanels/expandpanels.pas"/>
|
||||
<Line Value="3383"/>
|
||||
</Item4>
|
||||
<Item5>
|
||||
<Kind Value="bpkSource"/>
|
||||
<WatchScope Value="wpsLocal"/>
|
||||
<WatchKind Value="wpkWrite"/>
|
||||
<Source Value="../../../expandpanels/expandpanels.pas"/>
|
||||
<Line Value="2973"/>
|
||||
</Item5>
|
||||
</BreakPoints>
|
||||
<Exceptions Count="3">
|
||||
<Item1>
|
||||
<Name Value="EAbort"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<Name Value="ECodetoolError"/>
|
||||
</Item2>
|
||||
<Item3>
|
||||
<Name Value="EFOpenError"/>
|
||||
</Item3>
|
||||
</Exceptions>
|
||||
</Debugging>
|
||||
</CONFIG>
|
||||
16
bgracontrols/test/test_bcExpandPanels/test_bcExpandPanel.lpr
Normal file
16
bgracontrols/test/test_bcExpandPanels/test_bcExpandPanel.lpr
Normal file
@@ -0,0 +1,16 @@
|
||||
program test_bcExpandPanel;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
uses {$IFDEF UNIX} {$IFDEF UseCThreads}
|
||||
cthreads, {$ENDIF} {$ENDIF}
|
||||
Interfaces, // this includes the LCL widgetset
|
||||
Forms,
|
||||
test_bcExpandPanel_unit1,
|
||||
LResources { you can add units after this };
|
||||
|
||||
begin
|
||||
Application.Initialize;
|
||||
Application.CreateForm(TbcExpandPanelForm1, bcExpandPanelForm1);
|
||||
Application.Run;
|
||||
end.
|
||||
BIN
bgracontrols/test/test_bcExpandPanels/test_bcExpandPanel.obj
Normal file
BIN
bgracontrols/test/test_bcExpandPanels/test_bcExpandPanel.obj
Normal file
Binary file not shown.
@@ -0,0 +1,349 @@
|
||||
object bcExpandPanelForm1: TbcExpandPanelForm1
|
||||
Left = 355
|
||||
Height = 623
|
||||
Top = 15
|
||||
Width = 549
|
||||
Caption = 'bcExpandPanelForm1'
|
||||
ClientHeight = 623
|
||||
ClientWidth = 549
|
||||
LCLVersion = '3.99.0.0'
|
||||
OnShow = FormShow
|
||||
object RColl: TRadioGroup
|
||||
Left = 17
|
||||
Height = 107
|
||||
Top = 323
|
||||
Width = 169
|
||||
AutoFill = True
|
||||
Caption = 'Collapse To'
|
||||
ChildSizing.LeftRightSpacing = 6
|
||||
ChildSizing.TopBottomSpacing = 6
|
||||
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
||||
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
||||
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
||||
ChildSizing.ShrinkVertical = crsScaleChilds
|
||||
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||||
ChildSizing.ControlsPerLine = 2
|
||||
ClientHeight = 87
|
||||
ClientWidth = 165
|
||||
Columns = 2
|
||||
ItemIndex = 0
|
||||
Items.Strings = (
|
||||
'top'
|
||||
'left'
|
||||
'right'
|
||||
'bottom'
|
||||
)
|
||||
TabOrder = 0
|
||||
OnClick = RCollClick
|
||||
end
|
||||
object RButt: TRadioGroup
|
||||
Left = 17
|
||||
Height = 86
|
||||
Top = 427
|
||||
Width = 169
|
||||
AutoFill = True
|
||||
Caption = 'Button Position'
|
||||
ChildSizing.LeftRightSpacing = 6
|
||||
ChildSizing.TopBottomSpacing = 6
|
||||
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
||||
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
||||
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
||||
ChildSizing.ShrinkVertical = crsScaleChilds
|
||||
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||||
ChildSizing.ControlsPerLine = 2
|
||||
ClientHeight = 66
|
||||
ClientWidth = 165
|
||||
Columns = 2
|
||||
ItemIndex = 0
|
||||
Items.Strings = (
|
||||
'top'
|
||||
'left'
|
||||
'right'
|
||||
'bottom'
|
||||
)
|
||||
TabOrder = 1
|
||||
OnClick = RButtClick
|
||||
end
|
||||
object RGlyph: TRadioGroup
|
||||
Left = 17
|
||||
Height = 80
|
||||
Top = 536
|
||||
Width = 169
|
||||
AutoFill = True
|
||||
Caption = 'Glyph Position'
|
||||
ChildSizing.LeftRightSpacing = 6
|
||||
ChildSizing.TopBottomSpacing = 6
|
||||
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
||||
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
||||
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
||||
ChildSizing.ShrinkVertical = crsScaleChilds
|
||||
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||||
ChildSizing.ControlsPerLine = 2
|
||||
ClientHeight = 60
|
||||
ClientWidth = 165
|
||||
Columns = 2
|
||||
ItemIndex = 1
|
||||
Items.Strings = (
|
||||
'Left'
|
||||
'Right'
|
||||
'None'
|
||||
)
|
||||
TabOrder = 2
|
||||
OnClick = RGlyphClick
|
||||
end
|
||||
object GroupBox1: TGroupBox
|
||||
Left = 193
|
||||
Height = 152
|
||||
Top = 323
|
||||
Width = 169
|
||||
Caption = 'Caption'
|
||||
ClientHeight = 132
|
||||
ClientWidth = 165
|
||||
TabOrder = 3
|
||||
object Edit1: TEdit
|
||||
Left = 0
|
||||
Height = 23
|
||||
Top = 0
|
||||
Width = 161
|
||||
TabOrder = 0
|
||||
Text = 'Click me to Collapse/Expand'
|
||||
OnChange = Edit1Change
|
||||
end
|
||||
object SpeedButton1: TSpeedButton
|
||||
Left = 0
|
||||
Height = 22
|
||||
Top = 24
|
||||
Width = 161
|
||||
Caption = 'Long Caption...'
|
||||
OnClick = SpeedButton1Click
|
||||
end
|
||||
object RCapt: TRadioGroup
|
||||
Left = 0
|
||||
Height = 80
|
||||
Top = 50
|
||||
Width = 161
|
||||
AutoFill = True
|
||||
Caption = 'Caption Position'
|
||||
ChildSizing.LeftRightSpacing = 6
|
||||
ChildSizing.TopBottomSpacing = 6
|
||||
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
||||
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
||||
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
||||
ChildSizing.ShrinkVertical = crsScaleChilds
|
||||
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||||
ChildSizing.ControlsPerLine = 2
|
||||
ClientHeight = 60
|
||||
ClientWidth = 157
|
||||
Columns = 2
|
||||
ItemIndex = 0
|
||||
Items.Strings = (
|
||||
'Left'
|
||||
'Right'
|
||||
'Center'
|
||||
'None'
|
||||
)
|
||||
TabOrder = 1
|
||||
OnClick = RCaptClick
|
||||
end
|
||||
end
|
||||
object edTabWidth: TSpinEdit
|
||||
Left = 384
|
||||
Height = 23
|
||||
Top = 395
|
||||
Width = 103
|
||||
MaxValue = 380
|
||||
MinValue = -90
|
||||
TabOrder = 4
|
||||
Value = -50
|
||||
OnChange = edTabWidthChange
|
||||
end
|
||||
object Label1: TLabel
|
||||
Left = 384
|
||||
Height = 15
|
||||
Top = 376
|
||||
Width = 135
|
||||
Caption = 'Tab Width (Negative is %)'
|
||||
ParentColor = False
|
||||
end
|
||||
object cbRounded: TCheckBox
|
||||
Left = 368
|
||||
Height = 19
|
||||
Top = 426
|
||||
Width = 109
|
||||
Caption = 'Rounded Borders'
|
||||
Checked = True
|
||||
State = cbChecked
|
||||
TabOrder = 5
|
||||
OnClick = cbRoundedClick
|
||||
end
|
||||
object cbFlat: TCheckBox
|
||||
Left = 142
|
||||
Height = 19
|
||||
Top = 512
|
||||
Width = 37
|
||||
Caption = 'Flat'
|
||||
TabOrder = 6
|
||||
OnClick = cbFlatClick
|
||||
end
|
||||
object cbBorders: TComboBox
|
||||
Left = 384
|
||||
Height = 23
|
||||
Top = 453
|
||||
Width = 121
|
||||
ItemHeight = 15
|
||||
ItemIndex = 2
|
||||
Items.Strings = (
|
||||
'None'
|
||||
'Lowered'
|
||||
'Raised'
|
||||
'Space'
|
||||
)
|
||||
Style = csDropDownList
|
||||
TabOrder = 7
|
||||
Text = 'Raised'
|
||||
OnChange = cbBordersChange
|
||||
end
|
||||
object edButtonSize: TSpinEdit
|
||||
Left = 72
|
||||
Height = 23
|
||||
Top = 509
|
||||
Width = 70
|
||||
TabOrder = 8
|
||||
OnChange = edButtonSizeChange
|
||||
end
|
||||
object Label3: TLabel
|
||||
Left = 40
|
||||
Height = 15
|
||||
Top = 512
|
||||
Width = 23
|
||||
Caption = 'Size:'
|
||||
ParentColor = False
|
||||
end
|
||||
object RGlyphKind: TRadioGroup
|
||||
Left = 193
|
||||
Height = 80
|
||||
Top = 536
|
||||
Width = 169
|
||||
AutoFill = True
|
||||
Caption = 'Glyph Kind'
|
||||
ChildSizing.LeftRightSpacing = 6
|
||||
ChildSizing.TopBottomSpacing = 6
|
||||
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
||||
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
||||
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
||||
ChildSizing.ShrinkVertical = crsScaleChilds
|
||||
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||||
ChildSizing.ControlsPerLine = 2
|
||||
ClientHeight = 60
|
||||
ClientWidth = 165
|
||||
Columns = 2
|
||||
ItemIndex = 0
|
||||
Items.Strings = (
|
||||
'Arrows'
|
||||
'Close'
|
||||
'Min/Max'
|
||||
)
|
||||
TabOrder = 9
|
||||
OnClick = RGlyphKindClick
|
||||
end
|
||||
object RStyle: TComboBox
|
||||
Left = 368
|
||||
Height = 23
|
||||
Top = 346
|
||||
Width = 176
|
||||
ItemHeight = 15
|
||||
ItemIndex = 0
|
||||
Items.Strings = (
|
||||
'Button'
|
||||
'Tab'
|
||||
'Line'
|
||||
'Line Double'
|
||||
'Line Top'
|
||||
'Line Bottom'
|
||||
'Line Double Top'
|
||||
'Line Double Bottom'
|
||||
)
|
||||
Style = csDropDownList
|
||||
TabOrder = 10
|
||||
Text = 'Button'
|
||||
OnChange = RStyleChange
|
||||
end
|
||||
object Label4: TLabel
|
||||
Left = 369
|
||||
Height = 15
|
||||
Top = 327
|
||||
Width = 31
|
||||
Caption = 'Style :'
|
||||
ParentColor = False
|
||||
end
|
||||
object p1: TBCExpandPanel
|
||||
Left = 8
|
||||
Height = 312
|
||||
Top = 8
|
||||
Width = 400
|
||||
Background.Color = clBtnFace
|
||||
Background.Gradient1.StartColor = clWhite
|
||||
Background.Gradient1.EndColor = clBlack
|
||||
Background.Gradient1.GradientType = gtLinear
|
||||
Background.Gradient1.Point1XPercent = 0
|
||||
Background.Gradient1.Point1YPercent = 0
|
||||
Background.Gradient1.Point2XPercent = 0
|
||||
Background.Gradient1.Point2YPercent = 100
|
||||
Background.Gradient2.StartColor = clWhite
|
||||
Background.Gradient2.EndColor = clBlack
|
||||
Background.Gradient2.GradientType = gtLinear
|
||||
Background.Gradient2.Point1XPercent = 0
|
||||
Background.Gradient2.Point1YPercent = 0
|
||||
Background.Gradient2.Point2XPercent = 0
|
||||
Background.Gradient2.Point2YPercent = 100
|
||||
Background.Gradient1EndPercent = 35
|
||||
Background.Style = bbsColor
|
||||
BevelInner = bvNone
|
||||
BevelOuter = bvRaised
|
||||
BevelWidth = 1
|
||||
Border.Style = bboNone
|
||||
Caption = 'Expand Panel 1'
|
||||
Enabled = True
|
||||
FontEx.Color = clDefault
|
||||
FontEx.FontQuality = fqSystemClearType
|
||||
FontEx.Shadow = False
|
||||
FontEx.ShadowRadius = 5
|
||||
FontEx.ShadowOffsetX = 5
|
||||
FontEx.ShadowOffsetY = 5
|
||||
FontEx.Style = []
|
||||
ParentBackground = False
|
||||
Rounding.RoundX = 1
|
||||
Rounding.RoundY = 1
|
||||
TabOrder = 11
|
||||
TextAlignment = taCenter
|
||||
CollapseKind = akTop
|
||||
ExpandedSize = 312
|
||||
ButtonPosition = akTop
|
||||
ButtonSize = 27
|
||||
Button.Left = 0
|
||||
Button.Height = 27
|
||||
Button.Top = 0
|
||||
Button.Width = 400
|
||||
Button.Caption = 'Click me to Collapse/Expand'
|
||||
Button.Color = clSkyBlue
|
||||
Button.ColorExpanded = 16287767
|
||||
Button.GlyphLayout = glRight
|
||||
AnimationSpeed = 20
|
||||
object Edit2: TEdit
|
||||
Left = 47
|
||||
Height = 23
|
||||
Top = 41
|
||||
Width = 80
|
||||
TabOrder = 0
|
||||
Text = 'Edit2'
|
||||
end
|
||||
object Label2: TLabel
|
||||
Left = 136
|
||||
Height = 15
|
||||
Top = 47
|
||||
Width = 34
|
||||
Caption = 'Label2'
|
||||
ParentColor = False
|
||||
end
|
||||
end
|
||||
end
|
||||
@@ -0,0 +1,144 @@
|
||||
unit test_bcExpandPanel_unit1;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics,
|
||||
ExtCtrls, StdCtrls, Buttons, Spin, BCExpandPanels, StrUtils;
|
||||
|
||||
type
|
||||
|
||||
{ TbcExpandPanelForm1 }
|
||||
|
||||
TbcExpandPanelForm1 = class(TForm)
|
||||
cbRounded: TCheckBox;
|
||||
cbFlat: TCheckBox;
|
||||
cbBorders: TComboBox;
|
||||
Edit1: TEdit;
|
||||
Edit2: TEdit;
|
||||
GroupBox1: TGroupBox;
|
||||
Label1: TLabel;
|
||||
Label2: TLabel;
|
||||
Label3: TLabel;
|
||||
Label4: TLabel;
|
||||
p1: TBCExpandPanel;
|
||||
RGlyph: TRadioGroup;
|
||||
RCapt: TRadioGroup;
|
||||
RColl: TRadioGroup;
|
||||
RButt: TRadioGroup;
|
||||
RGlyphKind: TRadioGroup;
|
||||
RStyle: TComboBox;
|
||||
SpeedButton1: TSpeedButton;
|
||||
edTabWidth: TSpinEdit;
|
||||
edButtonSize: TSpinEdit;
|
||||
procedure cbFlatClick(Sender: TObject);
|
||||
procedure cbRoundedClick(Sender: TObject);
|
||||
procedure cbBordersChange(Sender: TObject);
|
||||
procedure edButtonSizeChange(Sender: TObject);
|
||||
procedure Edit1Change(Sender: TObject);
|
||||
procedure edTabWidthChange(Sender: TObject);
|
||||
procedure FormShow(Sender: TObject);
|
||||
procedure RGlyphClick(Sender: TObject);
|
||||
procedure RCaptClick(Sender: TObject);
|
||||
procedure RButtClick(Sender: TObject);
|
||||
procedure RCollClick(Sender: TObject);
|
||||
procedure RGlyphKindClick(Sender: TObject);
|
||||
procedure RStyleChange(Sender: TObject);
|
||||
procedure RDirectionClick(Sender: TObject);
|
||||
procedure SpeedButton1Click(Sender: TObject);
|
||||
private
|
||||
{ private declarations }
|
||||
public
|
||||
{ public declarations }
|
||||
end;
|
||||
|
||||
var
|
||||
bcExpandPanelForm1: TbcExpandPanelForm1;
|
||||
|
||||
implementation
|
||||
|
||||
{ TbcExpandPanelForm1 }
|
||||
|
||||
|
||||
procedure TbcExpandPanelForm1.Edit1Change(Sender: TObject);
|
||||
begin
|
||||
p1.Button.Caption := Edit1.Text;
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.cbRoundedClick(Sender: TObject);
|
||||
begin
|
||||
p1.BevelRounded:=cbRounded.Checked;
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.cbBordersChange(Sender: TObject);
|
||||
begin
|
||||
p1.BevelOuter:=TBevelcut(cbBorders.ItemIndex);
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.edButtonSizeChange(Sender: TObject);
|
||||
begin
|
||||
p1.ButtonSize:=edButtonSize.Value;
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.cbFlatClick(Sender: TObject);
|
||||
begin
|
||||
p1.Button.Flat:=cbFlat.Checked;
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.edTabWidthChange(Sender: TObject);
|
||||
begin
|
||||
p1.Button.TabWidth:=edTabWidth.Value;
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.FormShow(Sender: TObject);
|
||||
begin
|
||||
edButtonSize.Value:=p1.ButtonSize;
|
||||
edTabWidth.Value:=p1.Button.TabWidth;
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.RGlyphClick(Sender: TObject);
|
||||
begin
|
||||
p1.Button.GlyphLayout:=TGlyphLayout(RGlyph.ItemIndex);
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.RCaptClick(Sender: TObject);
|
||||
begin
|
||||
p1.Button.TextLayout:=TTextLayout(RCapt.ItemIndex);
|
||||
end;
|
||||
|
||||
|
||||
procedure TbcExpandPanelForm1.RButtClick(Sender: TObject);
|
||||
begin
|
||||
p1.ButtonPosition := TAnchorKind(RButt.ItemIndex);
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.RCollClick(Sender: TObject);
|
||||
begin
|
||||
p1.CollapseKind := TAnchorKind(RColl.ItemIndex);
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.RGlyphKindClick(Sender: TObject);
|
||||
begin
|
||||
p1.Button.GlyphKind:=TGlyphKind(RGlyphKind.ItemIndex);
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.RStyleChange(Sender: TObject);
|
||||
begin
|
||||
p1.Button.Style:=TBCBoundButtonStyle(RStyle.ItemIndex);
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.RDirectionClick(Sender: TObject);
|
||||
begin
|
||||
end;
|
||||
|
||||
procedure TbcExpandPanelForm1.SpeedButton1Click(Sender: TObject);
|
||||
begin
|
||||
p1.Button.Caption := DupeString(Edit1.Caption, 10);
|
||||
end;
|
||||
|
||||
initialization
|
||||
{$I test_bcexpandpanel_unit1.lrs}
|
||||
|
||||
end.
|
||||
Reference in New Issue
Block a user