Mini Kabibi Habibi

Current Path : C:/Users/ITO/Desktop/VF9/program files/microsoft visual foxpro 9/tools/analyzer/
Upload File :
Current File : C:/Users/ITO/Desktop/VF9/program files/microsoft visual foxpro 9/tools/analyzer/analyzer.app

�� [c�b���%��q��r�1��4���G�G	 �7��%�C�m1b�C��C�T���
������6T��CC��]�out�Doc Wizard Output Folder?�3���@%�C�
���C��
fdxref.dbf0
�C��	files.dbf0
���S��C�DYou must supply the name of the Documenting Wizard target directory.��x��B�-���%�C�fdxref���?�F���\�Q����fdxref���%�C�
��x�
Q��C&���G((�symbol�%�C�symbols�
����<o�fdxref�C�f�Q��C�Q�����������symbols��F��-��jump�UM1M2MDIRFDXREFSYMBOLCOUNTSYMBOLSJUMP'4��7����
��F��G((�symbol�T���
�����%��
��G��Q�%�C����o�B��&%�CCC��f�R�.VCX.SCX.DBC��$�%�C�snipfile�����Q���Q��C�������#����	��%�C��
�
�� �/��	snipfile.��
��:�
��C�����C�
/�����:�
��C����Gb(�B��%�C�
fdstack[1]b�U����7��������
�
T�
�����%��
��B��M�%��
�
���7�T��C�
����T��C�
������C�S���T�
��
�
���%��
�
���3����
�������?��Gb(�B��%��
��DR����.%�C�_screen.activeform.captionb�C������C�G������6��C�'You must activate an edit window first.��x��B���%��
��DR�����C�������Gb(�B�UMMMWINNAMEMWINPOSSEEKMODESYMBOLFDXREFSETLIBRFILENAMESNIPFILE	SNIPRECNOSNIPFLDGOTORECFDSTACKFDSPCURPOSEXAMINEEXAMu5��F��%��
��T��A�G((�H�%�C+��=�#6���$�%�CC�orderv���n�G((�symbol��T��CC�
�fC�>���%��
��DR���E���
���%��
��D�C4
	����E���V���%��
��R�C4
	����	E������ �
%�C+
���H����7%��
��T� C�
���C�fC�
�f�C+	����&R,:��
�� �
��
 not found��T�
������j�&%�CCC��f�R�.VCX.SCX.DBC��C�%�C�snipfile�����Q���Q��C�������#������%�C���
��?�/��	snipfile.����:���X�
/�����:��#%�CC�`�R�PRG MPR SPR���^�T�
��C�
�8��%��
��DR���T�	��
�	����
��	�����T�
��	��������T�
��	�����������T�
������
��C�
��=R,:�C�
��� ��
 found in C���� C��Z���B�USTRFDXREFSEEKMODESYMBOLFILENAMESNIPFILE	SNIPRECNOSNIPFLDLINENOFDSPFDSTACKMWINNAMEMWINPOSGOTORECFLAG�QGb(�CC�fd3fll\fd3.fll0��fd3fll\fd3.fll�CC��]�wizards\fd3.fll�6��%��fd3C�LIBRv��r�B�a���B�-��U]4���5�����
�����%�C�files�
��Y�Q�����files���F�	�%�C�
����Q��C&��	��	#����T�
�C����F��
T�����T�
�����
T�
��-��T�
��procname��T���symbol��
T�
��a��G2�T���-��
H�#�D������;��������,�1�	m.err=.t.�G((�classes�%��
�����& �C�f�����BC���{��.o��fdxref������BC�������obj�~��T��CO��T�
�CC��f��F����
�F��	#�����Q��F�������D����T���a��B�UNMODEOLLVLCNTERRINODESCLEARMDIRFILESMTOPFILEFDXREFMVAR1MVAR2ALLOWDUPVISIBLETREEDIAGCLASSESPROCNAMEFLAGDISTINCTOBJMYRECSHOWIT	CLASSDIAG�4��%�C�\�
����@� T��C�
�C�\�
���\���%�C�.�
����}� T��C�
�C�.�
��=���B��
���UMFILE������5���T��C�collatev��Gk(��machine��Wo�fdxref�������������� �Q�	���CB�C�fC�f	����classd1�Q���C�classd1&����F��Q��& ��	�C�f��
�& �C�f���& �C�f���T�
�����T�
�����&+�C� �classd�	dprocname�����T��CO��+�CC�f���k�T��CO���	#����T�
�����T��C���C���������T�
���
������CC��f���G((�symbol��Q��Gk(��
���B�UMRLCKEYLONODELVLCCOLLATESYMBOLPROCNAMEFLAGFILENAMEDONEFDXREFCLASSD1CLASSD	DPROCNAMECNTOLNODESADDSHOWCLASy
4�
�������T�
���
����1%�C� C�
�� �classd�	dprocname���Y�G((�procname�"~+�CC��f� �
�� ��U�>���Y��%��
������T��CO��T��C�f��H�#��
����#T��C���C�
������	��T�
���
����T��CO����CC�
�f���#��
���G((�procname���T�
���
����B�U
PROCNAMEPONODEMRLONODELVLDONEMPARENTOLNODESADDSYMBOLCNTSHOWCLAS�5����5��5���5��5��5����	�
��
���2��
T�����T�	�C�exactv��G � h��did�
�C�C��>��& �C�
f��
�F��-�%�C+����B�-���T�
�����	#����T��CC���C��
>���F��
T�����T�
�����
T�
��a��+�CC�
���
����%�C�
���	PROCEDURE��q�
T�
��-��!��T�
���
�����%��
�����& �C�f�����DF�����G((�	procedure��T�
�����
T�����"T��C��C�
���������T�
���
��������F��~���D����T�
�CO��T�
������T+�CC�
�f�F�fdxref�symbol��
�.��
	�CC���fCC���f	����T�
��C��C��>����T�
��C�
�C��
>���%�CC�
�f�did�
��~�T�
�����"T��C��C�
���������T�
���
������C��C��>�����#��
�
���Q��G((�set exact &msetexact
B�ULVLCNTERRALEVMINDENTMPARENTCACTIONCHARSTRACKMTOP	MSETEXACTMRLONODEDIDPROCFDXREFSYMBOLFILESFILEPROCNAMEFLAG	PROCEDUREOLNODESADDSHOWIT;4���5������r��did��C�
�f��
E�C�
�f��%�C4
�
�
��2��_�B��T���
����~+�C�fC�
�f���%���D���%��
������T��CO��T��C�f��H�#��
����%�C���O�C�����T��C���C�����	�
����H�#T��C���C�����	�
����T�
�
��
�
���T��C�CC�`f���%��
������#T������ (recursion)����T��CO��T���
���CC�`f����C�C��>����T���
������	#�������T���
����B�UPRGPONODEMRILONODELVLPROCNAMEFLAGMPARENTOLNODESADDSYMBOLCNTTRACKTEXTSHOWITFDXREFUUUtexY��exam��setlibr
��tre�
��JustStem�
��	ClassDiagF��showclas���treediag���showit"��gotorec���curpos���examine����aara��aA1qAQq�QA��A�q�AqA�1qQq��qA�AAaq�A�1��A���AaAA�q�AA1QQ�111A�AaAAQ���aAAAR�AqaA2rqAaA�QA�a�A�Q���A��A��AAAAqa��aq�A�1�A��A2Q1Q11��A��A��AA3�qAq2�3�Q�Aq��A�q���Q1�a��q��A����q�q�A�qqA�A3q�A�A�3��a!u�q����a�!�A���QQ�A��A2��Q!�1��A�A1Q�Q�AAQA3�q�qqq���AaqA�qA���q���Q��AAQA���!A��!Q�r1�"B�A���!Q�A�A�a�A4��qq��AA1�!2��A�A���1AQ�11����Q�AAA1A3111��(Y��f��=��I2��H7��I�����	� /H �#vn�#�#�o�#�#�p�#�#�0
mPLATFORMCUNIQUEIDC	
TIMESTAMPN
CLASSMCLASSLOCM!BASECLASSM%OBJNAMEM)PARENTM-PROPERTIESM1PROTECTEDM5METHODSM9OBJCODEM=OLEMAOLE2MERESERVED1MIRESERVED2MMRESERVED3MQRESERVED4MURESERVED5MYRESERVED6M]RESERVED7MaRESERVED8MeUSERMi
 COMMENT Screen               WINDOWS _R040MTX38 578984160/F]�� WINDOWS _QWK0MM2GR 694724185�����L1 WINDOWS _R040MTX38 694724185�
�
�
�
�
�� WINDOWS _QWK0MM2GR 694514793H
W
f
s
�
�� WINDOWS _QWK0MM2H0 694514793�����q� WINDOWS _QWK0MM2HK 694514793�����[ WINDOWS _R040MTX38 612990831���� WINDOWS _QWK0MM2IF 579305808iw��� WINDOWS _QWK0MM2IZ 694514793)6b�	 WINDOWS _QWK0MTO26 578984396����" WINDOWS _QWK0MTO27 612990831cr��� WINDOWS _QWK0MTO2G 578984396$3_ WINDOWS _QWK0MTO2H 612990831����� WINDOWS _QWK0MTO2Q 578984397Xft�� WINDOWS _QWK0MTO2R 612990831��G WINDOWS _QWK0MTO30 579305984����� WINDOWS _QWK0MTO3A 694514793������ i! WINDOWS _08B126XDA 694724185�"�"��"#T#�D%% WINDOWS _RJK0YV6J3 694514793�$�$�$�$�� COMMENT RESERVED            Z
4�VERSION =   3.00dataenvironmentdataenvironmentDataenvironmentJLeft = 1
Top = 220
Width = 520
Height = 200
Name = "Dataenvironment"
11formformform1�DataSession = 1
ScaleMode = 3
Height = 380
Width = 607
DoCreate = .T.
AutoCenter = .T.
BorderStyle = 1
Caption = "Code Analyzer"
MaxButton = .F.
HelpContextID = 22990009
ForeColor = 0,0,0
Name = "form1"
,PROCEDURE Destroy
pop menu _msysmenu
IF USED("files")
	USE IN files
ENDIF
IF USED("symbols")
	USE IN symbols
ENDIF
IF USED("fdxref")
	USE IN fdxref
ENDIF
IF USED("snipfile")
	USE IN snipfile
ENDIF

ENDPROC
PROCEDURE Init
PUBLIC m.symbol
push menu _msysmenu

DO jump.mpr
	m.symbol=""
this.pageframe1.page1.list1.selected(1)=.t.

*- Set the radio button on the Hierarchy page
THIS.Pageframe1.Page2.opt.Value = 1

ENDPROC
PROCEDURE Load
set exact off
set conf on
CLOSE DATA

IF !USED("fdxref")
	use (mdir+"fdxref") again excl
ENDIF
select fdxref
set order to symbol
IF !USED("symbols")
	SELECT upper(symbol) as symbol,count(*) as count ;
		FROM fdxref INTO CURSOR symbols order by 1 group by 1
ENDIF
SELECT symbols
LOCATE
this.caption=this.caption+' - '+mdir

ENDPROC
�� ����%Pe_�U

����UTHISFORMRELEASEClick,��1�1!)���� ���T%'M
9�U����T������%�����������F��G((�symbol�"E�CC��
� (recursion)��f����analyzer��G���U
LONODETHISSELECTEDITEMTHISFORM
PAGEFRAME1PAGE2OPTVALUEFDXREFSYMBOLTEXTTEXANALYZERDblClick,��1t�q�!�A3o)��� ��Ҥ%\qk�U��analyzer��G��UTEXANALYZERClick,��1�1-)�CArial, 0, 9, 5, 15, 12, 32, 3, 0
Tahoma, 0, 9, 5, 14, 12, 23, 2, 0
	pageframe	pageframe
pageframe1form1ErasePage = .T.
PageCount = 2
TabStyle = 1
Top = 2
Left = 0
Width = 607
Height = 378
Name = "pageframe1"
Page1.FontName = "Tahoma"
Page1.Caption = "\<Symbols"
Page1.Name = "page1"
Page2.FontName = "Tahoma"
Page2.Caption = "\<Hierarchies"
Page2.Name = "page2"
TPROCEDURE page1.Activate
set order to symbol in fdxref
SELECT symbols

ENDPROC
�� ��%l�{�U$��analyzer��N��F��UTEXANALYZERSYMBOLSClick,��1�q2?)�listboxlistboxlist1form1.pageframe1.page1FontName = "Tahoma"
FontSize = 9
ColumnCount = 2
ColumnWidths = "230,50"
RowSourceType = 2
RowSource = "LEFT(symbol,30),str(count,5)"
Height = 133
Left = 16
NumberOfElements = 0
TabIndex = 1
Top = 6
Width = 313
IntegralHeight = .T.
Name = "list1"
/PROCEDURE GotFocus
select symbols

ENDPROC
��� ��Ix%C[U�U
F��USYMBOLSGotFocus,��1q2$)�
commandbutton
commandbuttoncmdGotoform1.pageframe1.page1xTop = 20
Left = 431
Height = 23
Width = 72
FontName = "Tahoma"
Caption = "\<Goto"
TabIndex = 4
Name = "cmdGoto"
JPROCEDURE Click
DO tex  in analyzer with 'G'
select symbols

ENDPROC
�� ��%l�{�U$��analyzer��G��F��UTEXANALYZERSYMBOLSClick,��1�q2?)�
commandbutton
commandbuttoncmdNextform1.pageframe1.page1xTop = 44
Left = 431
Height = 23
Width = 72
FontName = "Tahoma"
Caption = "\<Next"
TabIndex = 5
Name = "cmdNext"
JPROCEDURE Click
DO tex  in analyzer with 'N'
select symbols

ENDPROC
�� ���'%f�~�UG(�(�symbol�F��USYMBOLFDXREFSYMBOLSpage1.Activate,��11q2I)�gridgridgrid1form1.pageframe1.page1UColumnCount = 4
FontName = "Tahoma"
ChildOrder = "symbol"
DeleteMark = .F.
Height = 181
Left = 2
LinkMaster = "symbols"
Panel = 1
ReadOnly = .T.
RecordSource = "fdxref"
RelationalExpr = "upper(symbol)"
TabIndex = 3
Top = 161
Width = 598
Name = "grid1"
Column1.FontName = "Tahoma"
Column1.ControlSource = "fdxref.procname"
Column1.Width = 175
Column1.ReadOnly = .T.
Column1.Name = "column1"
Column2.FontName = "Tahoma"
Column2.ControlSource = "fdxref.lineno"
Column2.Width = 38
Column2.ReadOnly = .T.
Column2.Name = "column2"
Column3.FontName = "Tahoma"
Column3.FontSize = 9
Column3.ControlSource = "fdxref.filename"
Column3.Width = 310
Column3.ReadOnly = .T.
Column3.Name = "column3"
Column4.FontName = "Tahoma"
Column4.ControlSource = "fdxref.flag"
Column4.Width = 34
Column4.ReadOnly = .T.
Column4.Name = "column4"
headerheaderheader1$form1.pageframe1.page1.grid1.column1CFontName = "Tahoma"
Caption = "Procedure Name"
Name = "header1"
textboxtextboxtext1$form1.pageframe1.page1.grid1.column1FFontName = "Tahoma"
BorderStyle = 0
ReadOnly = .T.
Name = "text1"
8PROCEDURE Click
DO tex  in analyzer with 'G'
ENDPROC
,PROCEDURE Click
thisform.release
ENDPROC
�Top = 96
Left = 432
Height = 23
Width = 72
FontName = "Tahoma"
Cancel = .T.
Caption = "\<Close"
TabIndex = 6
Name = "Command1"
form1olheaderheaderheader1$form1.pageframe1.page1.grid1.column29FontName = "Tahoma"
Caption = "Line"
Name = "header1"
textboxtextboxtext1$form1.pageframe1.page1.grid1.column2FFontName = "Tahoma"
BorderStyle = 0
ReadOnly = .T.
Name = "text1"
headerheaderheader1$form1.pageframe1.page1.grid1.column3>FontName = "Tahoma"
Caption = "File Name"
Name = "header1"
textboxtextboxtext1$form1.pageframe1.page1.grid1.column3TFontName = "Tahoma"
FontSize = 9
BorderStyle = 0
ReadOnly = .T.
Name = "text1"
headerheaderheader1$form1.pageframe1.page1.grid1.column49FontName = "Tahoma"
Caption = "Flag"
Name = "header1"
textboxtextboxtext1$form1.pageframe1.page1.grid1.column4FFontName = "Tahoma"
BorderStyle = 0
ReadOnly = .T.
Name = "text1"
labellabelLabel1form1.pageframe1.page1�AutoSize = .T.
FontName = "Tahoma"
BackStyle = 0
Caption = "Click on a Procedure Name to View Source:"
Height = 16
Left = 14
Top = 146
Width = 241
TabIndex = 2
Name = "Label1"
optiongroupoptiongroupoptform1.pageframe1.page2�ButtonCount = 2
BackStyle = 0
Value = 0
Height = 48
Left = 431
Top = 12
Width = 125
Name = "opt"
Option1.BackStyle = 0
Option1.Caption = "Calling \<Tree"
Option1.Value = 0
Option1.Height = 18
Option1.Left = 5
Option1.Top = 5
Option1.Width = 104
Option1.Name = "option1"
Option2.BackStyle = 0
Option2.Caption = "Class \<Diagram"
Option2.Value = 0
Option2.Height = 18
Option2.Left = 5
Option2.Top = 25
Option2.Width = 104
Option2.Name = "option2"
�PROCEDURE InteractiveChange
do tre in analyzer with this.value,this.parent.ol
ENDPROC
PROCEDURE ProgrammaticChange
this.interactiveChange
ENDPROC
\�� CC��%����U'$��analyzer�������UTREANALYZERTHISVALUEPARENTOL

����UTHISINTERACTIVECHANGEInteractiveChange,��ProgrammaticChange��1A2�1Nw�)C
olecontrol
olecontrolform1.pageframe1.page2=Top = 12
Left = 26
Height = 296
Width = 357
Name = "ol"
zPROCEDURE DblClick
*** ActiveX Control Event ***
#DEFINE RECURSION_LOC	 " (recursion)"

LOCAL loNode
loNode = THIS.SelectedItem

*- click nothing if no children
*- dblclick opens code
IF thisform.pageframe1.page2.opt.value = 1
	SELECT fdxref
	SET ORDER TO symbol
	SEEK UPPER(STRTRAN(loNode.Text,RECURSION_LOC,""))
	do tex in analyzer  with 'G'
ENDIF


ENDPROC
Command1
commandbutton
commandbutton,OLEObject = C:\WINNT\System32\Mscomctl.ocx
��ࡱ�>��	��������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������Root Entry���������5��I�@OleObjectData����jAccessObjSiteData&������������\ChangedProps������������	����������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������Alj���j��(6(!C4�$��<�j"��ك�ͫ\$89368265E-85FE-11d1-8BE3-0000F8754DA1vwwp�������������HideSelectionLIndentationN
���p�\��x�&���wh��wH��w0��wC@
LabelEdit	I

LineStyle	I

MousePointer	I
PathSeparator
H\Style	I
OLEDragMode	I
OLEDropMode	I
�3����%	8	�p���88]����		��^���	]�����!	��^ure@��wp`F���p��pp�p�ppp
`^�e>0!<None>00000000000Pp`�` 00@`000P``````````00��� ��Q�%�'%��U����%�C�files���#�Q���%�C�symbols���E�Q���%�C�fdxref���f�Q���%�C�snipfile�����Q���UFILESSYMBOLSFDXREFSNIPFILEg	7�
������jump.mpr�T�
�����T���������a��T����	�
����USYMBOLJUMPMPRTHIS
PAGEFRAME1PAGE1LIST1SELECTEDPAGE2OPTVALUE�G�G	 ��%�C�fdxref�
��=�Q����fdxref����F��G((�symbol�%�C�symbols�
����<o�fdxref�C�f�Q��C�Q�����������symbols��F��-�T������ - ���UMDIRFDXREFSYMBOLCOUNTSYMBOLSTHISCAPTIONDestroy,��Init���Load���1qA�Aa�AQ�Aq�A3�q����3aaQbaAq�q�AqA�2����!)�%C
):b�1S��1s����"��
\<Analyzer�
N����ALT+A����1�������s�
N������<s����"��Go to \<Definition��CTRL+D��Ctrl+D��;s����"��Go to \<Reference��CTRL+R��Ctrl+R��6s����"��Go to \<Next��CTRL+N��Ctrl+N��3s����"��	Go \<Back��CTRL+B��Ctrl+B��-1������do tex in analyzer with "D"�-1������do tex in analyzer with "R"�-1������do tex in analyzer with "N"�-1������do tex in analyzer with "B"�U
_1EG0QCVN5ANALYZER�"��b2����1analyzer.prgc:\docume~1\vfpbuild\locals~1\temp\analyzer.fxp.\jump.scxjump.sctc:\docume~1\vfpbuild\locals~1\temp\jump.mprjump.mpx)�
1	��+>A�+�`>J�`�b