FiveTech Software tech support forums

... CLASS GraphTime

VAR xDlg
VAR Parent
VAR cTimeShow INIT Time()
VAR nSecondsInit
VAR nSecondsOld
VAR cText
METHOD New( Parent, nRow, nCol, nWidth, nHeight, cTitle, xColor )
METHOD SetValues( nCurrent, nTotal )

ENDCLASS

METHOD SetValues( nCurrent, nTotal ) CLASS GraphTime

LOCAL nSecNow ...

... FONT oFont
@ nRow, 420 GET aGet[1] VAR cCodEmail SIZE 160,nSizeHGet PIXEL OF oDlg;
ON CHANGE ( oDlg:AEvalWhen(), oDlg:Update() )

@ nRow, oDlg:nWidth-148 BTNBMP oBtnSel[1] ;
PROMPT "Account Invio" LEFT ;
RESOURCE "SEL_PIE", "", "SEL_VUO", "" ;
SIZE 130, nSizeHGet PIXEL FLAT NOROUND GDIP OF ...

... cIcon
cIcon := nil
else
cIcon := nil
endif
if Empty( hIcon )
hIcon := TTI_INFO
cIcon := nil
endif
endif

nClrFore = cToolTip[ 4 ]
nClrBack = cToolTip[ 5 ]
nWidth = cToolTip[ 6 ]
nDelayTime = cToolTip [ 7 ]
nDelayType = cToolTip [ 8 ]
else
cText = cValToChar( cToolTip )
endif
...

... ctitulo := "Imagen"
cimagen := "QR_ICO" // en recursos (RC), hay un icono con el nombre "QR_ICO"

oCodQR:cToolTip := { ctexto, ctitulo, cimagen, , , , ,}

Parametros:

<ctexto> // texto o mensaje principal
<ctitulo> // titulo
<cImagen> // imagen
<nClrFore>
<nClrBack>
<nWidth>
<nDelayTime>
<nDelayType>

Hola Mr. Rao

Funciona bien con xBrowse

No Funciona el menu del dialogo
Error linea -> xRatio := oDlg:nWidth / oDlg:Cargo[ 1 ] de ResizeCtrls( oDlg )

No funciona la buttonbar
Error linea -> xRatio := oDlg:nWidth / oDlg:Cargo[ 1 ] de ResizeCtrls( oDlg )

Gracias, Saludos

Ruben Dario Fernandez

I gave this function in my original sample
function SetResize( oDlg )

local oCtrl

oDlg:Cargo := { oDlg:nWidth, oDlg:nHeight, oDlg:oFont:nHeight }
for each oCtrl in oDlg:aControls
WITH OBJECT oCtrl
:Cargo := { :nTop, :nLeft, :nWidth, :nHeight, :oFont:nHeight }
END
next

return nil

Please ...

... oDlg ) }

ACTIVATE DIALOG oDlg CENTERED
RELEASE FONT oFont

return nil

function SetResize( oDlg )

local oCtrl

oDlg:Cargo := { oDlg:nWidth, oDlg:nHeight, oDlg:oFont:nHeight }
for each oCtrl in oDlg:aControls
WITH OBJECT oCtrl
:Cargo := { :nTop, :nLeft, :nWidth, :nHeight, :oFont ...

... oWnd )
oWebView:Navigate( cUrl )
oWebView:SetUserAgent( "Mozilla/5.0 (Linux; Android 6.0; Nexus 5 Build/MRA58N) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/103.0.5060.53 Mobile Safari/537.36" )

ACTIVATE WINDOW oWnd CENTER ;
ON RESIZE oWebView:SetSize( nWidth, nHeight-50 )
oWebView:End()

Return

... based on margins and padding (internal method).

Parameters: None

Return Value: None

Usage Example: (Internal use only)

164. Resize( nSizeType, nWidth, nHeight )

Description: Resizes the browse control to the specified dimensions or using predefined size types.

Parameters:

nSizeType: NUMERIC ...

... array of values for a specified column DATA member.

Parameters:

cData: CHARACTER - Name of the column DATA member to retrieve (e.g., "cHeader", "nWidth").

lByCreationOrder: LOGICAL - .T. to return data in creation order, .F. in display order.

Return Value: ARRAY - Array of values for the ...

... AdjRight()`**: Adjusts the right position of the control.
- **`AdjTop()`**: Adjusts the top position of the control.
- **`Move(nTop, nLeft, nWidth, nHeight, lRepaint)`**: Moves the control to a new position and size.
- **`CalcSize(nTop, nLeft, nWidth, nHeight, lRelative, oWnd, nBottom, nRight ...

... Indicates whether the combo box items are numeric. Initialized to `.f.` (false).

#### Methods

1. **`New( nRow, nCol, bSetGet, aItems, nWidth, nHeight, oWnd, nHelpId, bChange, bValid, nClrFore, nClrBack, lPixel, oFont, cMsg, lUpdate, bWhen, lDesign )`**
- **Description:** Constructor ...

... of the combo box.
- `bSetGet`: Code block for getting/setting the combo box value.
- `aItems`: Array of items to populate the combo box.
- `nWidth`, `nHeight`: Dimensions of the combo box.
- `oWnd`: Parent window.
- `nHelpId`: Help context ID.
- `bChange`, `bValid`: Code blocks for change ...

... nClrPane`: The background color of the checkbox.
- `nTop`: The top position of the checkbox.
- `nLeft`: The left position of the checkbox.
- `nWidth`: The width of the checkbox.
- `nHeight`: The height of the checkbox.
- `nAlign`: The alignment of the checkbox.
- `Cargo`: Additional data ...

... end times, dates, text, subject, colors, and flags. Default values are assigned if parameters are not provided.

2. **`BuildDates( nTop, nLeft, nWidth, nHeight )`**
Sets the coordinates of the event's bounding box and marks the event as created and visible.

3. **`GetNewId()`**
Generates a ...