Search found 159 matches

by Euclides
Fri Dec 26, 2025 4:02 pm
Forum: FiveWin for Harbour/xHarbour
Topic: WDBU clone - xbrDBU
Replies: 33
Views: 18813

Re: WDBU clone - xbrDBU

Hi to all.
https://github.com/FiveTechSoft/FWH_tools/blob/master/xbrdbu_2.zip

Please, what are theese fields?
xbrdbu.prg(1590) Warning W0001 Ambiguous reference 'CYESLOGIC'
xbrdbu.prg(1597) Warning W0001 Ambiguous reference 'LSOFTSEEK'
xbrdbu.prg(1774) Warning W0001 Ambiguous reference ...
by Euclides
Wed Sep 24, 2025 10:58 am
Forum: FiveWin para Harbour/xHarbour
Topic: como poner en blanco un campo carácter
Replies: 7
Views: 967

Re: como poner en blanco un campo carácter

https://deepwiki.com/search/la-siguient ... a5e2754dc1
... no una cadena vacía ("")

Qué raro... Siempre lo he hecho sin problemas. ¿Por qué no lo recomiendo?
by Euclides
Fri Feb 21, 2025 12:20 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Copy Paste problem in TGet (Fwh 24.02)
Replies: 6
Views: 8859

Re: Copy Paste problem in TGet (Fwh 24.02)

Hi, this problem exists a long time ago... :(
When I have to paste something in the GET I do the following:

DEFINE CLIPBOARD oClp OF oDlg FORMAT TEXT
...
@ 30, 20 GET oGet VAR cGet BITMAP "..\bitmaps\paste20.bmp" SIZE 120, 22 PIXEL OF oDlg ;
ACTION (cGet := oClp:GetText(), oGet:Refresh ...
by Euclides
Tue Jul 30, 2024 5:22 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Switching from memo fields to files -
Replies: 9
Views: 6662

Re: Switching from memo fields to files -

Hi Otto.
I am going in the other way... I use memo fields (CDX/FPT) wether I can...
I store complex arrays, store images, stor PDFs and lately I store those uncommon fields that some user have.
In this case , you have to define this fields in the DBF file, even when it have only one or two fields ...
by Euclides
Wed Jun 12, 2024 11:45 am
Forum: FiveWin para Harbour/xHarbour
Topic: Tema calendario nuevamente.
Replies: 19
Views: 3893

Re: Tema calendario nuevamente.

Wonderful!... But... Here in Brazil (and other places in the world) the name of the week days are at the top.
And the week numbers are at left. Could show the number of the week in the year.
Just my 2 cents.
Regards, Euclides.
by Euclides
Fri Mar 29, 2024 8:32 pm
Forum: FiveWin for Harbour/xHarbour
Topic: EXCEL CREATE HYPERLINK
Replies: 3
Views: 1878

Re: EXCEL CREATE HYPERLINK

Thanks Marco!
Here is: oAs2:Range("A1"):value := [=COLLEG.IPERTESTUALE("#UNO!A1";"MARCO")]
Note: Some sites: (https://pt.excelfunctions.eu/) translate COLLEG.IPERTESTUALE (HYPERLINK) to HIPERLIGAÇÃO that gives ERROR.
The correct is (here in Brazil): oAs2:Range("A1"):value := [=HIPERLINK("#UNO!A1 ...
by Euclides
Wed Feb 28, 2024 11:17 am
Forum: FiveWin for Harbour/xHarbour
Topic: COMBOBOX
Replies: 7
Views: 1706

Re: COMBOBOX

Hi Ruth.
You can do...

Code: Select all | Expand

   REDEFINE COMBOBOX oCbx VAR cItem ... ID 100 ...
   oCbx:SetFont(oFont)
 
Regards, Euclides
by Euclides
Sat Jun 24, 2023 8:42 pm
Forum: FiveWin for Harbour/xHarbour
Topic: read a big xml file
Replies: 11
Views: 2169

Re: read a big xml file

Hi... (sorry... I was out for a while...)
Kajot,
10Gb XML should be an issue even for Chrome or IE(Edge)
Can you post the XML in soma place for download? (or give an URL)
Regards, Euclides
by Euclides
Sat Jul 30, 2022 4:26 pm
Forum: FiveWin for Harbour/xHarbour
Topic: FIELD Selector for FiveWin ?
Replies: 6
Views: 2350

Re: FIELD Selector for FiveWin ?

Hi Jimmy.
There is a FWH function: cGetExpression()
It user \fwh\samples\expbuild.rc and \fwh\samples\ExpBuild.ch. The use is for expressions.
I made a very simple routine (back in fw 2.0 - Just transalte it from Portugese)
Function MOVFIELDS()local oDlg1, oLbx1, oLbx2, aItm2:={&#125 ...
by Euclides
Thu May 19, 2022 3:42 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Redondear centena
Replies: 8
Views: 1689

Re: Redondear centena

Hola, mas simples...

nAproximar := 50
nRedondear := 47085
? round(nRedondear / nAproximar, 0) * nAproximar

Saludos, Euclides
by Euclides
Fri Sep 17, 2021 7:52 pm
Forum: FiveWin para Harbour/xHarbour
Topic: PAGE DOWN, no funciona?
Replies: 5
Views: 971

Re: PAGE DOWN, no funciona?

Ó Joãozinho...
Coloque isto abaixo do DEFINE DIALOG ... de ..\SAMPLES\TESTFOLD.PRG
   nY := 1   oDlg:bKeyDown := {|nKey| iif( nKey = 33, (nY:=iif(nY=4, 1, nY+1), oFld:SetOption(nY)), iif( nKey = 34, (nY:=iif(nY=1, 4, nY-1), oFld ...
by Euclides
Tue Jun 08, 2021 12:16 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Print Problem with FWH2104
Replies: 27
Views: 5948

Re: Print Problem with FWH2104

Hi! Sorry for jumping in...
With FWH 18.01 the printing works as Vilian expects.
Regrds, Euclides
by Euclides
Tue May 25, 2021 12:47 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Editcol de twbrowse
Replies: 2
Views: 670

Re: Editcol de twbrowse

Hola!
..\SAMPLES\BROWSE.PRG
..\SOURCE\FUNCTION\BROWSE.PRG
Saludos, Euclides
by Euclides
Wed Apr 21, 2021 1:21 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Question about WinExec()
Replies: 10
Views: 1718

Re: Question about WinExec()

Hi Otto.
The same way...
  nkdnr := 10  WinExec("CMD /C start chrome --new-window --app=https://test.com.space/formular/index.prg?recnr=" + ALLTRIM(STR( nkdnr )) + " --window-position=600,300  --window-size=1500,730",0) 
It opened the window with the ...
by Euclides
Tue Apr 20, 2021 12:54 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Question about WinExec()
Replies: 10
Views: 1718

Re: Question about WinExec()

Hi to all.

WinExec("TASKKILL.EXE /IM NOTEPAD.EXE /F",0)
did not work im my computer (W 8.1)
but...

WinExec("CMD /C TASKKILL.EXE /IM NOTEPAD.EXE /F",0)
did the job.
Regards, Euclides