FiveTech Software tech support forums

> Es con la versión 64-2409 (fue Lib que me pasó Antonio Linares), no tengo idea de porque aparece 64-2407

La versión la toma de FiveWin.ch

Contenido de fivewin.ch

/*
!short: FiveWin main Header File */

#ifndef _FIVEWIN_CH
#define _FIVEWIN_CH

#define FWCOPYRIGHT "(c) FiveTech Software, 1993 ...

Hola buenas tardes, gracias por reportarlo, creo que únicamente funciona con la nueva versión de fw 2409 , el error ya lo estamos intentando solucionar en otro POST, con la ayuda de Antonio.

https://forums.fivetechsupport.com/viewtopic.php?f=6&t=44795&start=45&sid ...

Modificando twebview2

//----------------------------------------------------------------------------//

//function WebView2_OnEval( cJson, hWebView )
//
// local nAt := AScan( aWebViews, { | o | o:hWebView == hWebView } ), nResult
//
// if nAt != 0 .and. ! Empty( aWebViews[ nAt ]:bOnEval ...

Application
===========
Path and name: C:\Users\Admin\Documents\fwh64\proyects\ContaSic.exe (64 bits)
Size: 8,997,888 bytes
Compiler version: Harbour 3.2.0dev (r2407221137)
FiveWin version: FWH 24.07
C compiler version: Microsoft Visual C 19.32.31329 (64-bit)
Windows 11 64 Bits, version: 6.2 ...

Buenas tardes:
Heraclio Cruz Pacheco
México

Usted envió €70.00 EUR a FiveTech Software S.L.
Detalles de la transacción
Id. de transacción: 826812266T458181X
Fecha de la transacción: 31 de julio de 2024
Heraclio Cruz Pacheco

IsLeap()
Checks if a Date value belongs to a leap year.
Syntax
IsLeap( [<dDate>] ) --> lIsLeapYear

Arguments
<dDate>
Any Date value, except for an empty date, can be passed. The default is the return value of Date(). Return
The function returns .F. (true), when <dDate> falls into a leap year ...

No comprendo. ¿Tienes un ejemplo completo para probar?

Saludos.

Gracias por responder.

#include 'fivewin.ch'

REQUEST DBFCDX

//----------------------------------------------------------------------------//

function Main()

local oWnd, oBar

SET DATE ITALIAN
SET CENTURY ON
RDDSETDEFAULT ...

Funciona perfecto
\samples\xbincflt.prg

MDI
oBrw:SetFocus() // con click NO RETORNA a oBrw

@ 10, 10 COMBOBOX oBrw:cFilterFld ;
ITEMS aHdrs ;
ON CHANGE ( oBrw:Seek( "" ), oBrw:SetFocus() ) ;
SIZE 50,400 PIXEL OF oDlg

oDlg:oClient := oBrw
oDlg:bPostEnd := {||oRs:Close(),oRs:=Nil}
ACTIVATE ...

Enrico Maria Giordano wrote:

cpheraclio wrote:? cExt == cExt2
? cExt != cExt2

!= is the opposite of =
!= is not the opposite of ==
!( == ) is the opposite of ==

Gracias por responder.

? cExt == cExt2 FALSO
? cExt != cExt2 FALSO

? cExt2 == cExt FALSO
? cExt2 != cExt VERDADERO

cFile:="C:\Users\Admin\Documents\Projects\dbf\timbres.xlsx"
cExt:=Upper(cFileExt(cFile))
cExt2:="XLS"

? cExt,cExt2

? cExt == cExt2
? cExt != cExt2

En los 2 casos retorna FALSO

FiveWin 2203, xHarbour 10264