update menu order

This commit is contained in:
April Ayres-Griffiths 2019-04-15 20:03:44 +10:00
parent 6bbbe2aca6
commit 82aa2df3b4
4 changed files with 480 additions and 479 deletions

View File

@ -2459,13 +2459,14 @@ begin
if path = 'hardware/current.cpu.warp' then if path = 'hardware/current.cpu.warp' then
begin begin
case value of d := StrToFloat(value);
'0.25': TrackBar2.Position := 0; case Round(d * 100) of
'0.50': TrackBar2.Position := 1; 25: WarpPosition := 0;
'1.00': TrackBar2.Position := 2; 50: WarpPosition := 1;
'2.00': TrackBar2.Position := 3; 100: WarpPosition := 2;
'4.00': TrackBar2.Position := 4; 200: WarpPosition := 3;
end; 400: WarpPosition := 4;
end;
end; end;
//self.StatusBar1.SimpleText:=json; //self.StatusBar1.SimpleText:=json;

View File

@ -1,194 +1,194 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<CONFIG> <CONFIG>
<ProjectSession> <ProjectSession>
<PathDelim Value="\"/> <PathDelim Value="\"/>
<Version Value="11"/> <Version Value="11"/>
<BuildModes Active="Default"/> <BuildModes Active="Default"/>
<Units Count="6"> <Units Count="6">
<Unit0> <Unit0>
<Filename Value="poc.lpr"/> <Filename Value="poc.lpr"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<WindowIndex Value="-1"/> <WindowIndex Value="-1"/>
<TopLine Value="-1"/> <TopLine Value="-1"/>
<CursorPos X="-1" Y="-1"/> <CursorPos X="-1" Y="-1"/>
<UsageCount Value="323"/> <UsageCount Value="323"/>
</Unit0> </Unit0>
<Unit1> <Unit1>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<ComponentName Value="GUIForm"/> <ComponentName Value="GUIForm"/>
<HasResources Value="True"/> <HasResources Value="True"/>
<ResourceBaseClass Value="Form"/> <ResourceBaseClass Value="Form"/>
<IsVisibleTab Value="True"/> <IsVisibleTab Value="True"/>
<TopLine Value="2147"/> <TopLine Value="2393"/>
<CursorPos X="24" Y="2169"/> <CursorPos X="37" Y="2409"/>
<UsageCount Value="323"/> <UsageCount Value="323"/>
<Loaded Value="True"/> <Loaded Value="True"/>
<LoadedDesigner Value="True"/> <LoadedDesigner Value="True"/>
</Unit1> </Unit1>
<Unit2> <Unit2>
<Filename Value="mixer.pas"/> <Filename Value="mixer.pas"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<ComponentName Value="frmMixer"/> <ComponentName Value="frmMixer"/>
<HasResources Value="True"/> <HasResources Value="True"/>
<ResourceBaseClass Value="Form"/> <ResourceBaseClass Value="Form"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="3"/> <TopLine Value="3"/>
<CursorPos X="26" Y="25"/> <CursorPos X="26" Y="25"/>
<UsageCount Value="206"/> <UsageCount Value="206"/>
</Unit2> </Unit2>
<Unit3> <Unit3>
<Filename Value="C:\lazarus\lcl\include\picture.inc"/> <Filename Value="C:\lazarus\lcl\include\picture.inc"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="576"/> <TopLine Value="576"/>
<CursorPos X="49" Y="591"/> <CursorPos X="49" Y="591"/>
<UsageCount Value="108"/> <UsageCount Value="107"/>
</Unit3> </Unit3>
<Unit4> <Unit4>
<Filename Value="C:\lazarus\components\lazutils\utf8process.pp"/> <Filename Value="C:\lazarus\components\lazutils\utf8process.pp"/>
<UnitName Value="UTF8Process"/> <UnitName Value="UTF8Process"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="636"/> <TopLine Value="636"/>
<CursorPos Y="654"/> <CursorPos Y="654"/>
<UsageCount Value="3"/> <UsageCount Value="2"/>
</Unit4> </Unit4>
<Unit5> <Unit5>
<Filename Value="images\memory.pas"/> <Filename Value="images\memory.pas"/>
<ComponentName Value="memform"/> <ComponentName Value="memform"/>
<HasResources Value="True"/> <HasResources Value="True"/>
<ResourceBaseClass Value="Form"/> <ResourceBaseClass Value="Form"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="40"/> <TopLine Value="40"/>
<CursorPos X="17" Y="44"/> <CursorPos X="17" Y="44"/>
<UsageCount Value="22"/> <UsageCount Value="21"/>
</Unit5> </Unit5>
</Units> </Units>
<JumpHistory Count="30" HistoryIndex="29"> <JumpHistory Count="30" HistoryIndex="29">
<Position1> <Position1>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="714" Column="6" TopLine="777"/> <Caret Line="2078" Column="14" TopLine="2075"/>
</Position1> </Position1>
<Position2> <Position2>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="715" Column="6" TopLine="715"/> <Caret Line="576" Column="29" TopLine="555"/>
</Position2> </Position2>
<Position3> <Position3>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="717" Column="6" TopLine="717"/> <Caret Line="2412" Column="30" TopLine="2398"/>
</Position3> </Position3>
<Position4> <Position4>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1353" Column="39" TopLine="1329"/> <Caret Line="2421" Column="38" TopLine="2398"/>
</Position4> </Position4>
<Position5> <Position5>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1354" Column="39" TopLine="1330"/> <Caret Line="1304" Column="44" TopLine="1287"/>
</Position5> </Position5>
<Position6> <Position6>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1361" Column="39" TopLine="1337"/> <Caret Line="1305" Column="44" TopLine="1287"/>
</Position6> </Position6>
<Position7> <Position7>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="919" Column="39" TopLine="902"/> <Caret Line="1306" Column="44" TopLine="1287"/>
</Position7> </Position7>
<Position8> <Position8>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="906" Column="71" TopLine="887"/> <Caret Line="1307" Column="44" TopLine="1287"/>
</Position8> </Position8>
<Position9> <Position9>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="751" Column="53" TopLine="736"/> <Caret Line="1308" Column="44" TopLine="1287"/>
</Position9> </Position9>
<Position10> <Position10>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="980" Column="56" TopLine="963"/> <Caret Line="1309" Column="44" TopLine="1287"/>
</Position10> </Position10>
<Position11> <Position11>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2553" Column="38" TopLine="2537"/> <Caret Line="1310" Column="44" TopLine="1287"/>
</Position11> </Position11>
<Position12> <Position12>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2554" Column="38" TopLine="2538"/> <Caret Line="1311" Column="44" TopLine="1287"/>
</Position12> </Position12>
<Position13> <Position13>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2561" Column="38" TopLine="2545"/> <Caret Line="1312" Column="44" TopLine="1287"/>
</Position13> </Position13>
<Position14> <Position14>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1332" Column="3" TopLine="1348"/> <Caret Line="1313" Column="44" TopLine="1287"/>
</Position14> </Position14>
<Position15> <Position15>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1316" TopLine="1310"/> <Caret Line="1314" Column="45" TopLine="1287"/>
</Position15> </Position15>
<Position16> <Position16>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1325" Column="77" TopLine="1310"/> <Caret Line="1613" Column="41" TopLine="1585"/>
</Position16> </Position16>
<Position17> <Position17>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="552" Column="24" TopLine="543"/> <Caret Line="2079" Column="42" TopLine="2051"/>
</Position17> </Position17>
<Position18> <Position18>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1338" Column="29" TopLine="1317"/> <Caret Line="2080" Column="42" TopLine="2052"/>
</Position18> </Position18>
<Position19> <Position19>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1335" Column="46" TopLine="1317"/> <Caret Line="2081" Column="42" TopLine="2053"/>
</Position19> </Position19>
<Position20> <Position20>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2231" Column="25" TopLine="2215"/> <Caret Line="2082" Column="42" TopLine="2054"/>
</Position20> </Position20>
<Position21> <Position21>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1338" Column="10" TopLine="1328"/> <Caret Line="2083" Column="42" TopLine="2055"/>
</Position21> </Position21>
<Position22> <Position22>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="552" Column="24" TopLine="534"/> <Caret Line="2084" Column="42" TopLine="2056"/>
</Position22> </Position22>
<Position23> <Position23>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1338" Column="15" TopLine="1307"/> <Caret Line="2085" Column="42" TopLine="2057"/>
</Position23> </Position23>
<Position24> <Position24>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2229" Column="29" TopLine="2216"/> <Caret Line="2086" Column="42" TopLine="2058"/>
</Position24> </Position24>
<Position25> <Position25>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1690" Column="13" TopLine="1683"/> <Caret Line="2087" Column="42" TopLine="2059"/>
</Position25> </Position25>
<Position26> <Position26>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="781" Column="24" TopLine="764"/> <Caret Line="2088" Column="42" TopLine="2060"/>
</Position26> </Position26>
<Position27> <Position27>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2229" Column="29" TopLine="2222"/> <Caret Line="2089" Column="43" TopLine="2061"/>
</Position27> </Position27>
<Position28> <Position28>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="552" Column="24" TopLine="534"/> <Caret Line="2106" Column="41" TopLine="2078"/>
</Position28> </Position28>
<Position29> <Position29>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1334" Column="39" TopLine="1313"/> <Caret Line="2407" Column="33" TopLine="2378"/>
</Position29> </Position29>
<Position30> <Position30>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2171" Column="26" TopLine="2153"/> <Caret Line="2393" Column="13" TopLine="2391"/>
</Position30> </Position30>
</JumpHistory> </JumpHistory>
<RunParams> <RunParams>
<FormatVersion Value="2"/> <FormatVersion Value="2"/>
<Modes Count="0" ActiveMode=""/> <Modes Count="0" ActiveMode=""/>
</RunParams> </RunParams>
</ProjectSession> </ProjectSession>
</CONFIG> </CONFIG>

