*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="_baza.vcx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS _checkbox AS checkbox
*< CLASSDATA: Baseclass="checkbox" Timestamp="" Scale="Pixels" Uniqueid="" />
*
*p: lchangefont && Allows font change at runtime
*p: lresizefont && Daca se redimensioneaza fontul de catre utilizator.
*p: _memberdata && XML Metadata for customizable properties
*
*
Alignment = 0
AutoSize = .T.
BackStyle = 0
Caption = "Check1"
FontCharSet = 238
FontName = "Arial"
FontSize = 10
Height = 18
lchangefont = .T.
lresizefont = .T.
Name = "_checkbox"
Width = 63
_memberdata =
*
ENDDEFINE
DEFINE CLASS _combobox AS combobox
*< CLASSDATA: Baseclass="combobox" Timestamp="" Scale="Pixels" Uniqueid="" />
*
*p: lchangefont && Allows font change at runtime
*p: lresizefont && Daca se redimensioneaza fontul de catre utilizator.
*p: _memberdata && XML Metadata for customizable properties
*
*
FontCharSet = 238
FontName = "Arial"
FontSize = 10
Height = 24
lchangefont = .T.
lresizefont = .T.
Name = "_combobox"
Style = 2
Width = 100
_memberdata =
*
ENDDEFINE
DEFINE CLASS _commandbutton AS commandbutton
*< CLASSDATA: Baseclass="commandbutton" Timestamp="" Scale="Pixels" Uniqueid="" />
*
*p: lchangefont && Allows font change at runtime
*p: lresizefont && Daca se redimensioneaza fontul de catre utilizator.
*p: _memberdata && XML Metadata for customizable properties
*
*
Caption = "Command1"
FontCharSet = 238
FontName = "Arial"
FontSize = 10
Height = 27
lchangefont = .T.
lresizefont = .T.
Name = "_commandbutton"
Width = 84
_memberdata =
*
ENDDEFINE
DEFINE CLASS _container AS container
*< CLASSDATA: Baseclass="container" Timestamp="" Scale="Pixels" Uniqueid="" />
*
BackStyle = 0
Height = 200
Name = "_container"
Width = 200
*
ENDDEFINE
DEFINE CLASS _cursoradapter AS cursoradapter
*< CLASSDATA: Baseclass="cursoradapter" Timestamp="" Scale="Pixels" Uniqueid="" />
*
Height = 22
Name = "_cursoradapter"
Width = 23
*
ENDDEFINE
DEFINE CLASS _custom AS custom
*< CLASSDATA: Baseclass="custom" Timestamp="" Scale="Pixels" Uniqueid="" />
*
Name = "_custom"
*
ENDDEFINE
DEFINE CLASS _dataenvironment AS dataenvironment
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="Pixels" Uniqueid="" />
*
Name = "_dataenvironment"
*
ENDDEFINE
DEFINE CLASS _editbox AS editbox
*< CLASSDATA: Baseclass="editbox" Timestamp="" Scale="Pixels" Uniqueid="" />
*
*p: lchangefont && Allows font change at runtime
*p: lresizefont && Daca se redimensioneaza fontul de catre utilizator.
*p: _memberdata && XML Metadata for customizable properties
*
*
FontCharSet = 238
FontSize = 10
Height = 53
lchangefont = .T.
lresizefont = .T.
Name = "_editbox"
Width = 100
_memberdata =
*
ENDDEFINE
DEFINE CLASS _form AS form
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" />
*
*p: lchangefont && Allows font change at runtime
*p: lresizefont && Redimensionare font la runtime
*p: _memberdata
*
*
Caption = "Form"
DoCreate = .T.
lchangefont = .F.
lresizefont = .F.
Name = "_form"
Themes = .T.
_memberdata =
*
ENDDEFINE
DEFINE CLASS _grid AS grid
*< CLASSDATA: Baseclass="grid" Timestamp="" Scale="Pixels" Uniqueid="" />
*
*m: incarca_grid
*m: salveaza_grid
*p: cculoarecoledit && Culoarea folosita pentru fundalul campurilor care sunt ReadOnly = .F.
*p: lcamptextneeditabil && .T. - campurile text sunt facute read-only ; .F. - campurile text sunt lasate cum au fost definite
*p: lchangefont && Allows font change at runtime
*p: lcoloreazaeditabil && .T. - BackColor al campurilor editabile este luat din cculoarecoledit
*p: lresizefont && Redimensionare font la runtime
*p: _memberdata && XML Metadata for customizable properties
*
*
cculoarecoledit = 253,252,223
FontCharSet = 238
FontSize = 10
Height = 200
HighlightBackColor = 0,64,128
HighlightForeColor = 255,255,255
lcamptextneeditabil = .T.
lchangefont = .T.
lcoloreazaeditabil = .F.
lresizefont = .T.
Name = "_grid"
ReadOnly = .T.
RowHeight = 19
SelectedItemBackColor = 100,185,255
Width = 320
_memberdata =
*
PROCEDURE incarca_grid
Lparameters tcRecordSourceNou
Local lnColumnIndex
With This
.RecordSource = Iif(Empty(tcRecordSourceNou),.ToolTipText,tcRecordSourceNou)
For lnColumnIndex = 1 To .ColumnCount
.Columns(lnColumnIndex).ControlSource = Iif(!Empty(tcRecordSourceNou) And !Empty(.Columns(lnColumnIndex).Tag),;
tcRecordSourceNou + [.] + Substr(.Columns(lnColumnIndex).Tag,At([.],.Columns(lnColumnIndex).Tag)+1),;
.Columns(lnColumnIndex).Tag)
.Tag= ""
With .Columns(lnColumnIndex)
For lnIndex = 1 To .Objects.Count
If .Objects(lnIndex).BaseClass == [Header]
.Objects(lnIndex).Picture = "" && 07.11.2013 : daca reincarc gridul, sa-mi stearga iconitele de la
&& grid_sort sau grid_extra
Endif
Endfor
Endwith
Endfor
.ToolTipText = ""
Endwith
ENDPROC
PROCEDURE Init
Local liColIndex, i, lcRGB, loColumn
lcRGB = [RGB(] + This.cculoarecoledit + [)]
For liColIndex = 1 To This.ColumnCount
loColumn = This.Columns(m.liColIndex)
With loColumn
If Upper(.CurrentControl) == 'TEXT1' And This.lcamptextneeditabil
.ReadOnly=.T.
*.FontName='Arial Narrow'
Endif
If !.ReadOnly And This.lcoloreazaeditabil
.BackColor = &lcRGB
If Upper(.CurrentControl) == 'TEXT1'
loColumn.TEXT1.SelectedBackColor = this.SelectedItemBackColor
loColumn.TEXT1.SelectedForeColor = this.SelectedItemForeColor
ENDIF
Endif
Endwith
ENDFOR
ENDPROC
PROCEDURE salveaza_grid
Local lnColumnIndex
With This
For lnColumnIndex = 1 To .ColumnCount
.Columns(lnColumnIndex).Tag = .Columns(lnColumnIndex).ControlSource
Endfor
.ToolTipText=.RecordSource
.RecordSource=""
Endwith
ENDPROC
ENDDEFINE
DEFINE CLASS _image AS image
*< CLASSDATA: Baseclass="image" Timestamp="" Scale="Pixels" Uniqueid="" />
*
Height = 17
Name = "_image"
Width = 100
*
ENDDEFINE
DEFINE CLASS _label AS label
*< CLASSDATA: Baseclass="label" Timestamp="" Scale="Pixels" Uniqueid="" />
*
*p: lchangefont && Allows font change at runtime
*p: lresizefont && Daca se redimensioneaza fontul de catre utilizator.
*p: _memberdata && XML Metadata for customizable properties
*
*
AutoSize = .T.
BackStyle = 0
Caption = "Label1"
FontCharSet = 238
FontName = "Arial"
FontSize = 10
Height = 18
lchangefont = .T.
lresizefont = .T.
Name = "_label"
Width = 40
_memberdata =
*
ENDDEFINE
DEFINE CLASS _linie AS line
*< CLASSDATA: Baseclass="line" Timestamp="" Scale="Pixels" Uniqueid="" />
*
Height = 17
Name = "_linie"
Width = 100
*
ENDDEFINE
DEFINE CLASS _listbox AS listbox
*< CLASSDATA: Baseclass="listbox" Timestamp="" Scale="Pixels" Uniqueid="" />
*
*p: lchangefont && Allows font change at runtime
*p: lresizefont && Daca se redimensioneaza fontul de catre utilizator.
*p: _memberdata && XML Metadata for customizable properties
*
*
FontCharSet = 238
FontName = "Arial"
FontSize = 10
Height = 170
lchangefont = .T.
lresizefont = .T.
Name = "_listbox"
Width = 100
_memberdata =
*
ENDDEFINE
DEFINE CLASS _olecontrol AS olecontrol
*< CLASSDATA: Baseclass="olecontrol" Timestamp="" Scale="Pixels" Uniqueid="" Nombre="_olecontrol" Parent="" ObjName="_olecontrol" OLEObject="C:\WINNT\System32\MSCOMCTL.OCX" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7////+/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKClx5P5j8QBAwAAAEABAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAZAAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABcAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAAQAAAAAAAAABAAAAAIAAAD+/////v////7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////+2kEHHiYXREbFqAMDwKDYoIUM0EggAAABIIQAAZhIAALE8wWoBAAYAHAAAAJwAAADoAwAACAAAAJCgFwAB782rXAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAACQAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA5MzY4MjY1RS04NUZFLTExZDEtOEJFMy0wMDAwRjg3NTREQTFmAHQAIABXAGkAbgBkAG8AdwBzACAAUgBlAHAAbwByAHQAIAABAACAbgB0AHIAbwBsAAkAewAxADYANwA3ADAAMQBFADMALQBGAEQAQwBGAC0AMQAxAEQAMAAtAEEANAA4AEUAAAAFAGCiFwAGAAAAAAAAAAUAAIAY7BIAH97svQEABQAg7BIAVwBJAE4ATgBUAFwAUwB5AHMAdABlAG0AMwAyAFwAYgByADUANAA5AC4AZABsAGwAAAA2ADEANgA0ADIALQA2ADgAMgAwADAAMwAzADMAMAAtADEAMAAwADQAXwBDAGwAYQBzAHMAZQBzAFwAQgBSADUANAA5AC4AQgByADUANAA5AEMAdAByAGwALgAxAFwAQwBMAFMASQBEAAAAQwBMAFMASQBEAAAAAAAAAP///////////////wAAAABLBgpuAAAAAAAAAAAkTxYAAAAAAAkEAAAAAAAAAAAAAA==" />
*
Height = 178
Name = "_olecontrol"
Width = 322
*
ENDDEFINE
DEFINE CLASS _oleimagelist AS olecontrol
*< CLASSDATA: Baseclass="olecontrol" Timestamp="" Scale="Pixels" Uniqueid="" Nombre="_oleimagelist" Parent="" ObjName="_oleimagelist" OLEObject="C:\WINDOWS\system32\MSCOMCTL.OCX" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7////+/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABDuannLlMUBAwAAAEABAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAXAAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABcAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAAQAAAAAAAAABAAAAAIAAAD+/////v////7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////8jfyQskYXREbFqAMDwKDYoIUM0EggAAADtAwAA7QMAAIB+4eYAAAYAIAAAAAAAAADAwMAA//8AAAHvzasAAAUAXAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAACQAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA5MzY4MjY1RS04NUZFLTExZDEtOEJFMy0wMDAwRjg3NTREQTFEAEEAOABEADgARgAtADkARAA2AEEALQAxADAAMQBCAC0AQQABAACAMAAtADQAMgAxADAAMQAwADIAQQA4AEQAQQA3AH0AIABDADoAXABXAEkATgBEAE8AVwBTAFwAcwB5AHMAgOAZAAYAAAD/////BQAAgAAAAAAAAAAAAAAAAC4AbwBjAHgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==" />
*
Height = 38
Name = "_oleimagelist"
Width = 38
*
ENDDEFINE
DEFINE CLASS _olemapimess AS olecontrol
*< CLASSDATA: Baseclass="olecontrol" Timestamp="" Scale="Pixels" Uniqueid="" Nombre="_olemapimess" Parent="" ObjName="_olemapimess" OLEObject="c:\WINNT\System32\msmapi32.ocx" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7///8EAAAA/v///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALCzedI5lsQBAwAAAAAEAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAMAMAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABcAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAAQAAAAAAAAABAAAAAIAAAD+/////v///wUAAAAGAAAABwAAAAgAAAAJAAAACgAAAAsAAAAMAAAADQAAAA4AAAAPAAAA/v////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////+rLMYg2hUbELmoREVTVAAAIUM0EggAAADtAwAA7QMAADAFV/wAAAYAAAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAXAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAACQAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAABtZ2tndGdubm1ubW5pbmlndGhrZ29nZ2d2bWtoaW5qZ2dudm1mAHQAIABXAGkAbgBkAG8AdwBzACAAUgBlAHAAbwByAHQAIAABAACAbgB0AHIAbwBsAAkAewAxADYANwA3ADAAMQBFADMALQBGAEQAQwBGAC0AMQAxAEQAMAAtAEEANAA4AEUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIUARAAAAA4AhABFAAAAEwBgFhgAeAETAEkATgBOAFQAXABTAHkAcwB0AGUAbQAzADIAXABtAHMAbQBhAHAAaQAzADIALgBvAGMAeAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB3AFIAAAAKADAFEwAwBRMASQBOAE4AVABcAFMAeQBzAHQAZQBtADMAMgBcAG0AcwB4AG0AbAAzAC4AZABsAGwAAABBAGMAYwBlAHMAcwBvAHIAaQBlAHMAXABJAG0AYQBnAGUAVgAAAGUAXABLAG8AZABhAGsASQBtAGcALgBlAHgAZQAiAAAAZhEAAAAAAADgFgAAAAAAALIXAAAAAAAAZiEAAAAAAAAQIgAAAAAAALwiAAAAAAAAZiMAAAAAAAAKJAAAAAAAABQlAAAAAAAANisAAAAAAADaLAAAAAAAAIotAAAAAAAANC4AAAAAAADYLgAAAAAAAMwvAAAAAAAAwjAAAAAAAAAUPQAAAAAAACA/AAAAAAAA9j8AAAAAAADeQAAAAAAAAOZBAAAAAAAA2EIAAAAAAADaSAAAAAAAAHpDAAAAAAAAcAwAAAAAAAAiDQAAAAAAANINAAAAAAAAhA4AAAAAAAAlAAAAEAAAAAAAAAAAAAAA" />
*
Height = 100
Name = "_olemapimess"
Width = 100
*
ENDDEFINE
DEFINE CLASS _olemapisess AS olecontrol
*< CLASSDATA: Baseclass="olecontrol" Timestamp="" Scale="Pixels" Uniqueid="" Nombre="_olemapisess" Parent="" ObjName="_olemapisess" OLEObject="c:\WINNT\System32\msmapi32.ocx" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7///8EAAAA/v///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHB6H785lsQBAwAAAAADAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALAIAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABcAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAAQAAAAAAAAABAAAAAIAAAD+/////v///wUAAAAGAAAABwAAAAgAAAAJAAAACgAAAAsAAAD+//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////+gLMYg2hUbELmoREVTVAAAIUM0EggAAADtAwAA7QMAAFBy0lcAAAYAAwBSAAAARwBSAEEAfgAxAFwAWABSAEEAXAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAACQAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAABtZ2tndGdubm1ubW5pbmlndGhrZ29nZ2d2bWtoaW5qZ2dudm1mAHQAIABXAGkAbgBkAG8AdwBzACAAUgBlAHAAbwByAHQAIAABAACAbgB0AHIAbwBsAAkAewAxADYANwA3ADAAMQBFADMALQBGAEQAQwBGAC0AMQAxAEQAMAAtAEEANAA4AEUAWQA7AEMAOgBcAGoAMgBzAGQAawAxAC4ANAAuADIAXwAwADMAXABiAGkAbgA7AEMAOgBcAFAAcgBvAGcAcgBhAG0AIABGAGkAbABlAHMAXABFAG0AYgBhAHIAYwBhAGQAZQByAG8AXABDAGgATQBnAHIAMgAwADEAOwBDADoAXABQAHIAbwBnAHIAYQBtACAARgBpAGwAZQBzAFwARQBtAGIAYQByAGMAYQBkAGUAcgBvAFwATgBvAHYAMgAwADAAMgBTAGgAYQByAGUAZAA7AEMAOgBcAFAAcgBvAGcAcgBhAG0AIABGAGkAbAAAAHMAXABFAG0AYgBhAHIAYwBhAGQAZQByAG8AXABEAEIAQQA3ADEAMAA7AEMAOgBcAFAAcgBvAGcAcgBhAG0AIABGAGkAbABlAHMAXABFAG0AYgBhAHIAYwBhAGQAZQByAG8AXABUAHUAbgBlAHIAMgAwADIAOwBDADoAXABQAHIAbwBnAHIAYQBtACAARgBpAGwAZQBzAFwARQBtAGIAYQByAGMAYQBkAGUAcgBvAFwAUgBTAFEATAA3ADEAMAA7AEMAOgBcAFAAcgBvAGcAcgBhAG0AIABGAGkAbABlAHMAXABFAG0AYgBhAHIAYwBhAGQAZQByAG8AXABEAGUAdAAxADAAZwAAAFUAUwBFAFIARABPAE0AQQBJAE4APQBNAEEAUgBJAFUAUwBBAFQAAABVAFMARQBSAE4AQQBNAEUAPQBoAG8AcgBpAGEALgBwAHUAcwBjAGEAcwB1AAAAVQBTAEUAUgBQAFIATwBGAEkATABFAD0AQwA6AFwARABvAGMAdQBtAGUAbgB0AHMAIABhAG4AZAAgAFMAZQB0AHQAaQBuAGcAcwBcAGgAbwByAGkAYQAuAHAAdQBzAGMAYQBzAHUAAAB3AGkAbgBkAGkAcgA9AEMAOgBcAFcASQBOAE4AVAAAAAAAVEMPAHwBAACLAPABEwDwARMACQAbAAABCAAlAAAAEAAAAAAAAAAAAAAA" />
*
Height = 100
Name = "_olemapisess"
Width = 100
*
ENDDEFINE
DEFINE CLASS _olerichtext AS olecontrol
*< CLASSDATA: Baseclass="olecontrol" Timestamp="" Scale="Pixels" Uniqueid="" Nombre="_olerichtext" Parent="" ObjName="_olerichtext" OLEObject="C:\WINDOWS\system32\RICHTX32.OCX" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7////+/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJCBaf09iswBAwAAAAACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAzAAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAEoAAAAAAAAABAAAAAIAAAD+////BQAAAAYAAAD+////BwAAAP7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAABWCgAAVgoAACFDNBIBAAYAoAAAAAAA//8AAP//AQAAAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAyADkANgAtADAAMABDADAANABGAEIANgA2ADcAOABCAH0AIABDADoAXABXAEkATgABAACADAAAAFJpZ2h0TWFyZ2luABEAAABODQAAAAcAAAAAAAAAAAAAAAUAAABUZXh0ABQAAABIAAAAAAsAAABPAAAAAAUAAIAAAAAAAAABAAAAAQABAAIACAAAAHtccnRmMVxhbnNpXGRlZmYwe1xmb250dGJse1xmMFxmbmlsXGxlY29udHJvbDE5ADYALQAwADAAQwAwADQARgBCADYANgA3ADgAQgB9ACAAQwA6AFwAVwBJAE4ARABPAFcAUwBmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzEwMzNcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==" />
*
Height = 100
Name = "_olerichtext"
Width = 100
*
ENDDEFINE
DEFINE CLASS _optionbutton AS optionbutton
*< CLASSDATA: Baseclass="optionbutton" Timestamp="" Scale="Pixels" Uniqueid="" />
#INCLUDE "..\include\foxpro.h"
*
*p: lchangefont
*p: lresizefont
*p: _memberdata && XML Metadata for customizable properties
*
*
BackStyle = 0
Caption = "Option1"
FontCharSet = 238
FontName = "Arial"
FontSize = 10
Height = 17
lchangefont = .T.
lresizefont = .T.
Name = "_optionbutton"
Width = 61
_memberdata =
*
ENDDEFINE
DEFINE CLASS _optiongrup AS optiongroup
*< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" />
#INCLUDE "..\include\foxpro.h"
*
*p: lchangefont
*p: lresizefont
*p: ndefault
*p: _memberdata && XML Metadata for customizable properties
*
*
AutoSize = .T.
BackStyle = 0
ButtonCount = 2
Height = 46
lchangefont = .F.
lresizefont = .T.
Name = "_optiongrup"
ndefault = 1
Value = 1
Width = 71
_memberdata =
Option1.BackStyle = 0
Option1.Caption = "Option1"
Option1.Height = 17
Option1.Left = 5
Option1.Name = "Option1"
Option1.Top = 5
Option1.Value = 1
Option1.Width = 61
Option2.BackStyle = 0
Option2.Caption = "Option2"
Option2.Height = 17
Option2.Left = 5
Option2.Name = "Option2"
Option2.Top = 24
Option2.Width = 61
*
ENDDEFINE
DEFINE CLASS _pageframe AS pageframe
*< CLASSDATA: Baseclass="pageframe" Timestamp="" Scale="Pixels" Uniqueid="" />
#INCLUDE "..\include\foxpro.h"
*
*p: lchangefont
*p: lresizefont && Daca se redimensioneaza fontul de catre utilizator.
*p: _memberdata && XML Metadata for customizable properties
*
*
ErasePage = .T.
Height = 175
lchangefont = .T.
lresizefont = .T.
Name = "_pageframe"
PageCount = 2
Width = 241
_memberdata =
Page1.Caption = "Page1"
Page1.FontCharSet = 238
Page1.FontName = "Arial"
Page1.FontSize = 10
Page1.Name = "Page1"
Page2.Caption = "Page2"
Page2.FontCharSet = 238
Page2.FontName = "Arial"
Page2.FontSize = 10
Page2.Name = "Page2"
*
PROCEDURE Init
For i = 1 To This.PageCount
With This.Pages(i)
If .FontCharSet <> 0
.Caption = tradu(.Caption)
.ToolTipText = tradu(.ToolTipText)
Endif
Endwith
Endfor
ENDPROC
ENDDEFINE
DEFINE CLASS _shape AS shape
*< CLASSDATA: Baseclass="shape" Timestamp="" Scale="Pixels" Uniqueid="" />
*
Height = 17
Name = "_shape"
Width = 100
*
ENDDEFINE
DEFINE CLASS _spinner AS spinner
*< CLASSDATA: Baseclass="spinner" Timestamp="" Scale="Pixels" Uniqueid="" />
#INCLUDE "..\include\foxpro.h"
*
*p: lchangefont
*p: lresizefont
*p: _memberdata && XML Metadata for customizable properties
*
*
FontCharSet = 238
FontName = "Arial"
FontSize = 10
Height = 24
lchangefont = .T.
lresizefont = .T.
Name = "_spinner"
Width = 120
_memberdata =
*
ENDDEFINE
DEFINE CLASS _textbox AS textbox
*< CLASSDATA: Baseclass="textbox" Timestamp="" Scale="Pixels" Uniqueid="" />
*
*p: lchangefont && Allows font change at runtime
*p: lresizefont && Daca se redimensioneaza fontul de catre utilizator.
*p: _memberdata && XML Metadata for customizable properties
*
*
FontCharSet = 238
FontName = "Arial"
FontSize = 10
Height = 23
lchangefont = .T.
lresizefont = .T.
Name = "_textbox"
Width = 100
_memberdata =
*
ENDDEFINE
DEFINE CLASS _timer AS timer
*< CLASSDATA: Baseclass="timer" Timestamp="" Scale="Pixels" Uniqueid="" />
*
Height = 23
Name = "_timer"
Width = 23
*
ENDDEFINE