*-------------------------------------------------------------------------------------------------------------------------------------------------------- * (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