mirror of
https://github.com/moparisthebest/Simba
synced 2025-01-30 23:00:18 -05:00
Updated tha gui bish!
git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@154 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
Raymond
parent
86a67e64b2
commit
e1dc236d90
Binary file not shown.
|
Before Width: | Height: | Size: 510 B After Width: | Height: | Size: 879 B |
@ -1,4 +1,5 @@
|
||||
pause,stop: From Lazarus (http://lazarus.freepascal.org)
|
||||
addtab,closetab,cut,new,open,paste,redo,run,save,undo: Mark James http://www.famfamfam.com/lab/icons/silk/
|
||||
eraser: Yusuke Kamiyamane http://www.pinvoke.com/
|
||||
pickcolor: From the Crystal Clear Project (http://www.everaldo.com/crystal/) licensed under LGPL
|
||||
eraser,terminate: Yusuke Kamiyamane http://www.pinvoke.com/
|
||||
pickcolor: From the Crystal Clear Project (http://www.everaldo.com/crystal/) licensed under LGPL
|
||||
crosshair: http://led24.de/iconset/ or http://led24.de/ would be appreciated. Follow us on twitter http://twitter.com/gasyoun or email leds24@gmail.com 512 icons 20/05/2009
|
||||
BIN
Images/old_crosshair.png
Normal file
BIN
Images/old_crosshair.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 510 B |
BIN
Images/terminate.png
Normal file
BIN
Images/terminate.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 729 B |
@ -7,7 +7,7 @@
|
||||
<TargetFileExt Value=""/>
|
||||
<Title Value="Mufasa Stand Alone"/>
|
||||
<UseXPManifest Value="True"/>
|
||||
<ActiveEditorIndexAtStart Value="16"/>
|
||||
<ActiveEditorIndexAtStart Value="14"/>
|
||||
</General>
|
||||
<VersionInfo>
|
||||
<ProjectVersion Value=""/>
|
||||
@ -33,7 +33,7 @@
|
||||
<PackageName Value="LCL"/>
|
||||
</Item2>
|
||||
</RequiredPackages>
|
||||
<Units Count="132">
|
||||
<Units Count="136">
|
||||
<Unit0>
|
||||
<Filename Value="project1.lpr"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
@ -168,9 +168,9 @@
|
||||
<HasResources Value="True"/>
|
||||
<ResourceBaseClass Value="Form"/>
|
||||
<UnitName Value="TestUnit"/>
|
||||
<CursorPos X="3" Y="280"/>
|
||||
<TopLine Value="278"/>
|
||||
<EditorIndex Value="16"/>
|
||||
<CursorPos X="73" Y="167"/>
|
||||
<TopLine Value="135"/>
|
||||
<EditorIndex Value="14"/>
|
||||
<UsageCount Value="202"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit18>
|
||||
@ -284,7 +284,7 @@
|
||||
<CursorPos X="91" Y="37"/>
|
||||
<TopLine Value="29"/>
|
||||
<EditorIndex Value="4"/>
|
||||
<UsageCount Value="52"/>
|
||||
<UsageCount Value="54"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit33>
|
||||
<Unit34>
|
||||
@ -314,24 +314,28 @@
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<UnitName Value="mmlpsthread"/>
|
||||
<CursorPos X="45" Y="112"/>
|
||||
<TopLine Value="112"/>
|
||||
<CursorPos X="5" Y="89"/>
|
||||
<TopLine Value="80"/>
|
||||
<EditorIndex Value="19"/>
|
||||
<UsageCount Value="202"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit37>
|
||||
<Unit38>
|
||||
<Filename Value="../../Units/PascalScript/uPSComponent.pas"/>
|
||||
<UnitName Value="uPSComponent"/>
|
||||
<CursorPos X="76" Y="509"/>
|
||||
<TopLine Value="504"/>
|
||||
<EditorIndex Value="12"/>
|
||||
<UsageCount Value="29"/>
|
||||
<CursorPos X="3" Y="917"/>
|
||||
<TopLine Value="915"/>
|
||||
<EditorIndex Value="10"/>
|
||||
<UsageCount Value="31"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit38>
|
||||
<Unit39>
|
||||
<Filename Value="../../../FPC/FPCCheckout/rtl/objpas/classes/classesh.inc"/>
|
||||
<CursorPos X="21" Y="1436"/>
|
||||
<TopLine Value="1422"/>
|
||||
<UsageCount Value="9"/>
|
||||
<CursorPos X="15" Y="1433"/>
|
||||
<TopLine Value="1417"/>
|
||||
<EditorIndex Value="20"/>
|
||||
<UsageCount Value="11"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit39>
|
||||
<Unit40>
|
||||
<Filename Value="../../../FPC/FPCCheckout/rtl/objpas/types.pp"/>
|
||||
@ -378,9 +382,9 @@
|
||||
<Filename Value="../../../lazarus/components/synedit/synedit.pp"/>
|
||||
<UnitName Value="SynEdit"/>
|
||||
<CursorPos X="3" Y="2128"/>
|
||||
<TopLine Value="2141"/>
|
||||
<EditorIndex Value="17"/>
|
||||
<UsageCount Value="10"/>
|
||||
<TopLine Value="2128"/>
|
||||
<EditorIndex Value="24"/>
|
||||
<UsageCount Value="12"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit46>
|
||||
<Unit47>
|
||||
@ -391,16 +395,18 @@
|
||||
</Unit47>
|
||||
<Unit48>
|
||||
<Filename Value="../../../FPC/FPCCheckout/rtl/win/tthread.inc"/>
|
||||
<CursorPos X="15" Y="17"/>
|
||||
<TopLine Value="12"/>
|
||||
<UsageCount Value="8"/>
|
||||
<CursorPos X="3" Y="92"/>
|
||||
<TopLine Value="90"/>
|
||||
<EditorIndex Value="21"/>
|
||||
<UsageCount Value="11"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit48>
|
||||
<Unit49>
|
||||
<Filename Value="../../../FPC/FPCCheckout/rtl/inc/objpash.inc"/>
|
||||
<CursorPos X="23" Y="175"/>
|
||||
<TopLine Value="147"/>
|
||||
<EditorIndex Value="7"/>
|
||||
<UsageCount Value="31"/>
|
||||
<UsageCount Value="33"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit49>
|
||||
<Unit50>
|
||||
@ -410,7 +416,7 @@
|
||||
<CursorPos X="75" Y="91"/>
|
||||
<TopLine Value="75"/>
|
||||
<EditorIndex Value="5"/>
|
||||
<UsageCount Value="197"/>
|
||||
<UsageCount Value="200"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit50>
|
||||
<Unit51>
|
||||
@ -424,17 +430,17 @@
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/colour.inc"/>
|
||||
<CursorPos X="34" Y="56"/>
|
||||
<TopLine Value="39"/>
|
||||
<EditorIndex Value="14"/>
|
||||
<UsageCount Value="33"/>
|
||||
<EditorIndex Value="12"/>
|
||||
<UsageCount Value="35"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit52>
|
||||
<Unit53>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/bitmap.inc"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<CursorPos X="45" Y="254"/>
|
||||
<TopLine Value="223"/>
|
||||
<EditorIndex Value="15"/>
|
||||
<UsageCount Value="196"/>
|
||||
<TopLine Value="221"/>
|
||||
<EditorIndex Value="13"/>
|
||||
<UsageCount Value="199"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit53>
|
||||
<Unit54>
|
||||
@ -470,23 +476,21 @@
|
||||
<CursorPos X="21" Y="239"/>
|
||||
<TopLine Value="214"/>
|
||||
<EditorIndex Value="6"/>
|
||||
<UsageCount Value="18"/>
|
||||
<UsageCount Value="20"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit58>
|
||||
<Unit59>
|
||||
<Filename Value="../../../FPC/FPCCheckout/packages/fcl-image/src/fpimage.inc"/>
|
||||
<CursorPos X="14" Y="88"/>
|
||||
<TopLine Value="74"/>
|
||||
<EditorIndex Value="9"/>
|
||||
<UsageCount Value="17"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit59>
|
||||
<Unit60>
|
||||
<Filename Value="../../../lazarus/lcl/lclintf.pas"/>
|
||||
<UnitName Value="LCLIntf"/>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<TopLine Value="1"/>
|
||||
<UsageCount Value="0"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit60>
|
||||
<Unit61>
|
||||
<Filename Value="../../../lazarus/lcl/intfgraphics.pas"/>
|
||||
@ -518,14 +522,14 @@
|
||||
<Filename Value="../../../FPC/FPCCheckout/packages/fcl-image/src/fphandler.inc"/>
|
||||
<CursorPos X="18" Y="268"/>
|
||||
<TopLine Value="241"/>
|
||||
<UsageCount Value="0"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit65>
|
||||
<Unit66>
|
||||
<Filename Value="../../../FPC/FPCCheckout/packages/fcl-image/src/fpwritebmp.pp"/>
|
||||
<UnitName Value="FPWriteBMP"/>
|
||||
<CursorPos X="28" Y="722"/>
|
||||
<TopLine Value="698"/>
|
||||
<UsageCount Value="0"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit66>
|
||||
<Unit67>
|
||||
<Filename Value="../../../lazarus/lcl/include/rasterimage.inc"/>
|
||||
@ -563,7 +567,7 @@
|
||||
<Filename Value="../../../FPC/FPCCheckout/rtl/i386/fastmove.inc"/>
|
||||
<CursorPos X="44" Y="836"/>
|
||||
<TopLine Value="817"/>
|
||||
<UsageCount Value="0"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit72>
|
||||
<Unit73>
|
||||
<Filename Value="../../Units/MMLCore/colour_conv.pas"/>
|
||||
@ -572,7 +576,7 @@
|
||||
<CursorPos X="41" Y="76"/>
|
||||
<TopLine Value="76"/>
|
||||
<EditorIndex Value="0"/>
|
||||
<UsageCount Value="179"/>
|
||||
<UsageCount Value="182"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit73>
|
||||
<Unit74>
|
||||
@ -599,34 +603,34 @@
|
||||
<UnitName Value="uPSCompiler"/>
|
||||
<CursorPos X="35" Y="11215"/>
|
||||
<TopLine Value="11203"/>
|
||||
<EditorIndex Value="13"/>
|
||||
<UsageCount Value="22"/>
|
||||
<EditorIndex Value="11"/>
|
||||
<UsageCount Value="24"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit77>
|
||||
<Unit78>
|
||||
<Filename Value="../../Units/MMLCore/macro/ColorSame.inc"/>
|
||||
<CursorPos X="37" Y="5"/>
|
||||
<TopLine Value="1"/>
|
||||
<UsageCount Value="0"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit78>
|
||||
<Unit79>
|
||||
<Filename Value="../../../Documents/fpc/rtl/inc/mathh.inc"/>
|
||||
<CursorPos X="19" Y="58"/>
|
||||
<TopLine Value="56"/>
|
||||
<UsageCount Value="0"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit79>
|
||||
<Unit80>
|
||||
<Filename Value="../../../Documents/fpc/rtl/objpas/sysutils/sysutilh.inc"/>
|
||||
<CursorPos X="19" Y="72"/>
|
||||
<TopLine Value="57"/>
|
||||
<UsageCount Value="0"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit80>
|
||||
<Unit81>
|
||||
<Filename Value="../../Units/PascalScript/uPSRuntime.pas"/>
|
||||
<UnitName Value="uPSRuntime"/>
|
||||
<CursorPos X="54" Y="1887"/>
|
||||
<TopLine Value="1875"/>
|
||||
<UsageCount Value="0"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit81>
|
||||
<Unit82>
|
||||
<Filename Value="../../Units/MMLAddon/plugins.pas"/>
|
||||
@ -634,7 +638,7 @@
|
||||
<UnitName Value="plugins"/>
|
||||
<CursorPos X="86" Y="128"/>
|
||||
<TopLine Value="128"/>
|
||||
<UsageCount Value="173"/>
|
||||
<UsageCount Value="176"/>
|
||||
</Unit82>
|
||||
<Unit83>
|
||||
<Filename Value="../../../Compilertje/Units/CogatUnits/compfiles.pas"/>
|
||||
@ -726,9 +730,7 @@
|
||||
<UnitName Value="dtm"/>
|
||||
<CursorPos X="34" Y="141"/>
|
||||
<TopLine Value="113"/>
|
||||
<EditorIndex Value="10"/>
|
||||
<UsageCount Value="154"/>
|
||||
<Loaded Value="True"/>
|
||||
<UsageCount Value="157"/>
|
||||
</Unit96>
|
||||
<Unit97>
|
||||
<Filename Value="../../../cogat/Units/CogatUnits/comppicker.pas"/>
|
||||
@ -743,8 +745,8 @@
|
||||
<UnitName Value="colourpicker"/>
|
||||
<CursorPos X="20" Y="56"/>
|
||||
<TopLine Value="46"/>
|
||||
<EditorIndex Value="18"/>
|
||||
<UsageCount Value="150"/>
|
||||
<EditorIndex Value="25"/>
|
||||
<UsageCount Value="153"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit98>
|
||||
<Unit99>
|
||||
@ -770,7 +772,7 @@
|
||||
<UnitName Value="windowselector"/>
|
||||
<CursorPos X="32" Y="12"/>
|
||||
<TopLine Value="31"/>
|
||||
<UsageCount Value="140"/>
|
||||
<UsageCount Value="143"/>
|
||||
</Unit101>
|
||||
<Unit102>
|
||||
<Filename Value="../../../usr/lib64/fpc/2.2.4/source/rtl/objpas/classes/classesh.inc"/>
|
||||
@ -781,9 +783,11 @@
|
||||
<Unit103>
|
||||
<Filename Value="../../../lazarus/lcl/forms.pp"/>
|
||||
<UnitName Value="Forms"/>
|
||||
<CursorPos X="15" Y="1206"/>
|
||||
<TopLine Value="1192"/>
|
||||
<UsageCount Value="10"/>
|
||||
<CursorPos X="15" Y="539"/>
|
||||
<TopLine Value="523"/>
|
||||
<EditorIndex Value="22"/>
|
||||
<UsageCount Value="11"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit103>
|
||||
<Unit104>
|
||||
<Filename Value="../../../usr/lib64/fpc/2.2.4/source/rtl/unix/cthreads.pp"/>
|
||||
@ -804,7 +808,7 @@
|
||||
<UnitName Value="dtmutil"/>
|
||||
<CursorPos X="32" Y="18"/>
|
||||
<TopLine Value="1"/>
|
||||
<UsageCount Value="127"/>
|
||||
<UsageCount Value="130"/>
|
||||
</Unit106>
|
||||
<Unit107>
|
||||
<Filename Value="../../../cogat/Units/CogatUnits/compmaths.pas"/>
|
||||
@ -844,10 +848,10 @@
|
||||
<Filename Value="../../Units/MMLCore/mmath.pas"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<UnitName Value="mmath"/>
|
||||
<CursorPos X="133" Y="45"/>
|
||||
<TopLine Value="16"/>
|
||||
<EditorIndex Value="11"/>
|
||||
<UsageCount Value="107"/>
|
||||
<CursorPos X="32" Y="42"/>
|
||||
<TopLine Value="39"/>
|
||||
<EditorIndex Value="9"/>
|
||||
<UsageCount Value="110"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit112>
|
||||
<Unit113>
|
||||
@ -885,7 +889,7 @@
|
||||
<CursorPos X="43" Y="42"/>
|
||||
<TopLine Value="10"/>
|
||||
<EditorIndex Value="3"/>
|
||||
<UsageCount Value="77"/>
|
||||
<UsageCount Value="80"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit117>
|
||||
<Unit118>
|
||||
@ -901,7 +905,7 @@
|
||||
<UnitName Value="project"/>
|
||||
<CursorPos X="46" Y="15"/>
|
||||
<TopLine Value="1"/>
|
||||
<UsageCount Value="74"/>
|
||||
<UsageCount Value="77"/>
|
||||
</Unit119>
|
||||
<Unit120>
|
||||
<Filename Value="../../../FPC/FPCCheckout/rtl/inc/heap.inc"/>
|
||||
@ -917,9 +921,11 @@
|
||||
</Unit121>
|
||||
<Unit122>
|
||||
<Filename Value="../../../lazarus/lcl/include/customform.inc"/>
|
||||
<CursorPos X="79" Y="1534"/>
|
||||
<TopLine Value="1523"/>
|
||||
<UsageCount Value="13"/>
|
||||
<CursorPos X="17" Y="1643"/>
|
||||
<TopLine Value="1630"/>
|
||||
<EditorIndex Value="23"/>
|
||||
<UsageCount Value="14"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit122>
|
||||
<Unit123>
|
||||
<Filename Value="../../../lazarus/lcl/include/winapih.inc"/>
|
||||
@ -975,130 +981,164 @@
|
||||
<CursorPos X="9" Y="152"/>
|
||||
<TopLine Value="147"/>
|
||||
<EditorIndex Value="8"/>
|
||||
<UsageCount Value="17"/>
|
||||
<UsageCount Value="19"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit131>
|
||||
<Unit132>
|
||||
<Filename Value="../../../FPC/FPCCheckout/rtl/inc/threadh.inc"/>
|
||||
<CursorPos X="11" Y="135"/>
|
||||
<TopLine Value="119"/>
|
||||
<EditorIndex Value="17"/>
|
||||
<UsageCount Value="11"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit132>
|
||||
<Unit133>
|
||||
<Filename Value="../../../FPC/FPCCheckout/rtl/inc/thread.inc"/>
|
||||
<CursorPos X="21" Y="152"/>
|
||||
<TopLine Value="152"/>
|
||||
<EditorIndex Value="18"/>
|
||||
<UsageCount Value="11"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit133>
|
||||
<Unit134>
|
||||
<Filename Value="../../../lazarus/lcl/comctrls.pp"/>
|
||||
<UnitName Value="ComCtrls"/>
|
||||
<CursorPos X="39" Y="1495"/>
|
||||
<TopLine Value="1478"/>
|
||||
<EditorIndex Value="15"/>
|
||||
<UsageCount Value="10"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit134>
|
||||
<Unit135>
|
||||
<Filename Value="../../../lazarus/lcl/imglist.pp"/>
|
||||
<UnitName Value="ImgList"/>
|
||||
<CursorPos X="3" Y="58"/>
|
||||
<TopLine Value="41"/>
|
||||
<EditorIndex Value="16"/>
|
||||
<UsageCount Value="10"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit135>
|
||||
</Units>
|
||||
<JumpHistory Count="30" HistoryIndex="29">
|
||||
<Position1>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="278" Column="9" TopLine="276"/>
|
||||
<Caret Line="249" Column="14" TopLine="239"/>
|
||||
</Position1>
|
||||
<Position2>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="109" Column="59" TopLine="77"/>
|
||||
<Caret Line="360" Column="12" TopLine="332"/>
|
||||
</Position2>
|
||||
<Position3>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="205" Column="8" TopLine="203"/>
|
||||
<Caret Line="453" Column="10" TopLine="425"/>
|
||||
</Position3>
|
||||
<Position4>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="250" Column="3" TopLine="248"/>
|
||||
<Caret Line="472" Column="1" TopLine="468"/>
|
||||
</Position4>
|
||||
<Position5>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="206" Column="19" TopLine="203"/>
|
||||
<Caret Line="119" Column="95" TopLine="99"/>
|
||||
</Position5>
|
||||
<Position6>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="217" Column="18" TopLine="209"/>
|
||||
<Caret Line="242" Column="12" TopLine="240"/>
|
||||
</Position6>
|
||||
<Position7>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="207" Column="25" TopLine="205"/>
|
||||
<Caret Line="175" Column="10" TopLine="174"/>
|
||||
</Position7>
|
||||
<Position8>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="228" Column="3" TopLine="220"/>
|
||||
<Caret Line="274" Column="12" TopLine="272"/>
|
||||
</Position8>
|
||||
<Position9>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="218" Column="3" TopLine="216"/>
|
||||
<Caret Line="217" Column="9" TopLine="205"/>
|
||||
</Position9>
|
||||
<Position10>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="179" Column="18" TopLine="163"/>
|
||||
<Caret Line="449" Column="14" TopLine="447"/>
|
||||
</Position10>
|
||||
<Position11>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="181" Column="3" TopLine="179"/>
|
||||
<Caret Line="6" Column="115" TopLine="1"/>
|
||||
</Position11>
|
||||
<Position12>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="102" Column="27" TopLine="82"/>
|
||||
<Caret Line="159" Column="24" TopLine="143"/>
|
||||
</Position12>
|
||||
<Position13>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="9" Column="135" TopLine="1"/>
|
||||
<Caret Line="516" Column="42" TopLine="499"/>
|
||||
</Position13>
|
||||
<Position14>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="354" Column="13" TopLine="343"/>
|
||||
<Caret Line="557" Column="40" TopLine="540"/>
|
||||
</Position14>
|
||||
<Position15>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="333" Column="10" TopLine="305"/>
|
||||
<Caret Line="142" Column="80" TopLine="125"/>
|
||||
</Position15>
|
||||
<Position16>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="344" Column="15" TopLine="312"/>
|
||||
<Caret Line="137" Column="41" TopLine="119"/>
|
||||
</Position16>
|
||||
<Position17>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="254" Column="3" TopLine="249"/>
|
||||
<Caret Line="495" Column="35" TopLine="487"/>
|
||||
</Position17>
|
||||
<Position18>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="255" Column="3" TopLine="249"/>
|
||||
<Caret Line="473" Column="14" TopLine="471"/>
|
||||
</Position18>
|
||||
<Position19>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="257" Column="3" TopLine="249"/>
|
||||
<Caret Line="220" Column="10" TopLine="204"/>
|
||||
</Position19>
|
||||
<Position20>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="134" Column="19" TopLine="98"/>
|
||||
<Caret Line="142" Column="70" TopLine="126"/>
|
||||
</Position20>
|
||||
<Position21>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="199" Column="27" TopLine="196"/>
|
||||
<Caret Line="493" Column="65" TopLine="481"/>
|
||||
</Position21>
|
||||
<Position22>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="289" Column="14" TopLine="287"/>
|
||||
<Caret Line="473" Column="14" TopLine="471"/>
|
||||
</Position22>
|
||||
<Position23>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="136" Column="21" TopLine="111"/>
|
||||
<Caret Line="158" Column="22" TopLine="150"/>
|
||||
</Position23>
|
||||
<Position24>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="5" Column="130" TopLine="1"/>
|
||||
<Caret Line="443" Column="1" TopLine="427"/>
|
||||
</Position24>
|
||||
<Position25>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="183" Column="3" TopLine="139"/>
|
||||
<Caret Line="482" Column="109" TopLine="466"/>
|
||||
</Position25>
|
||||
<Position26>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="216" Column="12" TopLine="198"/>
|
||||
<Caret Line="483" Column="107" TopLine="466"/>
|
||||
</Position26>
|
||||
<Position27>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="439" Column="18" TopLine="431"/>
|
||||
<Caret Line="484" Column="110" TopLine="466"/>
|
||||
</Position27>
|
||||
<Position28>
|
||||
<Filename Value="../../../lazarus/components/synedit/synedit.pp"/>
|
||||
<Caret Line="6453" Column="13" TopLine="6449"/>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="485" Column="130" TopLine="466"/>
|
||||
</Position28>
|
||||
<Position29>
|
||||
<Filename Value="../../../lazarus/components/synedit/synedit.pp"/>
|
||||
<Caret Line="2120" Column="17" TopLine="2118"/>
|
||||
<Filename Value="../../../lazarus/lcl/comctrls.pp"/>
|
||||
<Caret Line="1561" Column="66" TopLine="1544"/>
|
||||
</Position29>
|
||||
<Position30>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="131" Column="14" TopLine="112"/>
|
||||
<Filename Value="../../../lazarus/lcl/comctrls.pp"/>
|
||||
<Caret Line="1495" Column="39" TopLine="1478"/>
|
||||
</Position30>
|
||||
</JumpHistory>
|
||||
</ProjectOptions>
|
||||
|
||||
@ -1,7 +1,7 @@
|
||||
object Form1: TForm1
|
||||
Left = 569
|
||||
Left = 436
|
||||
Height = 553
|
||||
Top = 162
|
||||
Top = 152
|
||||
Width = 723
|
||||
ActiveControl = SynEdit1
|
||||
Caption = 'Mufasa v2'
|
||||
@ -27,7 +27,6 @@ object Form1: TForm1
|
||||
ParentColor = False
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
BookMarkOptions.OnChange = nil
|
||||
Gutter.Width = 57
|
||||
Gutter.MouseActions = <
|
||||
item
|
||||
@ -721,7 +720,6 @@ object Form1: TForm1
|
||||
Caption = 'ToolBar1'
|
||||
Images = Mufasa_Image_List
|
||||
TabOrder = 2
|
||||
OnClick = ToolBar1Click
|
||||
object TB_Run: TToolButton
|
||||
Left = 73
|
||||
Top = 2
|
||||
@ -735,6 +733,7 @@ object Form1: TForm1
|
||||
Caption = 'ToolButton1'
|
||||
Enabled = False
|
||||
ImageIndex = 5
|
||||
OnClick = ButtonPauseClick
|
||||
end
|
||||
object TB_Stop: TToolButton
|
||||
Left = 119
|
||||
@ -742,6 +741,7 @@ object Form1: TForm1
|
||||
Caption = 'ToolButton1'
|
||||
Enabled = False
|
||||
ImageIndex = 7
|
||||
OnClick = ButtonStopClick
|
||||
end
|
||||
object ToolButton1: TToolButton
|
||||
Left = 142
|
||||
@ -864,6 +864,9 @@ object Form1: TForm1
|
||||
Top = 510
|
||||
Width = 723
|
||||
Panels = <
|
||||
item
|
||||
Width = 75
|
||||
end
|
||||
item
|
||||
Text = 'Untitled'
|
||||
Width = 150
|
||||
@ -874,13 +877,49 @@ object Form1: TForm1
|
||||
SimplePanel = False
|
||||
end
|
||||
object MainMenu1: TMainMenu
|
||||
left = 608
|
||||
left = 560
|
||||
object MenuFile: TMenuItem
|
||||
Caption = 'File'
|
||||
SubMenuImages = Mufasa_Image_List
|
||||
OnClick = MenuFileClick
|
||||
object MenuItemNew: TMenuItem
|
||||
Caption = 'New'
|
||||
Bitmap.Data = {
|
||||
36040000424D3604000000000000360000002800000010000000100000000100
|
||||
2000000000000004000064000000640000000000000000000000FFFFFF00BB6A
|
||||
346BBA6530BCBB6631EDBA6630F7BA6630F7BA6630F7BA6530F7BA652FF7B965
|
||||
2EF7B9652EF7B9642EF7B9642EEFB7622CBDB7622E63FFFFFF00FFFFFF00BC69
|
||||
33DEF8F1EAF2F7ECDFFDF6EBDEFFF6EADEFFF6EADCFFF6EADCFFFAF3EBFFFAF3
|
||||
EBFFFAF2EAFFFCF7F3FFFCF8F4FDFEFEFDF0B7602AD5FFFFFF00FFFFFF00BF71
|
||||
38F5F5EBDFFEFDBF68FFFCBD67FFFBBE65FFFCBE64FFFCBE64FFFCBD62FFFBBD
|
||||
63FFFBBC61FFFCBE60FFFCBC62FFFDFBF8FDB9642DF3FFFFFF00FFFFFF00C178
|
||||
3CF7F7EDE3FFFDC26EFFFFD8A0FFFFD79EFFFFD69BFFFFD798FFFFD696FFFFD6
|
||||
95FFFFD594FFFFD493FFFBBE65FFFBF7F4FFBB6731F7FFFFFF00FFFFFF00C47C
|
||||
40F7F7F0E6FFF8B455FFF7B456FFF7B554FFF8B453FFF8B253FFF7B352FFF7B3
|
||||
52FFF7B251FFF7B24FFFF7B24FFFFCF9F5FFBF6F36F7FFFFFF00FFFFFF00C580
|
||||
42F7F8F1E8FFFEE5D5FFFDE5D3FFFDE5D3FFFCE5D3FFFCE5D3FFFCE4D1FFFCE2
|
||||
CEFFFCE2CCFFFBE0C9FFFBE1C8FFFDFAF7FFC1763BF7FFFFFF00FFFFFF00C582
|
||||
45F7F8F2EBFFFEE7D6FFFDE7D6FFFDE7D6FFFDE7D6FFFDE6D5FFFDE5D3FFFCE4
|
||||
D1FFFCE2CDFFFBE1CBFFFBE1C9FFFBF7F2FFC57C3FF7FFFFFF00FFFFFF00C684
|
||||
47F7F9F3ECFFFEE8D6FFFEE8D7FFFDE7D6FFFDE7D6FFFDE7D5FFFDE5D3FFFBE4
|
||||
D0FFFBE3CCFFFADFC7FFFADFC6FFFAF2EAFFC68042F7FFFFFF00FFFFFF00C688
|
||||
49F7F9F4EDFFFEE8D8FFFEE8D8FFFEE8D7FFFEE7D6FFFDE5D3FFFCE4D1FFFBE1
|
||||
CCFFFAE0C7FFF9DDC3FFF8DCC2FFFAF4EDFFC68245F7FFFFFF00FFFFFF00C688
|
||||
4AF7F9F4EFFFFEE7D7FFFDE7D6FFFDE7D5FFFDE6D4FFFCE6D2FFFBE1CCFFFADF
|
||||
C7FFF8DCC2FFF6DABDFFF6D8BBFFFAF4EFFFC68346F7FFFFFF00FFFFFF00C689
|
||||
4BF7F9F4F0FFFCE6D3FFFCE6D4FFFDE7D3FFFCE4D1FFFBE3CDFFFAE0C8FFF8DC
|
||||
C2FFF5D6BBFFF3D4B5FFF1D2B3FFF8F4F0FFC48246F7FFFFFF00FFFFFF00C689
|
||||
4BF7F9F5F1FFFCE3CFFFFBE4D0FFFCE4CFFFFCE3CDFFFAE1CAFFF9DDC4FFF6D9
|
||||
BCFFF4E9DFFFF7F2ECFFFBF7F3FFF5EFE9FFC27E45FBFFFFFF00FFFFFF00C689
|
||||
4CF6F9F5F1FFFCE3CDFFFBE3CEFFFBE3CDFFFBE2CBFFF9E0C8FFF8DCC2FFF5D6
|
||||
BAFFFDFBF8FFFCE6CDFFFAE5C9FFE2B684FFBF7942A6FFFFFF00FFFFFF00C588
|
||||
4BEAFAF6F2FCFAE0C7FFFBE1C9FFFBE2C9FFFBE0C8FFF9DFC5FFF8DBC1FFF4D6
|
||||
B8FFFFFBF8FFF6D8B4FFE1B07DFFDB9264F6B46B3E07FFFFFF00FFFFFF00C485
|
||||
49C3F7F2ECECF8F4EEFCF8F4EDFFF8F3EDFFF8F3EDFFF8F3EDFFF8F2ECFFF7F2
|
||||
ECFFF2E6D7FFE2B27DFFDB9465F5B3683B07FFFFFF00FFFFFF00FFFFFF00C17D
|
||||
4460C88B4DBBC88C4FEEC88C4FF6C88C4FF7C88C4FF7C88D4FF7C98C4FF7C78B
|
||||
4FF7C5894BD4C4763B91B3683C06FFFFFF00FFFFFF00FFFFFF00
|
||||
}
|
||||
ImageIndex = 9
|
||||
ShortCut = 16462
|
||||
SubMenuImages = Mufasa_Image_List
|
||||
@ -888,12 +927,84 @@ object Form1: TForm1
|
||||
end
|
||||
object MenuItemOpen: TMenuItem
|
||||
Caption = 'Open'
|
||||
Bitmap.Data = {
|
||||
36040000424D3604000000000000360000002800000010000000100000000100
|
||||
20000000000000040000640000006400000000000000000000002C86D8D12D88
|
||||
D8F72D87D8F72D88D8F72D88D8F72D88D8F72D88D8F72D88D8F72D88D8F72D88
|
||||
D8F72D88D8F72D87D8F72D88D8F72C86D8D1FFFFFF00FFFFFF00338ED9FBDCF0
|
||||
FAFF98E1F6FF95E0F6FF92DFF6FF8EDEF5FF89DCF5FF85DAF4FF80D9F4FF7AD7
|
||||
F3FF74D5F3FF70D3F2FFC2EAF8FF3594DAFFFFFFFF00FFFFFF003594DAF7EFFA
|
||||
FEFF93E5F8FF8FE4F8FF89E3F8FF82E1F7FF7ADFF7FF71DEF6FF67DBF5FF5BD8
|
||||
F4FF4DD4F3FF40D1F2FFCAF2FBFF3594DAFFFFFFFF00FFFFFF00369ADAF8F2FA
|
||||
FDFF94E6F8FF92E5F8FF90E5F8FF8BE3F8FF86E2F7FF7FE1F7FF77DEF6FF6CDC
|
||||
F6FF5ED9F4FF4FD5F3FFCCF2FBFF3594DAFFFFFFFF00FFFFFF0036A1DAF9F6FC
|
||||
FEFF94E5F8FF93E5F8FF93E5F8FF91E5F8FF93DBE9FF93D7E3FF93D2DCFF90CE
|
||||
D7FF8CC8CFFF86C1C6FFC9D8D6FF3594DAFFC57444E8CA7F53F137A6DAFAFEFF
|
||||
FFFFF8FDFFFFF6FDFFFFF5FCFFFFF3FCFEFF9AE4F4FF9AE6F7FF9BE6F6FF9DE5
|
||||
F5FF9EE5F5FF9FE5F4FFDAF3F8FF3594DAFFFDF4EEFFCA8054F935ABDAFAE8F6
|
||||
FBFF70BCE7FF55AAE2FF4DA5E0FF91C9EBFFFAF3EFFFFDFEFDFFFFFDFCFFFFFD
|
||||
FCFFFEFDFCFFFEFCFBFFFEFEFDFF3594DAFFEFF2E8FFCE8156FF36AADAF2F1FA
|
||||
FDFF94DEF5FF93DCF4FF64BCE9FF3594DAFF3594DAFF3594DAFF3594DAFF3594
|
||||
DAFF3594DAFF3594DAFF3594DAFF3594DAFFFBF6EFFFCC8355FE35AFDAF0F7FC
|
||||
FEFF8EE4F8FF91DEF5FF9FE0F5FFACE1F6FFCA8452FFFFF7F1FFFFE9D9FFFFEA
|
||||
DBFFFFE9D9FFFFE7D7FFFFE5D2FFFFE2CBFFFFF7F1FFCB8555FE36B3DAF8FDFE
|
||||
FEFFFEFFFFFFFEFEFFFFFDFEFFFFFEFFFFFFE4BA91FFFFF7F0FFFFE7D5FFFDE7
|
||||
D6FFFDE6D4FFFCE4D0FFFBE3CBFFFADCC2FFFEF3E8FFCC8656FE34B4D9D05EC2
|
||||
E1FA60C3E2FA60C3E2FA60C3E2FA5FC3E2FAE4BB91FFFFF7F2FFFEE7D5FFFEE7
|
||||
D5FFFDE5D1FFFAE0CAFFF9DEC4FFF7D9BCFFFDF2E7FFCC8757FEFFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00E4BB92FFFEF7F1FFFCE5D2FFFCE4
|
||||
D1FFFBE2CCFFF9DDC4FFF6D7BBFFF3D1AFFFFAEFE4FFCC8758FEFFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00E4BB92FFFEF6F0FFFCE2CDFFFCE3
|
||||
CDFFFADFC8FFF7D9BCFFF5E9DDFFFAF3EBFFFBF8F3FFCA8353FEFFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00E4BB93FFFEF5EDFFFCDEC5FFFBE0
|
||||
C7FFF9DCC2FFF5D3B4FFFEF9F3FFFAE2C4FFECC193FFC37D4893FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00E5BE96FFFFFFFEFFFDF3E9FFFDF3
|
||||
EAFFFCF2E8FFFAEFE3FFFAF2E7FFEABB88FFCF8555B3B4693D0CFFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00EAC39DFFE6BF96FFE4BB92FFE4BB
|
||||
92FFD1A06CF5D09E6DF6CC965FDAC479427EB2673C09FFFFFF00
|
||||
}
|
||||
ImageIndex = 10
|
||||
ShortCut = 16463
|
||||
OnClick = MenuItemOpenClick
|
||||
end
|
||||
object MenuItemSave: TMenuItem
|
||||
Caption = 'Save'
|
||||
Bitmap.Data = {
|
||||
36040000424D3604000000000000360000002800000010000000100000000100
|
||||
2000000000000004000064000000640000000000000000000000BA6A368FB969
|
||||
35B5B86935EEB76835FFB56835FFB46734FFB26634FFB06533FFAE6433FFAC63
|
||||
32FFAA6232FFA96132FFA86031FFA76031FEA66031F1A86131C4BA6A35DEEBC6
|
||||
ADFFEAC5ADFFFEFBF8FFFEFBF8FFFEFBF8FFFEFBF8FFFEFBF8FFFEFBF8FFFEFB
|
||||
F8FFFEFBF8FFFEFBF8FFFEFBF8FFC89A7CFFC79879FFA76031EDBA6B37FEEDCA
|
||||
B3FFE0A27AFFFEFAF7FF62C088FF62C088FF62C088FF62C088FF62C088FF62C0
|
||||
88FF62C088FF62C088FFFDF9F6FFCA8D65FFC99B7CFFA76031FEBB6C38FFEECC
|
||||
B6FFE1A27AFFFEFAF7FFBFDCC2FFBFDCC2FFBFDCC2FFBFDCC2FFBFDCC2FFBFDC
|
||||
C2FFBFDCC2FFBFDCC2FFFDF9F6FFCD9068FFCC9E81FFA86132FFBB6B38FFEFCE
|
||||
B8FFE1A279FFFEFAF7FF62C088FF62C088FF62C088FF62C088FF62C088FF62C0
|
||||
88FF62C088FF62C088FFFDF9F6FFCF936AFFCEA384FFAA6132FFBA6A36FFEFD0
|
||||
BBFFE2A27AFFFEFBF8FFFEFBF8FFFEFBF8FFFEFBF8FFFEFBF8FFFEFBF8FFFEFB
|
||||
F8FFFEFBF8FFFEFBF8FFFEFBF8FFD3966DFFD2A78AFFAB6232FFBB6A36FFF0D2
|
||||
BEFFE2A37AFFE2A37AFFE1A37AFFE2A37BFFE1A37BFFE0A178FFDE9F77FFDD9F
|
||||
76FFDC9D74FFD99B72FFD89971FFD69970FFD5AB8EFFAD6333FFBB6A36FFF2D5
|
||||
C2FFE3A37AFFE3A37AFFE2A37BFFE2A37BFFE2A47BFFE1A279FFE0A178FFDEA0
|
||||
77FFDE9E75FFDC9D74FFDA9B73FFD99B73FFDAB095FFAF6433FFBB6A36FFF2D8
|
||||
C5FFE3A47BFFE3A37AFFE3A47AFFE2A47BFFE2A37BFFE1A37BFFE1A279FFDFA0
|
||||
77FFDE9F76FFDD9E74FFDB9C72FFDC9D74FFDDB59AFFB16534FFBB6B36FFF4D9
|
||||
C7FFE6A67DFFC88C64FFC98D65FFC98E67FFCB926CFFCB926DFFCA9069FFC88C
|
||||
65FFC88C64FFC88C64FFC88C64FFDA9C74FFE1BA9FFFB36634FFBB6B36FEF4DC
|
||||
C9FFE7A77DFFF9ECE1FFF9ECE1FFF9EDE3FFFCF4EEFFFDFAF7FFFDF7F3FFFAED
|
||||
E5FFF7E7DBFFF7E5D9FFF6E5D8FFDEA077FFE4BEA4FFB46734FFBC6B36FAF5DD
|
||||
CCFFE7A87EFFFAF0E8FFFAF0E8FFC98D66FFFAF0E9FFFDF8F3FFFEFAF8FFFCF4
|
||||
EFFFF9E9DFFFF7E7DBFFF7E5D9FFE0A278FFE7C2A9FFB66835FFBC6B36F0F6DF
|
||||
D0FFE8A87EFFFCF6F1FFFCF6F1FFC88C64FFFAF1E9FFFBF4EEFFFDFAF7FFFDF9
|
||||
F6FFFAF0E8FFF8E8DDFFF7E6DBFFE1A37AFFEFD5C3FFB76935FEBC6B36D8F6DF
|
||||
D1FFE9AA80FFFEFAF6FFFDFAF6FFC88C64FFFBF3EEFFFBF1EAFFFCF6F2FFFEFB
|
||||
F8FFFCF6F1FFF9ECE2FFF8E7DBFFEED0BAFFECD0BDFFBB703EF8BC6B369BF6E0
|
||||
D1FFF7E0D1FFFEFBF8FFFEFBF7FFFDF9F6FFFCF5F0FFFAF0EAFFFBF2EDFFFDF9
|
||||
F6FFFDFAF7FFFBF1EBFFF8E9DFFEECD0BDFBC9895EECB5693563BC6B3671BC6B
|
||||
3690BC6B36CCBC6B36EEBC6B36FABB6B36FEBB6B36FFBB6A36FFBB6A36FFBC6C
|
||||
39FFBD6E3BFFBB6D3AFFBB6B38EFBB703ECBB6693554FFFFFF00
|
||||
}
|
||||
ImageIndex = 14
|
||||
ShortCut = 16467
|
||||
OnClick = MenuItemSaveClick
|
||||
@ -909,24 +1020,168 @@ object Form1: TForm1
|
||||
OnClick = MenuEditClick
|
||||
object MenuItemUndo: TMenuItem
|
||||
Caption = 'Undo'
|
||||
Bitmap.Data = {
|
||||
36040000424D3604000000000000360000002800000010000000100000000100
|
||||
2000000000000004000064000000640000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000018A6C3691AA7C46900A0C4180000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000A0C45D66DBEAB211A6C2AE0000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000A0C42243C4DBFC43C5D8FE23A6C07F00000000000000000000
|
||||
00000000000000000000000000000000000000A0C4FF00000000000000000000
|
||||
000000000000000000000EAACBFE5DDAE9FE23A6C0EF00000000000000000000
|
||||
000000000000000000000000000000A0C4FF00A0C4FF00000000000000000000
|
||||
000000000000009EC11A02ACC8FF88E7F2FE11A2C2FF00000000000000000000
|
||||
00000000000005797D1100A0C4FF76EDFBFF00A0C4FF000000000000000000A0
|
||||
C4300099B95000A0C4C96DE6F5FF76E2EFFF19A3C1FF00000000000000000000
|
||||
000005797D1100A0C4FF76EDFBFF76EDFBFF00A0C4FF00A0C4FF00A0C4FF00A0
|
||||
C4FF01A9C4FF6EE1EEFF0FC9DFFF69E4F2FF1AA4C0F800000000000000000579
|
||||
7D1100A0C4FF76EDFBFF04C3DAFF76EDFBFF69EAF9FF69EAF9FF69EAF9FF69EA
|
||||
F9FF05DDF7FF0AC8DFFF07C2D8FF6FDCEBFF1BA3BFF40000000005797E1100A0
|
||||
C4FF79EDFBFF32E2F8FF2CDFF4FF04C0D6FF04C0D6FF04C0D6FF1DD2E8FF1DD2
|
||||
E8FF1DD2E8FF0BC8DFFF6AE5F3FF1BABC5F815A0BCCB0000000000A0C4FFADF3
|
||||
FBFF2FE0F6FF32E2F8FF32E2F7FF32E2F7FF2FE0F5FF29DBF1FF1DD2E8FF1DD2
|
||||
E8FF1DD2E8FF36D9ECFF40CDE1FF16A1BDCA05797D0A0000000005797D0A00A0
|
||||
C4FFADF3FBFF2FE0F6FF32E2F7FF29DBF1FF2FE0F5FF29DBF1FF16CDE3FF36D9
|
||||
ECFF69E7F6FF41CEE3FE13A3C1E405797D320000000000000000000000000579
|
||||
7D1100A0C4FFADF3FBFF31E1F6FF20E3FAFF73ECFAFF6FEBFAFF6EE8F7FF6CE8
|
||||
F7F814A1BCD414A3C1D505797D1C000000000000000000000000000000000000
|
||||
000005797D1100A0C4FFADF3FBFF25E4FBFF00A0C4FF00A0C4FF13A1BEE7159F
|
||||
BBCF1BA1BBA4067A7C0B00000000000000000000000000000000000000000000
|
||||
00000000000005797D1100A0C4FFADF3FBFF00A0C4FF00000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000009DBF1400A0C4FF00A0C4FF00000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000000000000000000000A0C4FF00000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000
|
||||
}
|
||||
ImageIndex = 18
|
||||
ShortCut = 16474
|
||||
OnClick = MenuItemUndoClick
|
||||
end
|
||||
object MenuItemRedo: TMenuItem
|
||||
Caption = 'Redo'
|
||||
Bitmap.Data = {
|
||||
36040000424D3604000000000000360000002800000010000000100000000100
|
||||
2000000000000004000064000000640000000000000000000000FFFFFF000000
|
||||
000000A0C4181AA7C46918A6C369000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000FFFFFF000000
|
||||
000011A6C2AE66DBEAB200A0C45D000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000FFFFFF0023A6
|
||||
C07F43C5D8FE43C4DBFC00A0C422000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000FFFFFF0023A6
|
||||
C0EF5DDAE9FE0EAACBFE000000000000000000000000000000000000000000A0
|
||||
C4FF000000000000000000000000000000000000000000000000FFFFFF0011A2
|
||||
C2FF88E7F2FE02ACC8FF009EC11A0000000000000000000000000000000000A0
|
||||
C4FF00A0C4FF0000000000000000000000000000000000000000FFFFFF0019A3
|
||||
C1FF76E2EFFF6DE6F5FF00A0C4C90099B95000A0C430000000000000000000A0
|
||||
C4FF76EDFBFF00A0C4FF05797D11000000000000000000000000FFFFFF001AA4
|
||||
C0F869E4F2FF0FC9DFFF6EE1EEFF01A9C4FF00A0C4FF00A0C4FF00A0C4FF00A0
|
||||
C4FF76EDFBFF76EDFBFF00A0C4FF05797D110000000000000000FFFFFF001BA3
|
||||
BFF46FDCEBFF07C2D8FF0AC8DFFF05DDF7FF69EAF9FF69EAF9FF69EAF9FF69EA
|
||||
F9FF76EDFBFF04C3DAFF76EDFBFF00A0C4FF05797D1100000000FFFFFF0015A0
|
||||
BCCB1BABC5F86AE5F3FF0BC8DFFF1DD2E8FF1DD2E8FF1DD2E8FF04C0D6FF04C0
|
||||
D6FF04C0D6FF2CDFF4FF32E2F8FF79EDFBFF00A0C4FF05797E11FFFFFF000579
|
||||
7D0A16A1BDCA40CDE1FF36D9ECFF1DD2E8FF1DD2E8FF1DD2E8FF29DBF1FF2FE0
|
||||
F5FF32E2F7FF32E2F7FF32E2F8FF2FE0F6FFADF3FBFF00A0C4FFFFFFFF000000
|
||||
000005797D3213A3C1E441CEE3FE69E7F6FF36D9ECFF16CDE3FF29DBF1FF2FE0
|
||||
F5FF29DBF1FF32E2F7FF2FE0F6FFADF3FBFF00A0C4FF05797D0AFFFFFF000000
|
||||
00000000000005797D1C14A3C1D514A1BCD46CE8F7F86EE8F7FF6FEBFAFF73EC
|
||||
FAFF20E3FAFF31E1F6FFADF3FBFF00A0C4FF05797D1100000000FFFFFF000000
|
||||
00000000000000000000067A7C0B1BA1BBA4159FBBCF13A1BEE700A0C4FF00A0
|
||||
C4FF25E4FBFFADF3FBFF00A0C4FF05797D110000000000000000FFFFFF000000
|
||||
00000000000000000000000000000000000000000000000000000000000000A0
|
||||
C4FFADF3FBFF00A0C4FF05797D11000000000000000000000000FFFFFF000000
|
||||
00000000000000000000000000000000000000000000000000000000000000A0
|
||||
C4FF00A0C4FF009DBF1400000000000000000000000000000000FFFFFF000000
|
||||
00000000000000000000000000000000000000000000000000000000000000A0
|
||||
C4FF000000000000000000000000000000000000000000000000
|
||||
}
|
||||
ImageIndex = 12
|
||||
ShortCut = 24666
|
||||
OnClick = MenuItemRedoClick
|
||||
end
|
||||
object MenuItemCut: TMenuItem
|
||||
Caption = 'Cut'
|
||||
Bitmap.Data = {
|
||||
36040000424D3604000000000000360000002800000010000000100000000100
|
||||
2000000000000004000064000000640000000000000000000000FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00020D8C0A1C27A69F353F
|
||||
C9F7222DAFB9030D8C1CFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00050F8D1F06108E26010B8A03FFFFFF00121C9B70404BD9FF2C35
|
||||
BFDD3D47D1FF1D27A9A4FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF000F199763323DC7F83741CFFF1F29ABB0000A8618232DB4AF3540CCFD0009
|
||||
85181C27A895343EC5F8040E8C14FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF002F3ABDDE353FC9E52530B3C23F4ADDFF1F2AACC22430B2CB323CC6F2000A
|
||||
8603111B9D773741C8FF08128E20FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00323CC3EC232EADAFFFFFFF001A25A8994250D2FFCBA375FE414FD6FF1621
|
||||
A39D2F39C0D42E38BEDF020D8B0AFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF001D28A99C3B46CCFF0812903A071190533B48D4FFDBBD9CFFEECCA6FF404C
|
||||
DEFF3A43D1FF0F199869FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00030D8C1F2C35B9D73C46CFFF333ECAF23F4CD7FFD8BC9AFFF6EAE1FFBB92
|
||||
5ABF9462183B91611A01FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00030D8C1F1B26A7992A34BACC111C9D89BB9869CCF0E0D0FFB791
|
||||
5FC58F5D140BFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00000B8802FFFFFF00B48E5A90F6EADDFFE1CD
|
||||
B4FFB18D5DBFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00B38C5789F1E2D4FFCEB2
|
||||
8EF4F5EBE0FFA67F4A9DFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00B1895384EEDFCEFF9766
|
||||
2065C2A37CDAE9D8C5FDA9824E7BFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00AF87507CE7D5C1FF9565
|
||||
1F2B8F5C121BC5A783E7D5BC9DE1B5936462FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00AC834B75DEC9AFFF9564
|
||||
1D1FFFFFFF0092601726C3A47CEBB59063CBFFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00AA81476FD6BD9FF79361
|
||||
1910FFFFFF00FFFFFF009666202CA9804BCBFFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00A87D4269CCB08BE0915D
|
||||
1409FFFFFF00FFFFFF00FFFFFF0092601706FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF009A6B2731AA7E43A19260
|
||||
1805FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
|
||||
}
|
||||
ImageIndex = 3
|
||||
ShortCut = 16472
|
||||
OnClick = MenuItemCutClick
|
||||
end
|
||||
object MenuItemPaste: TMenuItem
|
||||
Caption = 'Paste'
|
||||
Bitmap.Data = {
|
||||
36040000424D3604000000000000360000002800000010000000100000000100
|
||||
2000000000000004000064000000640000000000000000000000FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF005E5E5E025B5B5B775858588A5555558A5252
|
||||
528A4F4F4F8A4C4C4C8A4A4A4A8A4848488A4646468A444444662063984A2063
|
||||
98CF206398FF206398FF206398FF246395FF587388FFF7F7F7FFF0F0F0FFF0F0
|
||||
F0FFF0F0F0FFF0F0F0FFF0F0F0FFF0F0F0FFF3F3F3FA46464684206398C262A5
|
||||
D7FF65A8DAFF64A6D9FF62A4D8FF629FD1FF758EA4FFEFEFEFFFE7E7E7FFE7E7
|
||||
E7FFE7E7E7FFE7E7E7FFE6E6E6FFE6E6E6FFECECECFA49494984206398FF68AB
|
||||
DCFF488ECFFF468BCEFF4387CDFF4484C6FF6885A1FFF0F0F0FFB4B4B4FFB4B4
|
||||
B4FFB4B4B4FFB4B4B4FFB4B4B4FFB3B3B3FFEDEDEDFA4C4C4C84206398FF69AE
|
||||
DCFF4A93D1FF488FD0FF468BCEFF4788C7FF6C88A3FFF0F0F0FFE8E8E8FFE8E8
|
||||
E8FFE7E7E7FFE7E7E7FFE7E7E7FFE7E7E7FFEDEDEDFA4F4F4F84206398FF6BB1
|
||||
DEFF4D97D3FF4B93D2FF488FD0FF4A8CC9FF6F8BA5FFF1F1F1FFB6B6B6FFB5B5
|
||||
B5FFB5B5B5FFB4B4B4FFB4B4B4FFB4B4B4FFEDEDEDFA53535384206398FF6DB3
|
||||
DFFF509CD5FF4E98D3FF4B94D1FF4C91CBFF708EA7FFF1F1F1FFE9E9E9FFE9E9
|
||||
E9FFE8E8E8FFE8E8E8FFE8E8E8FFE7E7E7FFEDEDEDFA56565684206398FF70B5
|
||||
E0FF529FD7FF509CD6FF4E98D4FF4F95CDFF7391AAFFF1F1F1FFB7B7B7FFB6B6
|
||||
B6FFB6B6B6FFB6B6B6FFB5B5B5FFB5B5B5FFEEEEEEFA5A5A5A84206398FF73B7
|
||||
E1FF57A3D7FF53A0D7FF509DD5FF5299CFFF7594ACFFF8F8F8FFF2F2F2FFF2F2
|
||||
F2FFF2F2F2FFF2F2F2FFF2F2F2FFF1F1F1FFF4F4F4FA5E5E5E84206398FF76B9
|
||||
E2FF5CA7D9FF58A4D8FF53A0D7FF539ED5FF618BA9FF6488A1FF6487A1FF6386
|
||||
A0FF69879FFF4A6881FF6A6A6A8A6868688A6565658A62626263206398FF7ABB
|
||||
E3FF61AADBFF5AA5D9FF53A0D7FF529FD7FF529FD7FF529FD7FF529FD7FF529F
|
||||
D7FF62A3D8FF206398FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00206398FF7CBD
|
||||
E4FF65AEDDFF62ABDCFF5EA8DAFF5CA7D9FF5CA7D9FF5CA7D9FF5CA7D9FF529F
|
||||
D7FF62A3D8FF206398FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00206398FF7FBF
|
||||
E4FF69B2DEFF4A9BDAFF4497DCFF4396DCFF4296DCFF4295DCFF4195DBFF519E
|
||||
D6FF6CB2DEFF206398FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00206398E071B3
|
||||
DBFE7EBFE4FF4E9DDFFFB5EEFDFF75D4F0FF75D4F0FFB5EEFDFF4B9BDEFF6EB4
|
||||
E0FF6DB3DFF9206398F3FFFFFF00FFFFFF00FFFFFF00FFFFFF00206398322063
|
||||
98B2206398FF3775A4FFB6EFFEFF80DBF3FF80DBF3FFB6EFFEFF2E6EA1FF2063
|
||||
98FF206398A520639853FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF002063982A206398FF206398FF206398FF206398FF206398FF206398F0FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
|
||||
}
|
||||
ImageIndex = 11
|
||||
ShortCut = 16470
|
||||
OnClick = MenuItemPasteClick
|
||||
@ -937,6 +1192,42 @@ object Form1: TForm1
|
||||
SubMenuImages = Mufasa_Image_List
|
||||
object MenuItemRun: TMenuItem
|
||||
Caption = 'Run'
|
||||
Bitmap.Data = {
|
||||
36040000424D3604000000000000360000002800000010000000100000000100
|
||||
2000000000000004000064000000640000000000000000000000000000000000
|
||||
000004733AFF21824FFF638272FF000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000004733AFF7ACFA4FF2C8C5AFF3D7659FFAEAEAEFF00000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000004733AFF82D8ACFF76D6A6FF3C9D6AFF27744CFFACAEADFF000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000009773FFF83DBAEFF1FC671FF72DEA7FF4BB27FFF177445FFA8ADAAFF0000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000004733AFF83DCAFFF11C369FF1ACC73FF69DFA3FF5AC28DFF137643FF9EA7
|
||||
A3FF000000000000000000000000000000000000000000000000000000000000
|
||||
000004733AFFA9DCC1FF10BD65FF11C167FF13C269FF59D395FF67C998FF167C
|
||||
47FF889C92FF0000000000000000000000000000000000000000000000000000
|
||||
000004733AFFA9DCC1FF0DB35EFF0EB660FF0EB660FF0DB45FFF47C484FF70CA
|
||||
9CFF1D824DFF678C79FF00000000000000000000000000000000000000000000
|
||||
000004733AFFA9DCC1FF0CAA58FF12AE5EFF15AF60FF16AD61FF13AA5DFF3AB6
|
||||
77FF75C79DFF288957FF4E8367FF000000000000000000000000000000000000
|
||||
000004733AFFA9DCC1FF2EAD6BFF2BAD6AFF27AB68FF22A964FF1CA55FFF41B2
|
||||
78FF78C69FFF298858FF678C79FF000000000000000000000000000000000000
|
||||
000004733AFFA9DCC1FF36AD70FF32AC6DFF2DAA6AFF28A866FF58BC89FF78C5
|
||||
9DFF1F804EFF839A8EFF00000000000000000000000000000000000000000000
|
||||
000004733AFFA9DCC1FF3EB176FF3AAF73FF36AE70FF6FC598FF71BF97FF187B
|
||||
49FFA6B0ABFF0000000000000000000000000000000000000000000000000000
|
||||
000004733AFFA9DCC1FF45B47BFF47B47CFF82CCA6FF67B68CFF177745FFC1C5
|
||||
C3FF000000000000000000000000000000000000000000000000000000000000
|
||||
000004733AFFA5DABFFF57BB87FF90D2B0FF5BAB82FF23774CFFD4D5D4FF0000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000004733AFFA9DCC1FF9BD5B7FF4C9F73FF3D7D5CFF00000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000004733AFFA4D9BEFF3D9366FF5F8873FF0000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000004733AFF2D8859FF859C90FF000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000
|
||||
}
|
||||
ImageIndex = 6
|
||||
ShortCut = 120
|
||||
OnClick = MenuItemRunClick
|
||||
@ -946,7 +1237,7 @@ object Form1: TForm1
|
||||
object Mufasa_Image_List: TImageList
|
||||
left = 512
|
||||
Bitmap = {
|
||||
4C69130000001000000010000000424242004242420042424200424242004242
|
||||
4C69140000001000000010000000424242004242420042424200424242004242
|
||||
420042424200424242004242420042424200424242004242420042424200A155
|
||||
42FFA15542FFA15542FF4242420E424242004242420042424200424242004242
|
||||
4200424242004242420042424200424242004242420042424200A15542FFFFDA
|
||||
@ -1010,38 +1301,38 @@ object Form1: TForm1
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF003737
|
||||
37081D1D1DFF0D0D0DADFFFFFF00FFFFFF000E0E0EAD202020FF3A3A3A02FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00242424520202
|
||||
02D7000000FF000000DFFFFFFF00FFFFFF00000000DF000000FF030303D32C2C
|
||||
2C46FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0012121297000000DF0000
|
||||
00FF000000FF000000DFFFFFFF00FFFFFF00000000DF000000FF000000FF0000
|
||||
00DF1C1C1C8BFFFFFF00FFFFFF00FFFFFF001C1C1C70000000DF000000FF0000
|
||||
00FF000000FF000000DFFFFFFF00FFFFFF00000000DF000000FF000000FF0000
|
||||
00FF000000DF30303062FFFFFF003636360E010101DD000000FF000000FF0000
|
||||
00FF000000FF000000DF000000DF000000DF000000DF000000FF000000FF0000
|
||||
00FF000000FF030303D9636363021D1D1DFF000000FF000000FF000000FF0000
|
||||
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
|
||||
00FF000000FF000000FF454545FF0A0A0AB9000000DF000000DF000000DF0000
|
||||
00DF000000FF000000FF000000FF000000FF000000FF000000FF000000DF0000
|
||||
00DF000000DF000000DF232323A9FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
|
||||
00DF000000FF000000FF000000FF000000FF000000FF000000FF000000DFFFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
|
||||
00DF000000FF000000FF000000FF000000FF000000FF000000FF000000DFFFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF000A0A0ABB000000DF000000DF000000DF0000
|
||||
00DF000000FF000000FF000000FF000000FF000000FF000000FF000000DF0000
|
||||
00DF000000DF000000DF2B2B2BA9202020FF000000FF000000FF000000FF0000
|
||||
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
|
||||
00FF000000FF000000FF626262FF3E3E3E0E010101DD000000FF000000FF0000
|
||||
00FF000000FF000000DF000000DF000000DF000000DF000000FF000000FF0000
|
||||
00FF000000FF050505D9ACACAC02FFFFFF0025252574000000DF000000FF0000
|
||||
00FF000000FF000000DFFFFFFF00FFFFFF00000000DF000000FF000000FF0000
|
||||
00FF000000DF69696964FFFFFF00FFFFFF00FFFFFF001D1D1D9B000000DF0000
|
||||
00FF000000FF000000DFFFFFFF00FFFFFF00000000DF000000FF000000FF0000
|
||||
00DF4C4C4C8BFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00484848520606
|
||||
06D7000000FF000000DFFFFFFF00FFFFFF00000000DF000000FF0B0B0BD38B8B
|
||||
8B46FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008181
|
||||
81084E4E4EFF252525AFFFFFFF00FFFFFF002C2C2CAD646464FFBEBEBE02FFFF
|
||||
0000000000000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0059AA
|
||||
834859AA83AB59AA83D259AA83FF59AA83D559AA83AE59AA8351FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0056A7801856A780C36CB3
|
||||
92FFA8D5C3FFC5E6DBFF71B797FFC6E6DCFFA9D6C4FF6FB594FF56A780C656A7
|
||||
801EFFFFFF00FFFFFF00FFFFFF00FFFFFF0052A27D1B53A37EE48FC6AEFFC8E8
|
||||
DFFFDFF2ECFFF9FDFBFF77B899FFF8FCFBFFDCF1EBFFC7E7DEFF93C8B2FF55A4
|
||||
80E852A27D1EFFFFFF00FFFFFF00FFFFFF004D9D78C08CC3ABFFC3E6DCFFF5FB
|
||||
F9FFC5E6DCFF9DD5C5FF5CAA87FF9FD6C5FFC9E8DFFFF4FAF9FFC0E4D9FF93C7
|
||||
B2FF4D9D78CCFFFFFF00FFFFFF004898735160A787FFADDACBFFEFF8F5FF9BD2
|
||||
C1FF82C7B2FF82C7B2FF56A482FF82C7B2FF82C7B2FF9CD3C2FFF0F8F6FFA9D8
|
||||
CAFF65AA8BFF48987354FFFFFF0042916EAE90C5B0FFCDE8DFFFB6DDD0FF78C1
|
||||
A9FF8DCAB6FFE4F3EEFF69A98DFFE2F2EDFF8BCAB5FF78C1A9FFB9DFD2FFC8E5
|
||||
DCFF95C8B5FF42916EB4FFFFFF003C8B68DB81C2AAFFF1F9F6FF7CC1A9FF6EBB
|
||||
A0FFE5F3EEFFABD8C8FF75BEA4FFB1DACCFFDDEFE9FF6EBBA0FF81C4ACFFF0F8
|
||||
F5FF81C2ACFF3C8B68E7FFFFFF00368462F0418F6FFF5E9C82FF3F8E6DFF408E
|
||||
6EFF5E9C82FF64B497FF64B497FF68B699FF5D9C82FF408E6EFF408E6EFF5D9C
|
||||
82FF408E6EFF3B8766F9FFFFFF002F7D5DDE55A888FFF1F8F6FF6EB79CFF59AC
|
||||
8DFFE0EFEAFF99CCB9FF59AC8DFFA1D0BFFFD8EBE4FF59AC8DFF6EB79CFFEDF6
|
||||
F3FF58AA8BFF2F7D5DE7FFFFFF00297657AB489879FFBDDDD1FFA8D3C2FF4FA5
|
||||
84FF68B295FFD8EBE4FF539177FFD1E8DFFF66B194FF4FA584FFAED6C7FFB7DA
|
||||
CCFF469978FF297657B4FFFFFF0023705151358163FF57A887FFEDF6F3FF6CB3
|
||||
97FF459F7BFF459F7BFF287758FF459F7BFF459F7BFF73B79CFFF2F8F6FF5DAB
|
||||
8CFF388465FF23705157FFFFFF00FFFFFF001D694CCC308764FF72B69AFFF3F9
|
||||
F7FFA3CFBDFF60AC8DFF217051FF65AF90FFA7D1C0FFF3F9F7FF70B598FF318A
|
||||
66FF1D694CB4FFFFFF00FFFFFF00FFFFFF00186447211A6649EA29815DFF50A2
|
||||
80FFB0D5C6FFEEF6F3FF438069FFECF5F1FFADD4C4FF4DA17EFF2A845FFF1B67
|
||||
49EB1864471BFFFFFF00FFFFFF00FFFFFF00FFFFFF00135F4215135F42AE1A6C
|
||||
4CFF25805BFF2B8D64FF166547FF2C8D65FF25815BFF1B6E4DFF135F42B7135F
|
||||
421BFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000F5A
|
||||
3F570F5A3FB70F5A3FF60F5A3FFF0F5A3FF60F5A3FBA0F5A3F5DFFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF009A6B2731AA7E43A192601805FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
@ -1554,10 +1845,43 @@ object Form1: TForm1
|
||||
000000000000000000000000000000000000000000000000000000A0C45D66DB
|
||||
EAB211A6C2AE0000000000000000000000000000000000000000000000000000
|
||||
000000000000000000000000000000000000000000000000000018A6C3691AA7
|
||||
C46900A0C4180000000000000000
|
||||
C46900A0C4180000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000A2000000A5000000A8000000
|
||||
A91A0000AA6C0000AAA60000AAC40000AAC40000AAA60000AA6C0000A91A0000
|
||||
A8000000A5000000A200FFFFFF00FFFFFF000000A2000000A5000000A84D0909
|
||||
AEBF3737D0E35C5CEAF56A6AF3FD6969F2FD5B5BE9F53636CFE30909AEBF0000
|
||||
A84D0000A5000000A200FFFFFF00FFFFFF000000A2000000A54D1010B1CD5B5B
|
||||
E8F65F5FE7FF5B5BE3FF5B5BE3FF5B5BE3FF5B5BE3FF5F5FE7FF5858E4F60F0F
|
||||
B0CD0000A54D0000A200FFFFFF00FFFFFF000000A11A0808A8BF5656E2F65151
|
||||
D9FFFFFFFFFF4F4FD7FF4F4FD7FF4F4FD7FF4F4FD7FFFFFFFFFF5050D8FF4F4F
|
||||
DCF60707A7BF0000A11AFFFFFF00FFFFFF0000009E6C3232C6E34949D1FFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFF4242CAFF4242CAFFFFFFFFFFFFFFFFFFFFFFFFFF4747
|
||||
CFFF2A2ABDE300009E6CFFFFFF00FFFFFF0000009AA74747D3F53737BFFF2323
|
||||
ABFFFFFFFFFFF7F7F7FFE8E8E8FFDEDEDEFFDBDBDBFFDDDDDDFF11119BFF1616
|
||||
A0FF2727B4F500009AA7FFFFFF00FFFFFF00000096C44949D1FD3333BBFF2E2E
|
||||
B8FF13139FFFCECECEFFD1D1D1FFD6D6D6FFDCDCDCFF11119EFF1111A1FF1111
|
||||
A1FF1D1DACFD000096C4FFFFFF00FFFFFF00000092C44444CDFD2626B5FF1414
|
||||
ABFF1111AAFFD1D1D1FFD6D6D6FFDCDCDCFFE2E2E2FF1111AAFF1111AAFF1111
|
||||
AAFF1818AFFD000092C4FFFFFF00FFFFFF0000008DA72E2EC0F51212B4FF1111
|
||||
B4FFD1D1D1FFD6D6D6FFDCDCDCFFE2E2E2FFE6E6E6FFEAEAEAFF1111B4FF1111
|
||||
B4FF1212AFF500008DA7FFFFFF00FFFFFF000000896C1616AAE21616C1FFD1D1
|
||||
D1FFD6D6D6FFDCDCDCFF1111ADFF1111ADFFEAEAEAFFEEEEEEFFEEEEEEFF1111
|
||||
BEFF0909A1E30000896CFFFFFF00FFFFFF000000851A03038ABF1818C1F61212
|
||||
B2FFDCDCDCFF1111B2FF1111C8FF1111C8FF1111B2FFEEEEEEFF1111B2FF0F0F
|
||||
BCF6020289BF0000851AFFFFFF00FFFFFF000000830000007F4D040488CD1212
|
||||
C4F61212B6FF1111D1FF1111D1FF1111D1FF1111D1FF1111B6FF0F0FC2F60303
|
||||
88CD00007F4D00008300FFFFFF00FFFFFF000000000000001F000000534D0202
|
||||
74BF08089DE30E0EC4F51111D4FD1111D4FD0E0EC4F508089DE3020274BF0000
|
||||
534D00001F0000000000FFFFFF00FFFFFF0000000004000000170000002B0000
|
||||
1A430000448000005AAB00005DC400005DC400005AAB0000448000001A430000
|
||||
002D0000001800000004FFFFFF00FFFFFF00000000020000000C000000160000
|
||||
001A0000001A0000001A0000001A0000001A0000001A0000001A0000001A0000
|
||||
00170000000C00000002FFFFFF00
|
||||
}
|
||||
end
|
||||
object MTrayIcon: TTrayIcon
|
||||
PopUpMenu = TrayPopup
|
||||
Icon.Data = {
|
||||
F6030000000001000100100E000001002000E003000016000000280000001000
|
||||
00001C0000000100200000000000000000000000000000000000000000000000
|
||||
@ -1610,4 +1934,15 @@ object Form1: TForm1
|
||||
NestedComments = True
|
||||
left = 424
|
||||
end
|
||||
object TrayPopup: TPopupMenu
|
||||
left = 600
|
||||
object MenuItemShow: TMenuItem
|
||||
Caption = 'Show'
|
||||
OnClick = MenuItemShowClick
|
||||
end
|
||||
object MenuItemExit: TMenuItem
|
||||
Caption = 'Exit'
|
||||
OnClick = MenuItemExitClick
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@ -41,13 +41,21 @@ uses
|
||||
, SynEditKeyCmds;
|
||||
|
||||
type
|
||||
|
||||
TScriptState = (ss_None,ss_Running,ss_Paused,ss_Stopping);
|
||||
{
|
||||
ss_None: Means the script either hasn't been run yet, or it has ended (Succesfully or terminated)
|
||||
ss_Running: Means the script is running as we speak :-)
|
||||
ss_Paused: Means the script is currently in pause modus.
|
||||
ss_Stopping: Means we've asked PS-Script politely to stop the script (next time we press the stop button we won't be that nice).
|
||||
}
|
||||
{ TForm1 }
|
||||
|
||||
TForm1 = class(TForm)
|
||||
Memo1: TMemo;
|
||||
MenuFile: TMenuItem;
|
||||
MenuEdit: TMenuItem;
|
||||
MenuItemShow: TMenuItem;
|
||||
MenuItemExit: TMenuItem;
|
||||
MenuItemCut: TMenuItem;
|
||||
MenuItemPaste: TMenuItem;
|
||||
MenuItemNew: TMenuItem;
|
||||
@ -60,6 +68,7 @@ type
|
||||
MainMenu1: TMainMenu;
|
||||
MenuItemScript: TMenuItem;
|
||||
MenuItemRun: TMenuItem;
|
||||
TrayPopup: TPopupMenu;
|
||||
StatusBar: TStatusBar;
|
||||
SynEdit1: TSynEdit;
|
||||
SynFreePascalSyn1: TSynFreePascalSyn;
|
||||
@ -86,6 +95,7 @@ type
|
||||
procedure ButtonDragClick(Sender: TObject);
|
||||
procedure ButtonNewClick(Sender: TObject);
|
||||
procedure ButtonOpenClick(Sender: TObject);
|
||||
procedure ButtonPauseClick(Sender: TObject);
|
||||
procedure ButtonRunClick(Sender: TObject);
|
||||
procedure ButtonSaveClick(Sender: TObject);
|
||||
procedure ButtonClearClick(Sender: TObject);
|
||||
@ -95,12 +105,14 @@ type
|
||||
procedure MenuEditClick(Sender: TObject);
|
||||
procedure MenuFileClick(Sender: TObject);
|
||||
procedure MenuItemCutClick(Sender: TObject);
|
||||
procedure MenuItemExitClick(Sender: TObject);
|
||||
procedure MenuItemNewClick(Sender: TObject);
|
||||
procedure MenuItemOpenClick(Sender: TObject);
|
||||
procedure MenuItemPasteClick(Sender: TObject);
|
||||
procedure MenuItemRunClick(Sender: TObject);
|
||||
procedure MenuItemSaveAsClick(Sender: TObject);
|
||||
procedure MenuItemSaveClick(Sender: TObject);
|
||||
procedure MenuItemShowClick(Sender: TObject);
|
||||
procedure OnLinePSScript(Sender: TObject);
|
||||
procedure OnSyneditChange(Sender: TObject);
|
||||
procedure ButtonPickClick(Sender: TObject);
|
||||
@ -108,9 +120,10 @@ type
|
||||
procedure ButtonSelectorDown(Sender: TObject; Button: TMouseButton;
|
||||
Shift: TShiftState; X, Y: Integer);
|
||||
procedure NoTray(Sender: TObject);
|
||||
procedure ScriptThreadTerminate(Sender: TObject);
|
||||
procedure SynEditProcessCommand(Sender: TObject;
|
||||
var Command: TSynEditorCommand; var AChar: TUTF8Char; Data: pointer);
|
||||
procedure ToolBar1Click(Sender: TObject);
|
||||
procedure ButtonStopClick(Sender: TObject);
|
||||
procedure ButtonTrayClick(Sender: TObject);
|
||||
procedure MenuItemUndoClick(Sender: TObject);
|
||||
private
|
||||
@ -119,17 +132,23 @@ type
|
||||
ScriptName : string;//The name of the currently opened/saved file.
|
||||
ScriptDefault : string;//The default script e.g. program new; begin end.
|
||||
ScriptChanged : boolean;//We need this for that little * (edited star).
|
||||
ScriptThread : TMMLPSThread;//Just one thread for now..
|
||||
FScriptState : TScriptState;//Defines the "state" of the current script. (Acces through property for form updates).
|
||||
procedure SetScriptState(const State: TScriptState);
|
||||
public
|
||||
Window: TMWindow;
|
||||
Picker: TMColorPicker;
|
||||
Selector: TMWindowSelector;
|
||||
property ScriptState : TScriptState read FScriptState write SetScriptState;
|
||||
procedure SafeCallThread;
|
||||
function OpenScript : boolean;
|
||||
function SaveCurrentScript : boolean;
|
||||
function SaveCurrentScriptAs : boolean;
|
||||
function CanExitOrOpen : boolean;
|
||||
function ClearScript : boolean;
|
||||
procedure run;
|
||||
procedure RunScript;
|
||||
procedure PauseScript;
|
||||
procedure StopScript;
|
||||
procedure undo;
|
||||
procedure redo;
|
||||
procedure Cut;
|
||||
@ -137,6 +156,11 @@ type
|
||||
end;
|
||||
const
|
||||
WindowTitle = 'Mufasa v2 - %s';//Title, where %s = the place of the filename.
|
||||
Panel_State = 0;
|
||||
Panel_ScriptName = 1;
|
||||
Panel_ScriptPath = 2;
|
||||
Image_Stop = 7;
|
||||
Image_Terminate = 19;
|
||||
var
|
||||
Form1: TForm1;
|
||||
MainDir : string;
|
||||
@ -148,29 +172,73 @@ uses
|
||||
|
||||
|
||||
|
||||
procedure TForm1.Run;
|
||||
Var
|
||||
MMLPSThread : TMMLPSThread;
|
||||
|
||||
procedure TForm1.RunScript;
|
||||
begin
|
||||
if ScriptState = ss_Paused then
|
||||
begin;
|
||||
ScriptThread.Resume;
|
||||
ScriptState := ss_Running;
|
||||
Exit;
|
||||
end else
|
||||
if ScriptState <> ss_None then
|
||||
begin;
|
||||
Writeln('The script hasn''t stopped yet, so we cannot start a new one.');
|
||||
exit;
|
||||
end;
|
||||
CurrentSyncInfo.SyncMethod:= @Self.SafeCallThread;
|
||||
MMLPSThread := TMMLPSThread.Create(True,@CurrentSyncInfo);
|
||||
MMLPSThread.SetPSScript(Self.SynEdit1.Lines.Text);
|
||||
MMLPSThread.SetDebug(Self.Memo1);
|
||||
ScriptThread := TMMLPSThread.Create(True,@CurrentSyncInfo);
|
||||
ScriptThread.SetPSScript(Self.SynEdit1.Lines.Text);
|
||||
ScriptThread.SetDebug(Self.Memo1);
|
||||
if ScriptFile <> '' then
|
||||
MMLPSThread.SetPaths( ExtractFileDir(ScriptFile) + DS,IncludeTrailingPathDelimiter(ExpandFileName(MainDir +DS + '..' + DS + '..' + ds)))
|
||||
ScriptThread.SetPaths( ExtractFileDir(ScriptFile) + DS,IncludeTrailingPathDelimiter(ExpandFileName(MainDir +DS + '..' + DS + '..' + ds)))
|
||||
else
|
||||
MMLPSThread.SetPaths('', IncludeTrailingPathDelimiter(ExpandFileName(MainDir +DS + '..' + DS + '..' + ds)));
|
||||
ScriptThread.SetPaths('', IncludeTrailingPathDelimiter(ExpandFileName(MainDir +DS + '..' + DS + '..' + ds)));
|
||||
|
||||
// This doesn't actually set the Client's MWindow to the passed window, it
|
||||
// only copies the current set window handle.
|
||||
MMLPSThread.Client.MWindow.SetWindow(Self.Window);
|
||||
ScriptThread.Client.MWindow.SetWindow(Self.Window);
|
||||
|
||||
MMLPSThread.Resume;
|
||||
ScriptThread.OnTerminate:=@ScriptThreadTerminate;
|
||||
ScriptState:= ss_Running;
|
||||
//Lets run it!
|
||||
ScriptThread.Resume;
|
||||
end;
|
||||
|
||||
// sleep(500);
|
||||
// MMLPSThread.PSScript.Stop;
|
||||
procedure TForm1.PauseScript;
|
||||
begin
|
||||
if ScriptState = ss_Running then
|
||||
begin;
|
||||
ScriptThread.Suspended:= True;
|
||||
ScriptState:= ss_Paused;
|
||||
end else if ScriptState = ss_Paused then
|
||||
begin;
|
||||
ScriptThread.Resume;
|
||||
ScriptState := ss_Running;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TForm1.StopScript;
|
||||
begin
|
||||
case ScriptState of
|
||||
ss_Stopping:
|
||||
begin //Terminate the thread the tough way.
|
||||
writeln('Terminating the Scriptthread');
|
||||
KillThread(ScriptThread.Handle);
|
||||
ScriptThread.Free;
|
||||
ScriptState := ss_None;
|
||||
end;
|
||||
ss_Running:
|
||||
begin
|
||||
ScriptThread.PSScript.Stop;
|
||||
ScriptState := ss_Stopping;
|
||||
end;
|
||||
ss_Paused:
|
||||
begin
|
||||
ScriptThread.Resume;
|
||||
ScriptThread.PSScript.Stop;
|
||||
ScriptState:= ss_Stopping;
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TForm1.Undo;
|
||||
@ -207,7 +275,7 @@ end;
|
||||
|
||||
procedure TForm1.ButtonRunClick(Sender: TObject);
|
||||
begin;
|
||||
Run;
|
||||
Self.RunScript;
|
||||
end;
|
||||
|
||||
procedure TForm1.ButtonSaveClick(Sender: TObject);
|
||||
@ -230,6 +298,11 @@ begin
|
||||
Self.OpenScript;
|
||||
end;
|
||||
|
||||
procedure TForm1.ButtonPauseClick(Sender: TObject);
|
||||
begin
|
||||
Self.PauseScript;
|
||||
end;
|
||||
|
||||
procedure TForm1.ButtonClearClick(Sender: TObject);
|
||||
begin
|
||||
Memo1.Clear;
|
||||
@ -251,6 +324,7 @@ begin
|
||||
Caption := Format(WindowTitle,['Untitled']);
|
||||
ScriptName:= 'Untitled';
|
||||
ScriptChanged := false;
|
||||
ScriptState:= ss_None;
|
||||
MainDir:= ExtractFileDir(Application.ExeName);
|
||||
PluginsGlob := TMPlugins.Create;
|
||||
PluginsGlob.PluginDirs.Add(ExpandFileName(MainDir + DS + '..' + DS + '..'+ DS + 'Plugins'+ DS));
|
||||
@ -280,6 +354,11 @@ begin
|
||||
Self.cut;
|
||||
end;
|
||||
|
||||
procedure TForm1.MenuItemExitClick(Sender: TObject);
|
||||
begin
|
||||
Self.Close;
|
||||
end;
|
||||
|
||||
procedure TForm1.MenuItemNewClick(Sender: TObject);
|
||||
begin
|
||||
ClearScript;
|
||||
@ -297,7 +376,7 @@ end;
|
||||
|
||||
procedure TForm1.MenuItemRunClick(Sender: TObject);
|
||||
begin
|
||||
Run;
|
||||
RunScript;
|
||||
end;
|
||||
|
||||
procedure TForm1.MenuItemSaveAsClick(Sender: TObject);
|
||||
@ -310,6 +389,11 @@ begin
|
||||
SaveCurrentScript;
|
||||
end;
|
||||
|
||||
procedure TForm1.MenuItemShowClick(Sender: TObject);
|
||||
begin
|
||||
Self.Show;
|
||||
end;
|
||||
|
||||
procedure TForm1.OnLinePSScript(Sender: TObject);
|
||||
begin
|
||||
//Writeln('We just completed a line!!');
|
||||
@ -356,6 +440,11 @@ begin
|
||||
Form1.Hide;
|
||||
end;
|
||||
|
||||
procedure TForm1.ScriptThreadTerminate(Sender: TObject);
|
||||
begin
|
||||
ScriptState:= ss_None;
|
||||
end;
|
||||
|
||||
procedure TForm1.SynEditProcessCommand(Sender: TObject;
|
||||
var Command: TSynEditorCommand; var AChar: TUTF8Char; Data: pointer);
|
||||
begin
|
||||
@ -371,11 +460,12 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TForm1.ToolBar1Click(Sender: TObject);
|
||||
procedure TForm1.ButtonStopClick(Sender: TObject);
|
||||
begin
|
||||
|
||||
Self.StopScript;
|
||||
end;
|
||||
|
||||
|
||||
procedure TForm1.ButtonTrayClick(Sender: TObject);
|
||||
begin
|
||||
Form1.Hide;
|
||||
@ -386,6 +476,18 @@ begin
|
||||
Self.Undo;
|
||||
end;
|
||||
|
||||
procedure TForm1.SetScriptState(const State: TScriptState);
|
||||
begin
|
||||
FScriptState:= State;
|
||||
with Self.StatusBar.panels[Panel_State] do
|
||||
case FScriptState of
|
||||
ss_Running : begin Text := 'Running'; TB_Run.Enabled:= False; TB_Pause.Enabled:= True; TB_Stop.Enabled:= True; end;
|
||||
ss_Paused : begin Text := 'Paused'; TB_Run.Enabled:= True; TB_Pause.Enabled:= True; TB_Stop.Enabled:= True; end;
|
||||
ss_Stopping: begin Text := 'Stopping';TB_Run.Enabled:= False; TB_Pause.Enabled:= False; TB_Stop.Enabled:= True; TB_Stop.ImageIndex := Image_Terminate end;
|
||||
ss_None : begin Text := 'Done'; TB_Run.Enabled:= True; TB_Pause.Enabled:= False; TB_Stop.Enabled:= False; TB_Stop.ImageIndex := Image_Stop end;
|
||||
end;
|
||||
end;
|
||||
|
||||
|
||||
procedure TForm1.SafeCallThread;
|
||||
begin
|
||||
@ -416,8 +518,8 @@ begin;
|
||||
ScriptName:= ExtractFileNameOnly(FileName);
|
||||
WriteLn('Script name will be: ' + ScriptName);
|
||||
ScriptFile:= FileName;
|
||||
StatusBar.Panels[0].Text:= ScriptName;
|
||||
StatusBar.Panels[1].text:= FileName;
|
||||
StatusBar.Panels[Panel_ScriptName].Text:= ScriptName;
|
||||
StatusBar.Panels[Panel_ScriptPath].text:= FileName;
|
||||
Self.Caption:= Format(WindowTitle,[ScriptName]);
|
||||
ScriptChanged := false;
|
||||
Result := True;
|
||||
@ -457,8 +559,8 @@ begin
|
||||
ScriptFile := FileName;
|
||||
SynEdit1.Lines.SaveToFile(ScriptFile);
|
||||
ScriptName:= ExtractFileNameOnly(ScriptFile);
|
||||
StatusBar.Panels[0].Text:= ScriptName;
|
||||
StatusBar.Panels[1].text := ScriptFile;
|
||||
StatusBar.Panels[Panel_ScriptName].Text:= ScriptName;
|
||||
StatusBar.Panels[Panel_ScriptPath].text := ScriptFile;
|
||||
Self.Caption:= Format(WindowTitle,[ScriptName]);
|
||||
WriteLn('Script name will be: ' + ScriptName);
|
||||
Result := True;
|
||||
@ -496,8 +598,8 @@ begin
|
||||
ScriptName:= 'Untitled';
|
||||
StartText:= ScriptDefault;
|
||||
SynEdit1.Lines.Text:= ScriptDefault;
|
||||
StatusBar.Panels[0].Text:= 'Untitled';
|
||||
StatusBar.Panels[1].Text:= '';
|
||||
StatusBar.Panels[Panel_ScriptName].Text:= 'Untitled';
|
||||
StatusBar.Panels[Panel_ScriptPath].Text:= '';
|
||||
Self.Caption := Format(WindowTitle,['Untitled']);
|
||||
ScriptChanged:= false;
|
||||
end;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user