Puedes usar la función nRandom( <nRango> ) --> nValue de FW, y luego pasar el valor a hexadecimal con DecToHex( nValue ). Si quieres luego le intercalas algún "-" y tendrás un número de serie bastante aceptable.
... haciendo disable() el dialogo mientras se ejecuta la accion del ON CLICK. Funciona, pero no creo que sea lo correcto. REDEFINE RADIO nValue ID 110, 120, 130 OF oFld:aDialogs[ 2 ] ; ON CHANGE ( oDlg:Disable(), MSGINFO("Hello ?"), oDlg:Enable() ) Espero tus comentarios.
Antonio. Nos pasa algo raro con esta instruccion sacada de la TESTFOLD.prg REDEFINE RADIO nValue ID 110, 120, 130 OF oFld:aDialogs[ 2 ] ; ON CHANGE MSGINFO("Hello ?") Tenemos varios PRGs que funcionan con una decision luego del click ( o el change ) y en casi todas llama ...
... * Corrección: Las funciones WndTop() y WndLeft() no estaban manejando correctamente valores negativos. Ahora puedes hacer oControl:nLeft -= nValue y el control se visualizará correctamente, incluso si el resultado es negativo. *Mejora: En FWPPC, la clase TComboBox procesa VK_RETURN para ...
... were inherited from Class TMultiGet. * Fix: WndTop() and WndLeft() were not properly managing negative values. Now you can do oControl:nLeft -= nValue and the control is properly displayed, no matter if the result is negative. * Enhancement: FWPPC, Class TComboBox processes VK_RETURN to go to ...
... to be sorted out. Detlef Hofner very kindly modified WBROWSE.PRG for me about a year ago so that I could pass a parameter oLbx:nLineHeight := nValue and this did work for a time for the most part but it could not space the heading text correctly as apparantely the heading text is drawn by ...
... buttons #include "FiveWin.ch" static oWnd //----------------------------------------------------------------------------// function Main() local nValue := 1, oRad SET _3DLOOK ON DEFINE WINDOW oWnd ; TITLE "Testing a Radio Buttons Menu" COLOR "N/W" @ 1, 1 BUTTON "&Test" SIZE 70, 20 ; ACTION ...
Hi Everybody, Is there a way to disable a tab on a folder, for example something like: IF nValue <> 1 oFld1:Disable() ENDIF This way only oFld1 would not be clickable but the rest would. Thanks in advance, Jeff Jeff you can do it this way oFld1:aEnable = { .f., ...
... names of the paper bins available for the tested printer. (HP LaserJet 2100) Here is a piece of code I'm using for testing with the results I get: nValue := DeviceCapabilities(scPrntName, DC_BINNAMES, @xContainer) if nValue > 0 MsgInfo(Str(nValue)) // Returns 15. Don't know what it means MsgInfo(Str(Len(xContainer))) ...