FiveTech Software tech support forums

... ; //<--- SIZE 10; GRID 2 ... IF oReport:lCreated oReport:SetTxtColor(CLR_HRED,2) //color Rojo para la fuente 2 ENDIF Para el segundo caso (suponiendo que utilices un campo para identificar las anuladas): COLUMN TITLE "VALOR FACT" ; DATA (calias)->VALOR_FACT; PICTURE "@Z ...

... VALID. Esto tendría que funcionar perfectamente: DEFINE DIALOG oDlg TITLE "CAPTURA DE BARCODE " + FWDESCRIPTION cCad := SPACE(13) // Suponiendo que los codigos de barras que lees son EAN13, los de productos de supermercado @ 1, 2 SAY "Code.:" OF oDlg @ 1, 6 GET oGet VAR ...

... hago un clón del mismo y lo grabo como siguiente registro, lo presento en el browse para que el usuario cambie lo que necesite. Pues bien, suponiendo haber grabado el primero con los siguientes datos : ASIENTO = 1, FECHA = 22/01/2009, CUENTA=700000, NOMBRE= VENTAS DE MERCADERIAS, DOCUMENTO= ...

... que tenía por ahi con esta estructura: #define ID_SIMPLE 110 #define ID_DROPDOWN 120 #define ID_DROPDOWNLIST 130 #define ID_SELECTION 140 suponiendo que esto está bien, cuando compilo el combos.prg, los elementos de los combos NO me aparecen aunque si los selecciono si cambian. Reitero ...

... de hacer grupos que te da la clase TReport ?. Si persistes en hacer los cortes "a pie" debes poner a ceros la variable donde guardas el acumulado, suponiendo que la variable se llama nTotAcu debes agregar este código: nTotAcu := 0.00 Saludos

Estimado pakotel Puedes ocupar Print Cargas los valores máquina a un arreglo y verifica que no se repitan, luego, suponiendo que el arreglo se llama maquina: nInc:=1 //centimetros nLargo:=Len(maquina) PRINT oPrn PAGE for i=1 to nLargo oPrn:CmSay(nFila,nCol+nInc,maquina[i]) ...

Falta que le pongas la ruta de tus Lib's y Ch's SET LIB=C:\HARBOUR\LIB;C:\FWH\LIB SET INCLUDE=C:\HARBOUR\INCLUDE;C:\FWH\INCLUDE Suponiendo que tu Harbour y FW se ubican en la unidad C: y Revisa en el BUILDH.bat los paths set hdir=c:\harbour set bcdir=c:\borland\bcc55 Ambos le dicen al ...

... quisieramos saber es donde están documentadas las herramientas que mencionas. Ya he comentado en mensaje anterior que hay varios caminos a tomar. Suponiendo que tomamos la via ADO, de Harbour lo unico que haremos sera usar la instruccion CreateObject(o su equivalente tOleAuto():New()), que nos ...

Lo he escrito al vuelo, a ver si es lo que necesitas. Suponiendo que tienes una DATOS.DBF con 3 campos static function Test() local i local aArray := { { .t. , "Remoto" , 1} , { .t. , "cable" , 2 } , { .t. , "casa" , 2 } , { .t. , "cable" , 2 } , { ...

Tienes que tener un indice creado en la tabla, para la columna por la que quieres buscar. Suponiendo que tengas la tabla "LINEAS" indexada por el campo "CDESCRIBE" oLbx:bSeek := {|c| Lineas->DbSeek( Upper( c ) ,.t.) } Te recomiendo ...

... los tTvItem deseados. Recuerda que el tree es un conteneedor de items. Lo primero que necesitaras, es saber que item es el que quieres modificar. Suponiendo que quieres cambiar el item actual, podrias hacerlo de la siguiente manera. oTree:bChanged := {|o,i| i:=o:GetSelected(),i:SetText('Nuevo ...

... "E:\Desarrollo\32bits\FWH\bitmaps\netdrive.bmp" } Ahora bien, yo trabajo con los bitmap desde un archivo de recursos .RC suponiendo que estan pero no los carga en memoria se me ocurre llamarlos de la siguiente manera: LOCAL aHMark:= { LoadBitmap( GetResources(), "MARCA1" ...

... a todas las ventanas. > Puedes usar una variable en donde copiar la ventana MDICHILD en uso al pulsar el botón. La acción del botón la copia. Suponiendo que esté en una barra de botones: oMDIChild = oButton:oWnd:oWnd

... ) +; "'.AND. FIELD->FSERIE+Str(FIELD->FNUMERO,10) <= '"+cFserie2+Str(nCodigo2,10)+"'" Suponiendo fnumero un campo númerico, si es caracter quitar el Str(), y ajustar Str(nCodigo, longitud del campo de la tabla)

... seek, ni el motor ADS. En este link pone algo de documentación de como usar seek con ADO http://support.microsoft.com/kb/287638/es . Suponiendo que fuera una limitación del motor de base de datos, otra alternativa sin indice seria con el metodo FIND. oRs:Find( "Campo ...