Search found 1729 matches

by nageswaragunupudi
Mon Jan 06, 2025 9:04 am
Forum: FiveWin for Harbour/xHarbour
Topic: to Excel : using Array and "paste" it
Replies: 6
Views: 470

Re: to Excel : using Array and "paste" it

There is no problem to be resolved.
We just need to be aware of the differences of behavior between VB vs. (x)Harbour and write our code accordingly.
Please use the sample code I provided above and that works well
by nageswaragunupudi
Tue Dec 24, 2024 3:57 pm
Forum: FiveWin for Harbour/xHarbour
Topic: To all the FW family
Replies: 10
Views: 556

Re: To all the FW family

Wish all friends Merry Christmas and Happy and Prosperous New Year
by nageswaragunupudi
Tue Dec 24, 2024 8:02 am
Forum: FiveWin for Harbour/xHarbour
Topic: Open XLS without Excel
Replies: 11
Views: 830

Re: Open XLS without Excel

Hi Rao,

Thank you. However, this XLS has 494 columns and about 23,000 rows. I am looking to start reading row 2 and only retrieve about 80 columns of data so I can upload to SQL. Is there a way to read data row by row like below?

cValue01 := oSheet:Cells( nCurrentXlsRow, 2 ):Value
cValue02 ...
by nageswaragunupudi
Tue Dec 24, 2024 5:11 am
Forum: FiveWin for Harbour/xHarbour
Topic: New: Read/Edit/Save XLSX files without Excel/ADO
Replies: 2
Views: 238

Re: New: Read/Edit/Save XLSX files without Excel/ADO

Recommendations while using very large xlsx files:
In such cases, most of the times, we won't be interested in reading and browsing the entire table, but only extracting limited information required.
We may adopt this approach:
oXl := FW_OpenXlsx( cFileXlsx, [cSheet] )
? oXl:nRows, oXl:nCols
aData ...
by nageswaragunupudi
Tue Dec 24, 2024 4:32 am
Forum: FiveWin for Harbour/xHarbour
Topic: New: Read/Edit/Save XLSX files without Excel/ADO
Replies: 2
Views: 238

New: Read/Edit/Save XLSX files without Excel/ADO

Next version of FWH under release enable reading, modifying and also saving the changes (to another xlsx file) without Excel or ACE OLEDB installed on the PC.

Simple Usage:
FW_ShowXLSX( cFileXlsx, [cSheet] ) // --> oXlsx object

Examples:
FW_ShowXLSX( "customer.xlsx" )
https://imagizer ...
by nageswaragunupudi
Sat Dec 14, 2024 4:09 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Cambiar MsgYesNo
Replies: 6
Views: 538

Re: Cambiar MsgYesNo

Investigando, un poco, se podría usar TaskDialog del API de Windows (ChatGPT), y pasandolo a Harbour:
Thanks
by nageswaragunupudi
Sat Dec 14, 2024 6:42 am
Forum: FiveWin for Harbour/xHarbour
Topic: xHarbour to Harbour
Replies: 14
Views: 832

Re: xHarbour to Harbour

This is my personal opinion.
The conversion should not be difficult for those who already has been programming in both Harbour and xHarbour. Mr. Otto is one of them.

We know FWH software is written to work with both Harbour and xHarbour providing identical functionality with either compiler. It has ...
by nageswaragunupudi
Fri Dec 13, 2024 3:53 am
Forum: FiveWin for Harbour/xHarbour
Topic: xbrowse icon and filter
Replies: 7
Views: 376

Re: xbrowse icon and filter

#include "fivewin.ch"

function Main()

local aData, aclr := { "AR", "AB", "AC", "AO" }

aData := {{"Homers","Springfield",50,"AB"},;
{"Ceci", "Miami", 28,"AC"},;
{"Reg", "Scottsdale", 43,"AO"},;
{"David", "Hingham", 34,"AR"},;
{"Hugh", "Tarzana", 89,"AB"} }

XBROWSER aData SETUP ( ;
oBrw ...
by nageswaragunupudi
Thu Dec 12, 2024 4:55 pm
Forum: FiveWin for Harbour/xHarbour
Topic: xbrowse, ICO and line height
Replies: 2
Views: 292

Re: xbrowse, ICO and line height

Silvio.Falconi wrote::nRowHeight := your number
yes
by nageswaragunupudi
Wed Dec 11, 2024 2:25 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Open XLS without Excel
Replies: 11
Views: 830

Re: Open XLS without Excel

We are working on a new function
FW_ShowXLSX( cFileXlsx )
This is still needs to be finalized.

No libraries, drivers or OleDB providers are required.
This function directly reads from the xlsx file and extracts the data.
So this is guaranteed to work on an computer.

Example out put:
https ...
by nageswaragunupudi
Wed Dec 11, 2024 7:05 am
Forum: FiveWin for Harbour/xHarbour
Topic: Open XLS without Excel
Replies: 11
Views: 830

Re: Open XLS without Excel

I tried
oRs := FW_OpenADOExcelSheet( cSource, "Sheet1", "A1:SB65000", .T. )

And got the following errors
1. ADO ERROR UNKNOWN
2. Fail to open "XLS path + filename.XLSX"

By default, Microsoft Jet OLEDB is installed on every PC.
This default Jet OLEDB can open only "xls" files but not "xlsx ...
by nageswaragunupudi
Tue Dec 10, 2024 2:45 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Open XLS without Excel
Replies: 11
Views: 830

Re: Open XLS without Excel

Try opening an xlsx file with

Code: Select all | Expand

oRs := FW_OpenADOExcelSheet( cXlsxFile, [cSheet], [cRange], [lHeaders] )
XBROWSER oRs
by nageswaragunupudi
Tue Dec 10, 2024 1:59 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Open XLS without Excel
Replies: 11
Views: 830

Re: Open XLS without Excel

CREATING XLSX FILES WITHOUT USING EXCEL APPLICATION.
They are for creating only. Not for reading
by nageswaragunupudi
Mon Dec 09, 2024 3:41 pm
Forum: FiveWin for Harbour/xHarbour
Topic: create a circle colored in a dialog
Replies: 5
Views: 306

Re: create a circle colored in a dialog

#include "FiveWin.ch"

FUNCTION Main()

LOCAL oDlg
local aClrGrad[ 3 ]

aClrGrad[ 1 ] := { { 0.5, CLR_GREEN, CLR_HGREEN }, { 0.5, CLR_HGREEN, CLR_YELLOW }, "RING" }
aClrGrad[ 2 ] := { { 0.5, CLR_RED, CLR_HRED }, { 0.5, CLR_HRED, CLR_YELLOW }, "RING" }
aClrGrad[ 3 ] := { { 0.5, CLR_BLUE, CLR ...