486
main.lfm
View File

@ -5764,6 +5764,249 @@ object GUIForm: TGUIForm
OnClick = MenuItem2Click OnClick = MenuItem2Click
end end
end end
object miAudio: TMenuItem
Caption = 'Audio'
OnClick = miAudioClick
object miSNDMuted: TMenuItem
Caption = 'Mute'
OnClick = miSNDMutedClick
end
object miSNDMaster: TMenuItem
Caption = 'Master Volume'
OnClick = miSNDMasterClick
object miMVOL000: TMenuItem
Caption = '0'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL010: TMenuItem
Caption = '1'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL020: TMenuItem
Caption = '2'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL030: TMenuItem
Caption = '3'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL040: TMenuItem
Caption = '4'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL050: TMenuItem
Caption = '5'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL060: TMenuItem
Caption = '6'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL070: TMenuItem
Caption = '7'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL080: TMenuItem
Caption = '8'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL090: TMenuItem
Caption = '9'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL100: TMenuItem
Caption = '10'
RadioItem = True
OnClick = miMVOL000Click
end
end
object miSNDSpeaker: TMenuItem
Caption = 'Speaker Volume'
OnClick = miSNDSpeakerClick
object miSVOL000: TMenuItem
Caption = '0'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL010: TMenuItem
Caption = '1'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL020: TMenuItem
Caption = '2'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL030: TMenuItem
Caption = '3'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL040: TMenuItem
Caption = '4'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL050: TMenuItem
Caption = '5'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL060: TMenuItem
Caption = '6'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL070: TMenuItem
Caption = '7'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL080: TMenuItem
Caption = '8'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL090: TMenuItem
Caption = '9'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL100: TMenuItem
Caption = '10'
RadioItem = True
OnClick = miSVOL000Click
end
end
object miSNDMockingboard: TMenuItem
Caption = 'Mockingboard'
object miSNDPSG0: TMenuItem
Caption = 'PSG0 Balance'
OnClick = miSNDPSG0Click
object miPSG0m100: TMenuItem
Tag = -100
Caption = 'Left'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0m75: TMenuItem
Tag = -75
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0m50: TMenuItem
Tag = -50
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0m25: TMenuItem
Tag = -25
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0p0: TMenuItem
Caption = 'Center'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0p25: TMenuItem
Tag = 25
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0p50: TMenuItem
Tag = 50
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0p75: TMenuItem
Tag = 75
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0p100: TMenuItem
Tag = 100
Caption = 'Right'
RadioItem = True
OnClick = miPSG0m100Click
end
end
object miSNDPSG1: TMenuItem
Caption = 'PSG1 Balance'
OnClick = miSNDPSG1Click
object miPSG1m100: TMenuItem
Tag = -100
Caption = 'Left'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1m75: TMenuItem
Tag = -75
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1m50: TMenuItem
Tag = -50
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1m25: TMenuItem
Tag = -25
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1p0: TMenuItem
Caption = 'Center'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1p25: TMenuItem
Tag = 25
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1p50: TMenuItem
Tag = 50
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1p75: TMenuItem
Tag = 75
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1p100: TMenuItem
Tag = 100
Caption = 'Right'
RadioItem = True
OnClick = miPSG1m100Click
end
end
end
end
object miVideo: TMenuItem object miVideo: TMenuItem
Caption = 'Video' Caption = 'Video'
object miScanLineInt: TMenuItem object miScanLineInt: TMenuItem
@ -6157,249 +6400,6 @@ object GUIForm: TGUIForm
OnClick = miPasteTextClick OnClick = miPasteTextClick
end end
end end
object miAudio: TMenuItem
Caption = 'Audio'
OnClick = miAudioClick
object miSNDMuted: TMenuItem
Caption = 'Mute'
OnClick = miSNDMutedClick
end
object miSNDMaster: TMenuItem
Caption = 'Master Volume'
OnClick = miSNDMasterClick
object miMVOL000: TMenuItem
Caption = '0'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL010: TMenuItem
Caption = '1'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL020: TMenuItem
Caption = '2'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL030: TMenuItem
Caption = '3'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL040: TMenuItem
Caption = '4'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL050: TMenuItem
Caption = '5'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL060: TMenuItem
Caption = '6'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL070: TMenuItem
Caption = '7'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL080: TMenuItem
Caption = '8'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL090: TMenuItem
Caption = '9'
RadioItem = True
OnClick = miMVOL000Click
end
object miMVOL100: TMenuItem
Caption = '10'
RadioItem = True
OnClick = miMVOL000Click
end
end
object miSNDSpeaker: TMenuItem
Caption = 'Speaker Volume'
OnClick = miSNDSpeakerClick
object miSVOL000: TMenuItem
Caption = '0'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL010: TMenuItem
Caption = '1'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL020: TMenuItem
Caption = '2'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL030: TMenuItem
Caption = '3'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL040: TMenuItem
Caption = '4'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL050: TMenuItem
Caption = '5'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL060: TMenuItem
Caption = '6'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL070: TMenuItem
Caption = '7'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL080: TMenuItem
Caption = '8'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL090: TMenuItem
Caption = '9'
RadioItem = True
OnClick = miSVOL000Click
end
object miSVOL100: TMenuItem
Caption = '10'
RadioItem = True
OnClick = miSVOL000Click
end
end
object miSNDMockingboard: TMenuItem
Caption = 'Mockingboard'
object miSNDPSG0: TMenuItem
Caption = 'PSG0 Balance'
OnClick = miSNDPSG0Click
object miPSG0m100: TMenuItem
Tag = -100
Caption = 'Left'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0m75: TMenuItem
Tag = -75
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0m50: TMenuItem
Tag = -50
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0m25: TMenuItem
Tag = -25
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0p0: TMenuItem
Caption = 'Center'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0p25: TMenuItem
Tag = 25
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0p50: TMenuItem
Tag = 50
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0p75: TMenuItem
Tag = 75
Caption = '...'
RadioItem = True
OnClick = miPSG0m100Click
end
object miPSG0p100: TMenuItem
Tag = 100
Caption = 'Right'
RadioItem = True
OnClick = miPSG0m100Click
end
end
object miSNDPSG1: TMenuItem
Caption = 'PSG1 Balance'
OnClick = miSNDPSG1Click
object miPSG1m100: TMenuItem
Tag = -100
Caption = 'Left'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1m75: TMenuItem
Tag = -75
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1m50: TMenuItem
Tag = -50
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1m25: TMenuItem
Tag = -25
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1p0: TMenuItem
Caption = 'Center'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1p25: TMenuItem
Tag = 25
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1p50: TMenuItem
Tag = 50
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1p75: TMenuItem
Tag = 75
Caption = '...'
RadioItem = True
OnClick = miPSG1m100Click
end
object miPSG1p100: TMenuItem
Tag = 100
Caption = 'Right'
RadioItem = True
OnClick = miPSG1m100Click
end
end
end
end
object miHardware: TMenuItem object miHardware: TMenuItem
Caption = 'Hardware' Caption = 'Hardware'
object miSerial: TMenuItem object miSerial: TMenuItem

