1
0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-21 16:55:01 -05:00

Some fixes for linux

git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@168 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
Raymond 2009-11-01 15:04:03 +00:00
parent a3625f5d07
commit c0a090c01c
7 changed files with 1875 additions and 1771 deletions

View File

@ -7,7 +7,7 @@
<TargetFileExt Value=""/>
<Title Value="Mufasa Stand Alone"/>
<UseXPManifest Value="True"/>
<ActiveEditorIndexAtStart Value="1"/>
<ActiveEditorIndexAtStart Value="16"/>
</General>
<VersionInfo>
<ProjectVersion Value=""/>
@ -33,7 +33,7 @@
<PackageName Value="LCL"/>
</Item2>
</RequiredPackages>
<Units Count="183">
<Units Count="194">
<Unit0>
<Filename Value="project1.lpr"/>
<IsPartOfProject Value="True"/>
@ -168,8 +168,8 @@
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="TestUnit"/>
<CursorPos X="3" Y="432"/>
<TopLine Value="419"/>
<CursorPos X="45" Y="751"/>
<TopLine Value="739"/>
<EditorIndex Value="1"/>
<UsageCount Value="202"/>
<Loaded Value="True"/>
@ -225,8 +225,8 @@
<Filename Value="../../Units/MMLCore/client.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="Client"/>
<CursorPos X="28" Y="34"/>
<TopLine Value="26"/>
<CursorPos X="87" Y="4"/>
<TopLine Value="1"/>
<EditorIndex Value="0"/>
<UsageCount Value="201"/>
<Loaded Value="True"/>
@ -310,26 +310,26 @@
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="mmlpsthread"/>
<CursorPos X="21" Y="184"/>
<TopLine Value="162"/>
<EditorIndex Value="12"/>
<CursorPos X="31" Y="188"/>
<TopLine Value="188"/>
<EditorIndex Value="14"/>
<UsageCount Value="202"/>
<Loaded Value="True"/>
</Unit37>
<Unit38>
<Filename Value="../../Units/PascalScript/uPSComponent.pas"/>
<UnitName Value="uPSComponent"/>
<CursorPos X="42" Y="625"/>
<TopLine Value="625"/>
<CursorPos X="12" Y="918"/>
<TopLine Value="903"/>
<EditorIndex Value="17"/>
<UsageCount Value="38"/>
<Loaded Value="True"/>
</Unit38>
<Unit39>
<Filename Value="../../../FPC/FPCCheckout/rtl/objpas/classes/classesh.inc"/>
<CursorPos X="15" Y="268"/>
<TopLine Value="240"/>
<EditorIndex Value="9"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit39>
<Unit40>
<Filename Value="../../../FPC/FPCCheckout/rtl/objpas/types.pp"/>
@ -381,9 +381,11 @@
</Unit46>
<Unit47>
<Filename Value="../../Units/MMLAddon/PSInc/pscompile.inc"/>
<CursorPos X="73" Y="81"/>
<TopLine Value="63"/>
<CursorPos X="24" Y="75"/>
<TopLine Value="55"/>
<EditorIndex Value="15"/>
<UsageCount Value="74"/>
<Loaded Value="True"/>
</Unit47>
<Unit48>
<Filename Value="../../../FPC/FPCCheckout/rtl/win/tthread.inc"/>
@ -468,10 +470,10 @@
<Unit60>
<Filename Value="../../../lazarus/lcl/lclintf.pas"/>
<UnitName Value="LCLIntf"/>
<CursorPos X="10" Y="161"/>
<TopLine Value="150"/>
<EditorIndex Value="14"/>
<UsageCount Value="11"/>
<CursorPos X="26" Y="103"/>
<TopLine Value="91"/>
<EditorIndex Value="24"/>
<UsageCount Value="12"/>
<Loaded Value="True"/>
</Unit60>
<Unit61>
@ -574,9 +576,11 @@
</Unit75>
<Unit76>
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/other.inc"/>
<CursorPos X="11" Y="58"/>
<TopLine Value="1"/>
<CursorPos X="24" Y="31"/>
<TopLine Value="21"/>
<EditorIndex Value="16"/>
<UsageCount Value="18"/>
<Loaded Value="True"/>
</Unit76>
<Unit77>
<Filename Value="../../Units/PascalScript/uPSCompiler.pas"/>
@ -606,9 +610,11 @@
<Unit81>
<Filename Value="../../Units/PascalScript/uPSRuntime.pas"/>
<UnitName Value="uPSRuntime"/>
<CursorPos X="1" Y="5864"/>
<TopLine Value="5854"/>
<CursorPos X="29" Y="27"/>
<TopLine Value="15"/>
<EditorIndex Value="19"/>
<UsageCount Value="17"/>
<Loaded Value="True"/>
</Unit81>
<Unit82>
<Filename Value="../../Units/MMLAddon/plugins.pas"/>
@ -671,18 +677,18 @@
<Unit91>
<Filename Value="../../../lazarus/lcl/controls.pp"/>
<UnitName Value="Controls"/>
<CursorPos X="15" Y="1300"/>
<TopLine Value="1289"/>
<EditorIndex Value="2"/>
<UsageCount Value="13"/>
<CursorPos X="15" Y="1323"/>
<TopLine Value="1311"/>
<EditorIndex Value="5"/>
<UsageCount Value="14"/>
<Loaded Value="True"/>
</Unit91>
<Unit92>
<Filename Value="../../../lazarus/lcl/include/control.inc"/>
<CursorPos X="20" Y="77"/>
<TopLine Value="65"/>
<EditorIndex Value="3"/>
<UsageCount Value="10"/>
<CursorPos X="3" Y="1025"/>
<TopLine Value="1017"/>
<EditorIndex Value="6"/>
<UsageCount Value="11"/>
<Loaded Value="True"/>
</Unit92>
<Unit93>
@ -712,7 +718,7 @@
<UnitName Value="dtm"/>
<CursorPos X="34" Y="141"/>
<TopLine Value="113"/>
<UsageCount Value="199"/>
<UsageCount Value="200"/>
</Unit96>
<Unit97>
<Filename Value="../../../cogat/Units/CogatUnits/comppicker.pas"/>
@ -727,7 +733,7 @@
<UnitName Value="colourpicker"/>
<CursorPos X="26" Y="198"/>
<TopLine Value="191"/>
<UsageCount Value="195"/>
<UsageCount Value="197"/>
</Unit98>
<Unit99>
<Filename Value="../../../cogat/Units/CogatUnits/compdragger.pas"/>
@ -752,7 +758,7 @@
<UnitName Value="windowselector"/>
<CursorPos X="32" Y="12"/>
<TopLine Value="31"/>
<UsageCount Value="185"/>
<UsageCount Value="187"/>
</Unit101>
<Unit102>
<Filename Value="../../../usr/lib64/fpc/2.2.4/source/rtl/objpas/classes/classesh.inc"/>
@ -786,7 +792,7 @@
<UnitName Value="dtmutil"/>
<CursorPos X="32" Y="18"/>
<TopLine Value="1"/>
<UsageCount Value="172"/>
<UsageCount Value="174"/>
</Unit106>
<Unit107>
<Filename Value="../../../cogat/Units/CogatUnits/compmaths.pas"/>
@ -828,7 +834,7 @@
<UnitName Value="mmath"/>
<CursorPos X="32" Y="42"/>
<TopLine Value="16"/>
<UsageCount Value="152"/>
<UsageCount Value="154"/>
</Unit112>
<Unit113>
<Filename Value="../../../Documents/fpc/rtl/objpas/types.pp"/>
@ -864,7 +870,7 @@
<UnitName Value="ocr"/>
<CursorPos X="43" Y="42"/>
<TopLine Value="5"/>
<UsageCount Value="122"/>
<UsageCount Value="124"/>
</Unit117>
<Unit118>
<Filename Value="../../Units/PascalScript/uPSR_extctrls.pas"/>
@ -879,7 +885,7 @@
<UnitName Value="project"/>
<CursorPos X="46" Y="15"/>
<TopLine Value="1"/>
<UsageCount Value="119"/>
<UsageCount Value="121"/>
</Unit119>
<Unit120>
<Filename Value="../../../FPC/FPCCheckout/rtl/inc/heap.inc"/>
@ -970,9 +976,9 @@
<Filename Value="../../../lazarus/lcl/comctrls.pp"/>
<UnitName Value="ComCtrls"/>
<CursorPos X="22" Y="260"/>
<TopLine Value="232"/>
<EditorIndex Value="4"/>
<UsageCount Value="23"/>
<TopLine Value="234"/>
<EditorIndex Value="7"/>
<UsageCount Value="24"/>
<Loaded Value="True"/>
</Unit134>
<Unit135>
@ -985,9 +991,11 @@
<Unit136>
<Filename Value="../../Units/PascalScript/uPSDebugger.pas"/>
<UnitName Value="uPSDebugger"/>
<CursorPos X="3" Y="450"/>
<TopLine Value="450"/>
<CursorPos X="13" Y="627"/>
<TopLine Value="624"/>
<EditorIndex Value="18"/>
<UsageCount Value="17"/>
<Loaded Value="True"/>
</Unit136>
<Unit137>
<Filename Value="../../Units/MMLCore/web.pas"/>
@ -995,7 +1003,7 @@
<UnitName Value="web"/>
<CursorPos X="90" Y="16"/>
<TopLine Value="1"/>
<UsageCount Value="47"/>
<UsageCount Value="49"/>
</Unit137>
<Unit138>
<Filename Value="../../../lazarus/lcl/lazhelphtml.pas"/>
@ -1194,10 +1202,10 @@
<ComponentName Value="ScriptFrame"/>
<ResourceBaseClass Value="Frame"/>
<UnitName Value="framescript"/>
<CursorPos X="23" Y="61"/>
<TopLine Value="53"/>
<EditorIndex Value="11"/>
<UsageCount Value="40"/>
<CursorPos X="27" Y="61"/>
<TopLine Value="49"/>
<EditorIndex Value="13"/>
<UsageCount Value="42"/>
<Loaded Value="True"/>
</Unit162>
<Unit163>
@ -1215,18 +1223,18 @@
<Unit165>
<Filename Value="../../../lazarus/lcl/extctrls.pp"/>
<UnitName Value="ExtCtrls"/>
<CursorPos X="15" Y="170"/>
<TopLine Value="142"/>
<EditorIndex Value="5"/>
<UsageCount Value="14"/>
<CursorPos X="14" Y="207"/>
<TopLine Value="195"/>
<EditorIndex Value="8"/>
<UsageCount Value="15"/>
<Loaded Value="True"/>
</Unit165>
<Unit166>
<Filename Value="../../../lazarus/lcl/include/customnotebook.inc"/>
<CursorPos X="3" Y="519"/>
<TopLine Value="514"/>
<EditorIndex Value="6"/>
<UsageCount Value="14"/>
<CursorPos X="56" Y="307"/>
<TopLine Value="296"/>
<EditorIndex Value="9"/>
<UsageCount Value="15"/>
<Loaded Value="True"/>
</Unit166>
<Unit167>
@ -1298,16 +1306,16 @@
<UnitName Value="LMessages"/>
<CursorPos X="11" Y="429"/>
<TopLine Value="429"/>
<EditorIndex Value="13"/>
<UsageCount Value="11"/>
<EditorIndex Value="23"/>
<UsageCount Value="12"/>
<Loaded Value="True"/>
</Unit176>
<Unit177>
<Filename Value="../../../lazarus/lcl/include/customactionlist.inc"/>
<CursorPos X="29" Y="151"/>
<TopLine Value="136"/>
<EditorIndex Value="15"/>
<UsageCount Value="11"/>
<EditorIndex Value="27"/>
<UsageCount Value="12"/>
<Loaded Value="True"/>
</Unit177>
<Unit178>
@ -1315,163 +1323,249 @@
<UnitName Value="ActnList"/>
<CursorPos X="14" Y="188"/>
<TopLine Value="166"/>
<EditorIndex Value="16"/>
<UsageCount Value="11"/>
<EditorIndex Value="28"/>
<UsageCount Value="12"/>
<Loaded Value="True"/>
</Unit178>
<Unit179>
<Filename Value="../../../lazarus/lcl/include/customaction.inc"/>
<CursorPos X="3" Y="247"/>
<TopLine Value="245"/>
<EditorIndex Value="17"/>
<UsageCount Value="11"/>
<EditorIndex Value="29"/>
<UsageCount Value="12"/>
<Loaded Value="True"/>
</Unit179>
<Unit180>
<Filename Value="../../../FPC/FPCCheckout/rtl/objpas/classes/lists.inc"/>
<CursorPos X="3" Y="626"/>
<TopLine Value="624"/>
<EditorIndex Value="10"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit180>
<Unit181>
<Filename Value="../../../lazarus/lcl/include/tabsheet.inc"/>
<CursorPos X="11" Y="46"/>
<TopLine Value="13"/>
<EditorIndex Value="8"/>
<UsageCount Value="10"/>
<TopLine Value="20"/>
<EditorIndex Value="12"/>
<UsageCount Value="11"/>
<Loaded Value="True"/>
</Unit181>
<Unit182>
<Filename Value="../../../lazarus/lcl/include/custompage.inc"/>
<CursorPos X="34" Y="177"/>
<TopLine Value="174"/>
<EditorIndex Value="7"/>
<UsageCount Value="10"/>
<EditorIndex Value="11"/>
<UsageCount Value="11"/>
<Loaded Value="True"/>
</Unit182>
<Unit183>
<Filename Value="../../../fpc/rtl/inc/threadh.inc"/>
<CursorPos X="11" Y="135"/>
<TopLine Value="139"/>
<EditorIndex Value="3"/>
<UsageCount Value="11"/>
<Loaded Value="True"/>
</Unit183>
<Unit184>
<Filename Value="../../../fpc/rtl/inc/thread.inc"/>
<CursorPos X="28" Y="155"/>
<TopLine Value="152"/>
<EditorIndex Value="4"/>
<UsageCount Value="11"/>
<Loaded Value="True"/>
</Unit184>
<Unit185>
<Filename Value="../../../lazarus/lcl/widgetset/wsextctrls.pp"/>
<UnitName Value="WSExtCtrls"/>
<CursorPos X="50" Y="292"/>
<TopLine Value="292"/>
<UsageCount Value="10"/>
</Unit185>
<Unit186>
<Filename Value="../../../lazarus/lcl/interfaces/cocoa/cocoawsextctrls.pas"/>
<UnitName Value="CocoaWSExtCtrls"/>
<CursorPos X="22" Y="72"/>
<TopLine Value="59"/>
<UsageCount Value="10"/>
</Unit186>
<Unit187>
<Filename Value="../../../lazarus/lcl/interfaces/gtk/gtkwsextctrls.pp"/>
<UnitName Value="GtkWSExtCtrls"/>
<CursorPos X="67" Y="557"/>
<TopLine Value="569"/>
<EditorIndex Value="10"/>
<UsageCount Value="11"/>
<Loaded Value="True"/>
</Unit187>
<Unit188>
<Filename Value="../../../fpc/rtl/inc/objpash.inc"/>
<CursorPos X="21" Y="184"/>
<TopLine Value="172"/>
<EditorIndex Value="2"/>
<UsageCount Value="11"/>
<Loaded Value="True"/>
</Unit188>
<Unit189>
<Filename Value="../../../fpc/rtl/objpas/sysutils/osutilsh.inc"/>
<CursorPos X="11" Y="25"/>
<TopLine Value="13"/>
<EditorIndex Value="20"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit189>
<Unit190>
<Filename Value="../../../fpc/rtl/unix/sysutils.pp"/>
<UnitName Value="sysutils"/>
<CursorPos X="3" Y="1075"/>
<TopLine Value="1069"/>
<EditorIndex Value="21"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit190>
<Unit191>
<Filename Value="../../../fpc/rtl/unix/bunxh.inc"/>
<CursorPos X="13" Y="81"/>
<TopLine Value="78"/>
<EditorIndex Value="22"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit191>
<Unit192>
<Filename Value="../../../fpc/rtl/objpas/sysutils/datih.inc"/>
<CursorPos X="11" Y="179"/>
<TopLine Value="158"/>
<EditorIndex Value="25"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit192>
<Unit193>
<Filename Value="../../../fpc/rtl/objpas/sysutils/dati.inc"/>
<CursorPos X="12" Y="258"/>
<TopLine Value="254"/>
<EditorIndex Value="26"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit193>
</Units>
<JumpHistory Count="30" HistoryIndex="29">
<Position1>
<Filename Value="testunit.pas"/>
<Caret Line="477" Column="14" TopLine="474"/>
<Filename Value="../../Units/PascalScript/uPSComponent.pas"/>
<Caret Line="877" Column="22" TopLine="865"/>
</Position1>
<Position2>
<Filename Value="framescript.pas"/>
<Caret Line="61" Column="23" TopLine="53"/>
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/other.inc"/>
<Caret Line="26" Column="37" TopLine="12"/>
</Position2>
<Position3>
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
<Caret Line="44" Column="22" TopLine="35"/>
<Filename Value="../../Units/PascalScript/uPSRuntime.pas"/>
<Caret Line="744" Column="39" TopLine="732"/>
</Position3>
<Position4>
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
<Caret Line="60" Column="29" TopLine="49"/>
<Filename Value="../../Units/PascalScript/uPSRuntime.pas"/>
<Caret Line="638" Column="21" TopLine="626"/>
</Position4>
<Position5>
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
<Caret Line="163" Column="42" TopLine="143"/>
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/other.inc"/>
<Caret Line="26" Column="27" TopLine="12"/>
</Position5>
<Position6>
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
<Caret Line="4" Column="64" TopLine="1"/>
<Caret Line="68" Column="23" TopLine="56"/>
</Position6>
<Position7>
<Filename Value="testunit.pas"/>
<Caret Line="5" Column="49" TopLine="82"/>
<Filename Value="../../Units/PascalScript/uPSComponent.pas"/>
<Caret Line="103" Column="3" TopLine="91"/>
</Position7>
<Position8>
<Filename Value="testunit.pas"/>
<Caret Line="473" Column="15" TopLine="471"/>
<Filename Value="../../Units/PascalScript/uPSComponent.pas"/>
<Caret Line="918" Column="14" TopLine="915"/>
</Position8>
<Position9>
<Filename Value="testunit.pas"/>
<Caret Line="275" Column="19" TopLine="258"/>
<Filename Value="../../Units/PascalScript/uPSDebugger.pas"/>
<Caret Line="627" Column="15" TopLine="624"/>
</Position9>
<Position10>
<Filename Value="testunit.pas"/>
<Caret Line="5" Column="67" TopLine="1"/>
<Filename Value="../../Units/PascalScript/uPSRuntime.pas"/>
<Caret Line="6933" Column="20" TopLine="6930"/>
</Position10>
<Position11>
<Filename Value="testunit.pas"/>
<Caret Line="364" Column="64" TopLine="358"/>
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/other.inc"/>
<Caret Line="26" Column="32" TopLine="12"/>
</Position11>
<Position12>
<Filename Value="testunit.pas"/>
<Caret Line="744" Column="31" TopLine="735"/>
<Filename Value="../../Units/PascalScript/uPSComponent.pas"/>
<Caret Line="205" Column="39" TopLine="193"/>
</Position12>
<Position13>
<Filename Value="testunit.pas"/>
<Caret Line="763" Column="1" TopLine="741"/>
<Filename Value="../../Units/PascalScript/uPSComponent.pas"/>
<Caret Line="110" Column="5" TopLine="98"/>
</Position13>
<Position14>
<Filename Value="testunit.pas"/>
<Caret Line="42" Column="141" TopLine="38"/>
<Filename Value="../../Units/PascalScript/uPSComponent.pas"/>
<Caret Line="918" Column="12" TopLine="903"/>
</Position14>
<Position15>
<Filename Value="testunit.pas"/>
<Caret Line="713" Column="7" TopLine="711"/>
<Filename Value="../../Units/PascalScript/uPSDebugger.pas"/>
<Caret Line="627" Column="13" TopLine="624"/>
</Position15>
<Position16>
<Filename Value="testunit.pas"/>
<Caret Line="113" Column="125" TopLine="104"/>
<Filename Value="../../Units/PascalScript/uPSRuntime.pas"/>
<Caret Line="6933" Column="21" TopLine="6930"/>
</Position16>
<Position17>
<Filename Value="testunit.pas"/>
<Caret Line="753" Column="1" TopLine="732"/>
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/other.inc"/>
<Caret Line="31" Column="4" TopLine="12"/>
</Position17>
<Position18>
<Filename Value="testunit.pas"/>
<Caret Line="747" Column="15" TopLine="721"/>
<Filename Value="../../Units/MMLAddon/PSInc/pscompile.inc"/>
<Caret Line="76" Column="28" TopLine="64"/>
</Position18>
<Position19>
<Filename Value="testunit.pas"/>
<Caret Line="752" Column="49" TopLine="721"/>
<Filename Value="../../../lazarus/lcl/lclintf.pas"/>
<Caret Line="103" Column="26" TopLine="91"/>
</Position19>
<Position20>
<Filename Value="../../../lazarus/lcl/comctrls.pp"/>
<Caret Line="234" Column="57" TopLine="206"/>
<Filename Value="../../../fpc/rtl/objpas/sysutils/dati.inc"/>
<Caret Line="258" Column="12" TopLine="254"/>
</Position20>
<Position21>
<Filename Value="../../../lazarus/lcl/include/tabsheet.inc"/>
<Caret Line="46" Column="11" TopLine="13"/>
<Filename Value="../../Units/MMLAddon/PSInc/pscompile.inc"/>
<Caret Line="75" Column="24" TopLine="55"/>
</Position21>
<Position22>
<Filename Value="../../../lazarus/lcl/comctrls.pp"/>
<Caret Line="260" Column="22" TopLine="232"/>
<Filename Value="testunit.pas"/>
<Caret Line="313" Column="44" TopLine="305"/>
</Position22>
<Position23>
<Filename Value="../../../lazarus/lcl/extctrls.pp"/>
<Caret Line="83" Column="64" TopLine="55"/>
<Filename Value="testunit.pas"/>
<Caret Line="518" Column="15" TopLine="516"/>
</Position23>
<Position24>
<Filename Value="../../../lazarus/lcl/include/custompage.inc"/>
<Caret Line="177" Column="34" TopLine="174"/>
<Filename Value="testunit.pas"/>
<Caret Line="321" Column="20" TopLine="305"/>
</Position24>
<Position25>
<Filename Value="testunit.pas"/>
<Caret Line="733" Column="115" TopLine="721"/>
<Caret Line="249" Column="93" TopLine="246"/>
</Position25>
<Position26>
<Filename Value="testunit.pas"/>
<Caret Line="761" Column="21" TopLine="758"/>
<Caret Line="765" Column="33" TopLine="807"/>
</Position26>
<Position27>
<Filename Value="testunit.pas"/>
<Caret Line="767" Column="12" TopLine="761"/>
<Caret Line="751" Column="45" TopLine="730"/>
</Position27>
<Position28>
<Filename Value="testunit.pas"/>
<Caret Line="756" Column="3" TopLine="740"/>
<Caret Line="7" Column="97" TopLine="1"/>
</Position28>
<Position29>
<Filename Value="testunit.pas"/>
<Caret Line="745" Column="16" TopLine="729"/>
<Caret Line="736" Column="47" TopLine="724"/>
</Position29>
<Position30>
<Filename Value="testunit.pas"/>
<Caret Line="713" Column="9" TopLine="711"/>
<Filename Value="../../Units/MMLAddon/PSInc/pscompile.inc"/>
<Caret Line="75" Column="24" TopLine="55"/>
</Position30>
</JumpHistory>
</ProjectOptions>

View File

@ -1,10 +1,11 @@
object Form1: TForm1
Left = 229
Left = 278
Height = 553
Top = 78
Top = 235
Width = 723
ActiveControl = PageControl1
Caption = 'Action1'
ClientHeight = 533
ClientHeight = 528
ClientWidth = 723
Menu = MainMenu1
OnClose = FormClose
@ -60,7 +61,6 @@ object Form1: TForm1
Left = 191
Top = 2
Action = ActionCloseTab
Caption = 'TB_CloseTab'
end
object ToolButton4: TToolButton
Left = 214
@ -157,8 +157,8 @@ object Form1: TForm1
end
object StatusBar: TStatusBar
Left = 0
Height = 23
Top = 510
Height = 21
Top = 507
Width = 723
Panels = <
item
@ -175,17 +175,17 @@ object Form1: TForm1
end
object PanelMemo: TPanel
Left = 0
Height = 150
Height = 147
Top = 360
Width = 723
Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom]
ClientHeight = 150
ClientHeight = 147
ClientWidth = 723
TabOrder = 2
object Memo1: TMemo
Left = 1
Height = 148
Height = 145
Top = 1
Width = 721
Align = alClient

View File

@ -1,121 +1,121 @@
LazarusResources.Add('TForm1','FORMDATA',[
'TPF0'#6'TForm1'#5'Form1'#4'Left'#3#229#0#6'Height'#3')'#2#3'Top'#2'N'#5'Widt'
+'h'#3#211#2#7'Caption'#6#7'Action1'#12'ClientHeight'#3#21#2#11'ClientWidth'#3
+#211#2#4'Menu'#7#9'MainMenu1'#7'OnClose'#7#9'FormClose'#8'OnCreate'#7#10'For'
+'mCreate'#9'OnDestroy'#7#11'FormDestroy'#10'OnShortCut'#7#13'FormShortCuts'#8
+'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.29'#7'Visible'#9#0#8
+'TToolBar'#8'ToolBar1'#4'Left'#2#0#6'Height'#2#24#3'Top'#2#0#5'Width'#3#211#2
+#7'Caption'#6#8'ToolBar1'#6'Images'#7#17'Mufasa_Image_List'#14'ParentShowHin'
+'t'#8#8'ShowHint'#9#8'TabOrder'#2#0#0#11'TToolButton'#6'TB_Run'#4'Left'#2'`'
+#3'Top'#2#2#6'Action'#7#15'ActionRunScript'#10'ImageIndex'#2#6#0#0#11'TToolB'
+'utton'#8'TB_Pause'#4'Left'#2'w'#3'Top'#2#2#6'Action'#7#17'ActionPauseScript'
+#7'Enabled'#8#10'ImageIndex'#2#5#0#0#11'TToolButton'#7'TB_Stop'#4'Left'#3#142
+#0#3'Top'#2#2#6'Action'#7#16'ActionStopScript'#7'Enabled'#8#10'ImageIndex'#2
+#7#0#0#11'TToolButton'#11'ToolButton1'#4'Left'#3#165#0#3'Top'#2#2#5'Width'#2
+#3#7'Caption'#6#11'ToolButton1'#5'Style'#7#10'tbsDivider'#0#0#11'TToolButton'
+#9'TB_NewTab'#4'Left'#3#168#0#3'Top'#2#2#6'Action'#7#12'ActionNewTab'#0#0#11
+'TToolButton'#11'TB_CloseTab'#4'Left'#3#191#0#3'Top'#2#2#6'Action'#7#14'Acti'
+'onCloseTab'#7'Caption'#6#11'TB_CloseTab'#0#0#11'TToolButton'#11'ToolButton4'
+#4'Left'#3#214#0#3'Top'#2#2#5'Width'#2#3#7'Caption'#6#11'ToolButton4'#5'Styl'
+'e'#7#10'tbsDivider'#0#0#11'TToolButton'#13'TB_ClearDebug'#4'Left'#3#217#0#4
+'Hint'#6#15'Clear the debug'#3'Top'#2#2#7'Caption'#6#13'TB_ClearDebug'#10'Im'
+'ageIndex'#2#4#7'OnClick'#7#16'ButtonClearClick'#0#0#11'TToolButton'#13'TB_P'
+'ickColour'#4'Left'#3#240#0#4'Hint'#6#12'Pick a color'#3'Top'#2#2#7'Caption'
+#6#13'TB_PickColour'#10'ImageIndex'#2#0#7'OnClick'#7#15'ButtonPickClick'#0#0
+#11'TToolButton'#15'TB_SelectClient'#4'Left'#3#7#1#4'Hint'#6#15'Select a cli'
+'ent'#3'Top'#2#2#7'Caption'#6#15'TB_SelectClient'#10'ImageIndex'#2#2#11'OnMo'
+'useDown'#7#18'ButtonSelectorDown'#0#0#11'TToolButton'#11'ToolButton8'#4'Lef'
+'t'#3#30#1#3'Top'#2#2#5'Width'#2#3#7'Caption'#6#11'ToolButton8'#5'Style'#7#10
+'tbsDivider'#0#0#11'TToolButton'#10'TB_Convert'#4'Left'#3'!'#1#3'Top'#2#2#7
+'Caption'#6#10'TB_Convert'#7'Enabled'#8#10'ImageIndex'#2#1#0#0#11'TToolButto'
+'n'#16'TB_ReloadPlugins'#4'Left'#3'8'#1#3'Top'#2#2#7'Caption'#6#16'TB_Reload'
+'Plugins'#7'Enabled'#8#10'ImageIndex'#2#13#0#0#11'TToolButton'#7'TB_Tray'#4
+'Left'#3'O'#1#4'Hint'#6#16'Minimize to tray'#3'Top'#2#2#7'Caption'#6#7'TB_Tr'
+'ay'#10'ImageIndex'#2#17#7'OnClick'#7#15'ButtonTrayClick'#0#0#11'TToolButton'
+#6'TB_New'#4'Left'#2#1#3'Top'#2#2#6'Action'#7#15'ActionNewScript'#14'ParentS'
+'howHint'#8#8'ShowHint'#9#0#0#11'TToolButton'#11'ToolButton2'#4'Left'#2']'#3
+'Top'#2#2#5'Width'#2#3#7'Caption'#6#11'ToolButton2'#5'Style'#7#10'tbsDivider'
+#0#0#11'TToolButton'#7'TB_Open'#4'Left'#2#24#3'Top'#2#2#6'Action'#7#16'Actio'
+'nOpenScript'#14'ParentShowHint'#8#8'ShowHint'#9#0#0#11'TToolButton'#7'TB_Sa'
+'ve'#4'Left'#2'/'#3'Top'#2#2#6'Action'#7#16'ActionSaveScript'#0#0#11'TToolBu'
+'tton'#10'TB_SaveAll'#4'Left'#2'F'#3'Top'#2#2#6'Action'#7#13'ActionSaveAll'#7
+'Enabled'#8#0#0#0#10'TStatusBar'#9'StatusBar'#4'Left'#2#0#6'Height'#2#23#3'T'
+'op'#3#254#1#5'Width'#3#211#2#6'Panels'#14#1#5'Width'#2'<'#0#1#4'Text'#6#8'U'
+'ntitled'#5'Width'#3#150#0#0#1#5'Width'#2'2'#0#0#11'SimplePanel'#8#0#0#6'TPa'
+'nel'#9'PanelMemo'#4'Left'#2#0#6'Height'#3#150#0#3'Top'#3'h'#1#5'Width'#3#211
+#2#5'Align'#7#8'alBottom'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBo'
+'ttom'#0#12'ClientHeight'#3#150#0#11'ClientWidth'#3#211#2#8'TabOrder'#2#2#0#5
+'TMemo'#5'Memo1'#4'Left'#2#1#6'Height'#3#148#0#3'Top'#2#1#5'Width'#3#209#2#5
+'Align'#7#8'alClient'#7'Anchors'#11#6'akLeft'#7'akRight'#8'akBottom'#0#10'Sc'
+'rollBars'#7#10'ssAutoBoth'#8'TabOrder'#2#0#0#0#0#9'TSplitter'#19'SplitterMe'
+'moSynedit'#6'Cursor'#7#8'crVSplit'#4'Left'#2#0#6'Height'#2#5#3'Top'#3'c'#1#5
+'Width'#3#211#2#5'Align'#7#8'alBottom'#12'ResizeAnchor'#7#8'akBottom'#0#0#12
+'TPageControl'#12'PageControl1'#4'Left'#2#0#6'Height'#3'K'#1#3'Top'#2#24#5'W'
+'idth'#3#211#2#5'Align'#7#8'alClient'#9'PopupMenu'#7#8'TabPopup'#8'TabOrder'
+#2#4#8'OnChange'#7#18'PageControl1Change'#14'OnContextPopup'#7#24'PageContro'
+'l1ContextPopup'#10'OnDragDrop'#7#20'PageControl1DragDrop'#10'OnDragOver'#7
+#20'PageControl1DragOver'#11'OnMouseDown'#7#21'PageControl1MouseDown'#0#0#9
+'TMainMenu'#9'MainMenu1'#4'left'#3'0'#2#0#9'TMenuItem'#8'MenuFile'#7'Caption'
+#6#4'File'#13'SubMenuImages'#7#17'Mufasa_Image_List'#7'OnClick'#7#13'MenuFil'
+'eClick'#0#9'TMenuItem'#11'MenuItemNew'#6'Action'#7#15'ActionNewScript'#11'B'
+'itmap.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0
+#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0#0#0#0#255
+#255#255#0#187'j4k'#186'e0'#188#187'f1'#237#186'f0'#247#186'f0'#247#186'f0'
+#247#186'e0'#247#186'e/'#247#185'e.'#247#185'e.'#247#185'd.'#247#185'd.'#239
+#183'b,'#189#183'b.c'#255#255#255#0#255#255#255#0#188'i3'#222#248#241#234#242
,#247#236#223#253#246#235#222#255#246#234#222#255#246#234#220#255#246#234#220
+#255#250#243#235#255#250#243#235#255#250#242#234#255#252#247#243#255#252#248
+#244#253#254#254#253#240#183'`*'#213#255#255#255#0#255#255#255#0#191'q8'#245
+#245#235#223#254#253#191'h'#255#252#189'g'#255#251#190'e'#255#252#190'd'#255
+#252#190'd'#255#252#189'b'#255#251#189'c'#255#251#188'a'#255#252#190'`'#255
+#252#188'b'#255#253#251#248#253#185'd-'#243#255#255#255#0#255#255#255#0#193
+'x<'#247#247#237#227#255#253#194'n'#255#255#216#160#255#255#215#158#255#255
+#214#155#255#255#215#152#255#255#214#150#255#255#214#149#255#255#213#148#255
+#255#212#147#255#251#190'e'#255#251#247#244#255#187'g1'#247#255#255#255#0#255
+#255#255#0#196'|@'#247#247#240#230#255#248#180'U'#255#247#180'V'#255#247#181
+'T'#255#248#180'S'#255#248#178'S'#255#247#179'R'#255#247#179'R'#255#247#178
+'Q'#255#247#178'O'#255#247#178'O'#255#252#249#245#255#191'o6'#247#255#255#255
+#0#255#255#255#0#197#128'B'#247#248#241#232#255#254#229#213#255#253#229#211
+#255#253#229#211#255#252#229#211#255#252#229#211#255#252#228#209#255#252#226
+#206#255#252#226#204#255#251#224#201#255#251#225#200#255#253#250#247#255#193
+'v;'#247#255#255#255#0#255#255#255#0#197#130'E'#247#248#242#235#255#254#231
+#214#255#253#231#214#255#253#231#214#255#253#231#214#255#253#230#213#255#253
+#229#211#255#252#228#209#255#252#226#205#255#251#225#203#255#251#225#201#255
+#251#247#242#255#197'|?'#247#255#255#255#0#255#255#255#0#198#132'G'#247#249
+#243#236#255#254#232#214#255#254#232#215#255#253#231#214#255#253#231#214#255
+#253#231#213#255#253#229#211#255#251#228#208#255#251#227#204#255#250#223#199
+#255#250#223#198#255#250#242#234#255#198#128'B'#247#255#255#255#0#255#255#255
+#0#198#136'I'#247#249#244#237#255#254#232#216#255#254#232#216#255#254#232#215
+#255#254#231#214#255#253#229#211#255#252#228#209#255#251#225#204#255#250#224
+#199#255#249#221#195#255#248#220#194#255#250#244#237#255#198#130'E'#247#255
+#255#255#0#255#255#255#0#198#136'J'#247#249#244#239#255#254#231#215#255#253
+#231#214#255#253#231#213#255#253#230#212#255#252#230#210#255#251#225#204#255
+#250#223#199#255#248#220#194#255#246#218#189#255#246#216#187#255#250#244#239
+#255#198#131'F'#247#255#255#255#0#255#255#255#0#198#137'K'#247#249#244#240
+#255#252#230#211#255#252#230#212#255#253#231#211#255#252#228#209#255#251#227
+#205#255#250#224#200#255#248#220#194#255#245#214#187#255#243#212#181#255#241
+#210#179#255#248#244#240#255#196#130'F'#247#255#255#255#0#255#255#255#0#198
+#137'K'#247#249#245#241#255#252#227#207#255#251#228#208#255#252#228#207#255
+#252#227#205#255#250#225#202#255#249#221#196#255#246#217#188#255#244#233#223
+#255#247#242#236#255#251#247#243#255#245#239#233#255#194'~E'#251#255#255#255
+#0#255#255#255#0#198#137'L'#246#249#245#241#255#252#227#205#255#251#227#206
+#255#251#227#205#255#251#226#203#255#249#224#200#255#248#220#194#255#245#214
+#186#255#253#251#248#255#252#230#205#255#250#229#201#255#226#182#132#255#191
+'yB'#166#255#255#255#0#255#255#255#0#197#136'K'#234#250#246#242#252#250#224
+#199#255#251#225#201#255#251#226#201#255#251#224#200#255#249#223#197#255#248
+#219#193#255#244#214#184#255#255#251#248#255#246#216#180#255#225#176'}'#255
+#219#146'd'#246#180'k>'#7#255#255#255#0#255#255#255#0#196#133'I'#195#247#242
+#236#236#248#244#238#252#248#244#237#255#248#243#237#255#248#243#237#255#248
+#243#237#255#248#242#236#255#247#242#236#255#242#230#215#255#226#178'}'#255
+#219#148'e'#245#179'h;'#7#255#255#255#0#255#255#255#0#255#255#255#0#193'}D`'
+#200#139'M'#187#200#140'O'#238#200#140'O'#246#200#140'O'#247#200#140'O'#247
+#200#141'O'#247#201#140'O'#247#199#139'O'#247#197#137'K'#212#196'v;'#145#179
+'h<'#6#255#255#255#0#255#255#255#0#255#255#255#0#13'SubMenuImages'#7#17'Mufa'
+'sa_Image_List'#7'OnClick'#7#16'ActionNewExecute'#0#0#9'TMenuItem'#15'MenuIt'
+'emDivider'#7'Caption'#6#1'-'#0#0#9'TMenuItem'#12'MenuItemOpen'#6'Action'#7
+#16'ActionOpenScript'#11'Bitmap.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0
+'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0
+#0#0#0#0#0#0#0#0#0','#134#216#209'-'#136#216#247'-'#135#216#247'-'#136#216
'TPF0'#6'TForm1'#5'Form1'#4'Left'#3#22#1#6'Height'#3')'#2#3'Top'#3#235#0#5'Wi'
+'dth'#3#211#2#13'ActiveControl'#7#12'PageControl1'#7'Caption'#6#7'Action1'#12
+'ClientHeight'#3#16#2#11'ClientWidth'#3#211#2#4'Menu'#7#9'MainMenu1'#7'OnClo'
+'se'#7#9'FormClose'#8'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestr'
+'oy'#10'OnShortCut'#7#13'FormShortCuts'#8'Position'#7#14'poScreenCenter'#10
+'LCLVersion'#6#6'0.9.29'#7'Visible'#9#0#8'TToolBar'#8'ToolBar1'#4'Left'#2#0#6
+'Height'#2#24#3'Top'#2#0#5'Width'#3#211#2#7'Caption'#6#8'ToolBar1'#6'Images'
+#7#17'Mufasa_Image_List'#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#0#0
+#11'TToolButton'#6'TB_Run'#4'Left'#2'`'#3'Top'#2#2#6'Action'#7#15'ActionRunS'
+'cript'#10'ImageIndex'#2#6#0#0#11'TToolButton'#8'TB_Pause'#4'Left'#2'w'#3'To'
+'p'#2#2#6'Action'#7#17'ActionPauseScript'#7'Enabled'#8#10'ImageIndex'#2#5#0#0
+#11'TToolButton'#7'TB_Stop'#4'Left'#3#142#0#3'Top'#2#2#6'Action'#7#16'Action'
+'StopScript'#7'Enabled'#8#10'ImageIndex'#2#7#0#0#11'TToolButton'#11'ToolButt'
+'on1'#4'Left'#3#165#0#3'Top'#2#2#5'Width'#2#3#7'Caption'#6#11'ToolButton1'#5
+'Style'#7#10'tbsDivider'#0#0#11'TToolButton'#9'TB_NewTab'#4'Left'#3#168#0#3
+'Top'#2#2#6'Action'#7#12'ActionNewTab'#0#0#11'TToolButton'#11'TB_CloseTab'#4
+'Left'#3#191#0#3'Top'#2#2#6'Action'#7#14'ActionCloseTab'#0#0#11'TToolButton'
+#11'ToolButton4'#4'Left'#3#214#0#3'Top'#2#2#5'Width'#2#3#7'Caption'#6#11'Too'
+'lButton4'#5'Style'#7#10'tbsDivider'#0#0#11'TToolButton'#13'TB_ClearDebug'#4
+'Left'#3#217#0#4'Hint'#6#15'Clear the debug'#3'Top'#2#2#7'Caption'#6#13'TB_C'
+'learDebug'#10'ImageIndex'#2#4#7'OnClick'#7#16'ButtonClearClick'#0#0#11'TToo'
+'lButton'#13'TB_PickColour'#4'Left'#3#240#0#4'Hint'#6#12'Pick a color'#3'Top'
+#2#2#7'Caption'#6#13'TB_PickColour'#10'ImageIndex'#2#0#7'OnClick'#7#15'Butto'
+'nPickClick'#0#0#11'TToolButton'#15'TB_SelectClient'#4'Left'#3#7#1#4'Hint'#6
+#15'Select a client'#3'Top'#2#2#7'Caption'#6#15'TB_SelectClient'#10'ImageInd'
+'ex'#2#2#11'OnMouseDown'#7#18'ButtonSelectorDown'#0#0#11'TToolButton'#11'Too'
+'lButton8'#4'Left'#3#30#1#3'Top'#2#2#5'Width'#2#3#7'Caption'#6#11'ToolButton'
+'8'#5'Style'#7#10'tbsDivider'#0#0#11'TToolButton'#10'TB_Convert'#4'Left'#3'!'
+#1#3'Top'#2#2#7'Caption'#6#10'TB_Convert'#7'Enabled'#8#10'ImageIndex'#2#1#0#0
+#11'TToolButton'#16'TB_ReloadPlugins'#4'Left'#3'8'#1#3'Top'#2#2#7'Caption'#6
+#16'TB_ReloadPlugins'#7'Enabled'#8#10'ImageIndex'#2#13#0#0#11'TToolButton'#7
+'TB_Tray'#4'Left'#3'O'#1#4'Hint'#6#16'Minimize to tray'#3'Top'#2#2#7'Caption'
+#6#7'TB_Tray'#10'ImageIndex'#2#17#7'OnClick'#7#15'ButtonTrayClick'#0#0#11'TT'
+'oolButton'#6'TB_New'#4'Left'#2#1#3'Top'#2#2#6'Action'#7#15'ActionNewScript'
+#14'ParentShowHint'#8#8'ShowHint'#9#0#0#11'TToolButton'#11'ToolButton2'#4'Le'
+'ft'#2']'#3'Top'#2#2#5'Width'#2#3#7'Caption'#6#11'ToolButton2'#5'Style'#7#10
+'tbsDivider'#0#0#11'TToolButton'#7'TB_Open'#4'Left'#2#24#3'Top'#2#2#6'Action'
+#7#16'ActionOpenScript'#14'ParentShowHint'#8#8'ShowHint'#9#0#0#11'TToolButto'
+'n'#7'TB_Save'#4'Left'#2'/'#3'Top'#2#2#6'Action'#7#16'ActionSaveScript'#0#0
+#11'TToolButton'#10'TB_SaveAll'#4'Left'#2'F'#3'Top'#2#2#6'Action'#7#13'Actio'
+'nSaveAll'#7'Enabled'#8#0#0#0#10'TStatusBar'#9'StatusBar'#4'Left'#2#0#6'Heig'
+'ht'#2#21#3'Top'#3#251#1#5'Width'#3#211#2#6'Panels'#14#1#5'Width'#2'<'#0#1#4
+'Text'#6#8'Untitled'#5'Width'#3#150#0#0#1#5'Width'#2'2'#0#0#11'SimplePanel'#8
+#0#0#6'TPanel'#9'PanelMemo'#4'Left'#2#0#6'Height'#3#147#0#3'Top'#3'h'#1#5'Wi'
+'dth'#3#211#2#5'Align'#7#8'alBottom'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRi'
+'ght'#8'akBottom'#0#12'ClientHeight'#3#147#0#11'ClientWidth'#3#211#2#8'TabOr'
+'der'#2#2#0#5'TMemo'#5'Memo1'#4'Left'#2#1#6'Height'#3#145#0#3'Top'#2#1#5'Wid'
+'th'#3#209#2#5'Align'#7#8'alClient'#7'Anchors'#11#6'akLeft'#7'akRight'#8'akB'
+'ottom'#0#10'ScrollBars'#7#10'ssAutoBoth'#8'TabOrder'#2#0#0#0#0#9'TSplitter'
+#19'SplitterMemoSynedit'#6'Cursor'#7#8'crVSplit'#4'Left'#2#0#6'Height'#2#5#3
+'Top'#3'c'#1#5'Width'#3#211#2#5'Align'#7#8'alBottom'#12'ResizeAnchor'#7#8'ak'
+'Bottom'#0#0#12'TPageControl'#12'PageControl1'#4'Left'#2#0#6'Height'#3'K'#1#3
+'Top'#2#24#5'Width'#3#211#2#5'Align'#7#8'alClient'#9'PopupMenu'#7#8'TabPopup'
+#8'TabOrder'#2#4#8'OnChange'#7#18'PageControl1Change'#14'OnContextPopup'#7#24
+'PageControl1ContextPopup'#10'OnDragDrop'#7#20'PageControl1DragDrop'#10'OnDr'
+'agOver'#7#20'PageControl1DragOver'#11'OnMouseDown'#7#21'PageControl1MouseDo'
+'wn'#0#0#9'TMainMenu'#9'MainMenu1'#4'left'#3'0'#2#0#9'TMenuItem'#8'MenuFile'
+#7'Caption'#6#4'File'#13'SubMenuImages'#7#17'Mufasa_Image_List'#7'OnClick'#7
+#13'MenuFileClick'#0#9'TMenuItem'#11'MenuItemNew'#6'Action'#7#15'ActionNewSc'
+'ript'#11'Bitmap.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0'6'#0#0#0'('#0
+#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0#0
+#0#0#255#255#255#0#187'j4k'#186'e0'#188#187'f1'#237#186'f0'#247#186'f0'#247
+#186'f0'#247#186'e0'#247#186'e/'#247#185'e.'#247#185'e.'#247#185'd.'#247#185
+'d.'#239#183'b,'#189#183'b.c'#255#255#255#0#255#255#255#0#188'i3'#222#248#241
,#234#242#247#236#223#253#246#235#222#255#246#234#222#255#246#234#220#255#246
+#234#220#255#250#243#235#255#250#243#235#255#250#242#234#255#252#247#243#255
+#252#248#244#253#254#254#253#240#183'`*'#213#255#255#255#0#255#255#255#0#191
+'q8'#245#245#235#223#254#253#191'h'#255#252#189'g'#255#251#190'e'#255#252#190
+'d'#255#252#190'd'#255#252#189'b'#255#251#189'c'#255#251#188'a'#255#252#190
+'`'#255#252#188'b'#255#253#251#248#253#185'd-'#243#255#255#255#0#255#255#255
+#0#193'x<'#247#247#237#227#255#253#194'n'#255#255#216#160#255#255#215#158#255
+#255#214#155#255#255#215#152#255#255#214#150#255#255#214#149#255#255#213#148
+#255#255#212#147#255#251#190'e'#255#251#247#244#255#187'g1'#247#255#255#255#0
+#255#255#255#0#196'|@'#247#247#240#230#255#248#180'U'#255#247#180'V'#255#247
+#181'T'#255#248#180'S'#255#248#178'S'#255#247#179'R'#255#247#179'R'#255#247
+#178'Q'#255#247#178'O'#255#247#178'O'#255#252#249#245#255#191'o6'#247#255#255
+#255#0#255#255#255#0#197#128'B'#247#248#241#232#255#254#229#213#255#253#229
+#211#255#253#229#211#255#252#229#211#255#252#229#211#255#252#228#209#255#252
+#226#206#255#252#226#204#255#251#224#201#255#251#225#200#255#253#250#247#255
+#193'v;'#247#255#255#255#0#255#255#255#0#197#130'E'#247#248#242#235#255#254
+#231#214#255#253#231#214#255#253#231#214#255#253#231#214#255#253#230#213#255
+#253#229#211#255#252#228#209#255#252#226#205#255#251#225#203#255#251#225#201
+#255#251#247#242#255#197'|?'#247#255#255#255#0#255#255#255#0#198#132'G'#247
+#249#243#236#255#254#232#214#255#254#232#215#255#253#231#214#255#253#231#214
+#255#253#231#213#255#253#229#211#255#251#228#208#255#251#227#204#255#250#223
+#199#255#250#223#198#255#250#242#234#255#198#128'B'#247#255#255#255#0#255#255
+#255#0#198#136'I'#247#249#244#237#255#254#232#216#255#254#232#216#255#254#232
+#215#255#254#231#214#255#253#229#211#255#252#228#209#255#251#225#204#255#250
+#224#199#255#249#221#195#255#248#220#194#255#250#244#237#255#198#130'E'#247
+#255#255#255#0#255#255#255#0#198#136'J'#247#249#244#239#255#254#231#215#255
+#253#231#214#255#253#231#213#255#253#230#212#255#252#230#210#255#251#225#204
+#255#250#223#199#255#248#220#194#255#246#218#189#255#246#216#187#255#250#244
+#239#255#198#131'F'#247#255#255#255#0#255#255#255#0#198#137'K'#247#249#244
+#240#255#252#230#211#255#252#230#212#255#253#231#211#255#252#228#209#255#251
+#227#205#255#250#224#200#255#248#220#194#255#245#214#187#255#243#212#181#255
+#241#210#179#255#248#244#240#255#196#130'F'#247#255#255#255#0#255#255#255#0
+#198#137'K'#247#249#245#241#255#252#227#207#255#251#228#208#255#252#228#207
+#255#252#227#205#255#250#225#202#255#249#221#196#255#246#217#188#255#244#233
+#223#255#247#242#236#255#251#247#243#255#245#239#233#255#194'~E'#251#255#255
+#255#0#255#255#255#0#198#137'L'#246#249#245#241#255#252#227#205#255#251#227
+#206#255#251#227#205#255#251#226#203#255#249#224#200#255#248#220#194#255#245
+#214#186#255#253#251#248#255#252#230#205#255#250#229#201#255#226#182#132#255
+#191'yB'#166#255#255#255#0#255#255#255#0#197#136'K'#234#250#246#242#252#250
+#224#199#255#251#225#201#255#251#226#201#255#251#224#200#255#249#223#197#255
+#248#219#193#255#244#214#184#255#255#251#248#255#246#216#180#255#225#176'}'
+#255#219#146'd'#246#180'k>'#7#255#255#255#0#255#255#255#0#196#133'I'#195#247
+#242#236#236#248#244#238#252#248#244#237#255#248#243#237#255#248#243#237#255
+#248#243#237#255#248#242#236#255#247#242#236#255#242#230#215#255#226#178'}'
+#255#219#148'e'#245#179'h;'#7#255#255#255#0#255#255#255#0#255#255#255#0#193
+'}D`'#200#139'M'#187#200#140'O'#238#200#140'O'#246#200#140'O'#247#200#140'O'
+#247#200#141'O'#247#201#140'O'#247#199#139'O'#247#197#137'K'#212#196'v;'#145
+#179'h<'#6#255#255#255#0#255#255#255#0#255#255#255#0#13'SubMenuImages'#7#17
+'Mufasa_Image_List'#7'OnClick'#7#16'ActionNewExecute'#0#0#9'TMenuItem'#15'Me'
+'nuItemDivider'#7'Caption'#6#1'-'#0#0#9'TMenuItem'#12'MenuItemOpen'#6'Action'
+#7#16'ActionOpenScript'#11'Bitmap.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0
+#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0
+#0#0#0#0#0#0#0#0#0#0','#134#216#209'-'#136#216#247'-'#135#216#247'-'#136#216
+#247'-'#136#216#247'-'#136#216#247'-'#136#216#247'-'#136#216#247'-'#136#216
+#247'-'#136#216#247'-'#136#216#247'-'#135#216#247'-'#136#216#247','#134#216
+#209#255#255#255#0#255#255#255#0'3'#142#217#251#220#240#250#255#152#225#246

View File

@ -310,7 +310,7 @@ begin
ss_Stopping:
begin //Terminate the thread the tough way.
writeln('Terminating the Scriptthread');
KillThread(ScriptThread.Handle);
Writeln('Exit code terminate: ' +inttostr(KillThread(ScriptThread.Handle)));
ScriptThread.Free;
ScriptState := ss_None;
end;
@ -734,6 +734,11 @@ procedure TForm1.PageControl1ContextPopup(Sender: TObject; MousePos: TPoint;
var Handled: Boolean);
begin
PopupTab := PageControl1.TabIndexAtClientPos(MousePos);
if PopupTab = -1 then
begin
Writeln('We couldn''t find which tab you clicked on, closing the popup');
Handled := true;
end;
end;
procedure TForm1.PageControl1DragDrop(Sender, Source: TObject; X, Y: Integer);
@ -745,10 +750,10 @@ begin
exit;
NewPos := PageControl1.TabIndexAtClientPos(Point(x,y));
OldPos := PageControl1.TabIndex;
if NewPos <> OldPos then
if (NewPos <> OldPos) and (NewPos <> -1) then
begin;
Tabs.Move(OldPos,NewPos);
PageControl1.Pages[PageControl1.TabIndex].TabIndex:= PageControl1.TabIndexAtClientPos(Point(x,y));
PageControl1.Pages[OldPos].TabIndex:= NewPos;
end;
end;
@ -762,7 +767,7 @@ end;
procedure TForm1.PageControl1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
PageControl1.BeginDrag(False);
PageControl1.BeginDrag(false);
end;

View File

@ -21,10 +21,24 @@
Other.inc for the Mufasa Macro Library
}
procedure Wait(t: Integer);
procedure psWait(t: Integer);
{$ifdef MSWINDOWS}
begin
Sleep(t);
end;
{$else}
var
EndTime : integer;
begin
if t > 50 then
begin;
EndTime := GetTickCount + t;
while (CurrThread.PSScript.Exec.Status = isRunning) and (GetTickCount < EndTime) do
Sleep(16);
end else
sleep(t);
end;
{$endif}
procedure SaveScreenshot(FileName: string);
var

View File

@ -72,7 +72,7 @@ Sender.AddFunction(@SetTargetArray, 'procedure SetTargetArray(P: Integer; Size:
{other}
Sender.AddFunction(@SaveScreenshot,'procedure SaveScreenshot(FileName: string);');
Sender.AddFunction(@Wait, 'procedure wait(t: integer);');
Sender.AddFunction(@psWait, 'procedure wait(t: integer);');
Sender.AddFunction(@GetTickCount, 'function GetSystemTime: Integer;');
Sender.AddFunction(@CreateForm,'function CreateForm : TForm;');
Sender.AddFunction(@CreateButton,'function CreateButton(Owner : TComponent) : TButton');

View File

@ -57,7 +57,6 @@ type
PluginsToload : Array of integer;
FOnError : TOnError;
procedure OnCompile(Sender: TPSScript);
procedure AfterExecute(Sender : TPSScript);
function RequireFile(Sender: TObject; const OriginFileName: String;
var FileName, OutPut: string): Boolean;
procedure OnCompImport(Sender: TObject; x: TPSPascalCompiler);
@ -160,7 +159,6 @@ begin
PSScript.OnCompile:= @OnCompile;
PSScript.OnCompImport:= @OnCompImport;
PSScript.OnExecImport:= @OnExecImport;
PSScript.OnAfterExecute:= @AfterExecute;
OnError:= nil;
// Set some defines
{$I PSInc/psdefines.inc}
@ -188,7 +186,6 @@ end;
{$I PSInc/Wrappers/other.inc}
{$I PSInc/Wrappers/bitmap.inc}
{$I PSInc/Wrappers/window.inc}
{$I PSInc/Wrappers/colour.inc}
{$I PSInc/Wrappers/math.inc}
{$I PSInc/Wrappers/mouse.inc}
@ -237,12 +234,6 @@ begin
{$I PSInc/pscompile.inc}
end;
procedure TMMLPSThread.AfterExecute(Sender: TPSScript);
begin
//Here we add all the Script-freeing-leftovers (like BMParray etc)
// ^ This will all be done with Client.Destroy;
end;
function TMMLPSThread.RequireFile(Sender: TObject;
const OriginFileName: String; var FileName, OutPut: string): Boolean;
var