70
poc.lps
View File

@ -21,8 +21,8 @@
<HasResources Value="True"/> <HasResources Value="True"/>
<ResourceBaseClass Value="Form"/> <ResourceBaseClass Value="Form"/>
<IsVisibleTab Value="True"/> <IsVisibleTab Value="True"/>
<TopLine Value="2393"/> <TopLine Value="2446"/>
<CursorPos X="37" Y="2409"/> <CursorPos X="20" Y="2459"/>
<UsageCount Value="323"/> <UsageCount Value="323"/>
<Loaded Value="True"/> <Loaded Value="True"/>
<LoadedDesigner Value="True"/> <LoadedDesigner Value="True"/>
@ -43,7 +43,7 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="576"/> <TopLine Value="576"/>
<CursorPos X="49" Y="591"/> <CursorPos X="49" Y="591"/>
<UsageCount Value="107"/> <UsageCount Value="106"/>
</Unit3> </Unit3>
<Unit4> <Unit4>
<Filename Value="C:\lazarus\components\lazutils\utf8process.pp"/> <Filename Value="C:\lazarus\components\lazutils\utf8process.pp"/>
@ -51,7 +51,7 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="636"/> <TopLine Value="636"/>
<CursorPos Y="654"/> <CursorPos Y="654"/>
<UsageCount Value="2"/> <UsageCount Value="1"/>
</Unit4> </Unit4>
<Unit5> <Unit5>
<Filename Value="images\memory.pas"/> <Filename Value="images\memory.pas"/>
@ -61,129 +61,129 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="40"/> <TopLine Value="40"/>
<CursorPos X="17" Y="44"/> <CursorPos X="17" Y="44"/>
<UsageCount Value="21"/> <UsageCount Value="20"/>
</Unit5> </Unit5>
</Units> </Units>
<JumpHistory Count="30" HistoryIndex="29"> <JumpHistory Count="30" HistoryIndex="29">
<Position1> <Position1>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2078" Column="14" TopLine="2075"/> <Caret Line="2088" Column="42" TopLine="2060"/>
</Position1> </Position1>
<Position2> <Position2>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="576" Column="29" TopLine="555"/> <Caret Line="2089" Column="43" TopLine="2061"/>
</Position2> </Position2>
<Position3> <Position3>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2412" Column="30" TopLine="2398"/> <Caret Line="2106" Column="41" TopLine="2078"/>
</Position3> </Position3>
<Position4> <Position4>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2421" Column="38" TopLine="2398"/> <Caret Line="2407" Column="33" TopLine="2378"/>
</Position4> </Position4>
<Position5> <Position5>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1304" Column="44" TopLine="1287"/> <Caret Line="2393" Column="13" TopLine="2391"/>
</Position5> </Position5>
<Position6> <Position6>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1305" Column="44" TopLine="1287"/> <Caret Line="2409" Column="37" TopLine="2393"/>
</Position6> </Position6>
<Position7> <Position7>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1306" Column="44" TopLine="1287"/> <Caret Line="2410" Column="36" TopLine="2393"/>
</Position7> </Position7>
<Position8> <Position8>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1307" Column="44" TopLine="1287"/> <Caret Line="571" Column="32" TopLine="548"/>
</Position8> </Position8>
<Position9> <Position9>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1308" Column="44" TopLine="1287"/> <Caret Line="1893" Column="4" TopLine="1890"/>
</Position9> </Position9>
<Position10> <Position10>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1309" Column="44" TopLine="1287"/> <Caret Line="1913" Column="20" TopLine="1892"/>
</Position10> </Position10>
<Position11> <Position11>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1310" Column="44" TopLine="1287"/> <Caret Line="1907" Column="19" TopLine="1892"/>
</Position11> </Position11>
<Position12> <Position12>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1311" Column="44" TopLine="1287"/> <Caret Line="2098" Column="43" TopLine="2093"/>
</Position12> </Position12>
<Position13> <Position13>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1312" Column="44" TopLine="1287"/> <Caret Line="2103" Column="11" TopLine="2088"/>
</Position13> </Position13>
<Position14> <Position14>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1313" Column="44" TopLine="1287"/> <Caret Line="2163" Column="20" TopLine="2160"/>
</Position14> </Position14>
<Position15> <Position15>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1314" Column="45" TopLine="1287"/> <Caret Line="2169" Column="21" TopLine="2160"/>
</Position15> </Position15>
<Position16> <Position16>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="1613" Column="41" TopLine="1585"/> <Caret Line="2160" Column="20" TopLine="2149"/>
</Position16> </Position16>
<Position17> <Position17>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2079" Column="42" TopLine="2051"/> <Caret Line="2468" Column="27" TopLine="2446"/>
</Position17> </Position17>
<Position18> <Position18>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2080" Column="42" TopLine="2052"/> <Caret Line="2514" Column="35" TopLine="2492"/>
</Position18> </Position18>
<Position19> <Position19>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2081" Column="42" TopLine="2053"/> <Caret Line="2505" Column="43" TopLine="2484"/>
</Position19> </Position19>
<Position20> <Position20>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2082" Column="42" TopLine="2054"/> <Caret Line="970" Column="48" TopLine="953"/>
</Position20> </Position20>
<Position21> <Position21>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2083" Column="42" TopLine="2055"/> <Caret Line="1830" Column="44" TopLine="1802"/>
</Position21> </Position21>
<Position22> <Position22>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2084" Column="42" TopLine="2056"/> <Caret Line="2123" Column="46" TopLine="2116"/>
</Position22> </Position22>
<Position23> <Position23>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2085" Column="42" TopLine="2057"/> <Caret Line="2160" Column="47" TopLine="2129"/>
</Position23> </Position23>
<Position24> <Position24>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2086" Column="42" TopLine="2058"/> <Caret Line="2161" Column="47" TopLine="2133"/>
</Position24> </Position24>
<Position25> <Position25>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2087" Column="42" TopLine="2059"/> <Caret Line="2162" Column="47" TopLine="2134"/>
</Position25> </Position25>
<Position26> <Position26>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2088" Column="42" TopLine="2060"/> <Caret Line="2163" Column="47" TopLine="2135"/>
</Position26> </Position26>
<Position27> <Position27>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2089" Column="43" TopLine="2061"/> <Caret Line="2164" Column="47" TopLine="2136"/>
</Position27> </Position27>
<Position28> <Position28>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2106" Column="41" TopLine="2078"/> <Caret Line="2460" Column="43" TopLine="2432"/>
</Position28> </Position28>
<Position29> <Position29>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2407" Column="33" TopLine="2378"/> <Caret Line="2515" Column="18" TopLine="2496"/>
</Position29> </Position29>
<Position30> <Position30>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
<Caret Line="2393" Column="13" TopLine="2391"/> <Caret Line="2510" Column="24" TopLine="2495"/>
</Position30> </Position30>
</JumpHistory> </JumpHistory>
<RunParams> <RunParams>