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 ...
Search found 157 matches
- Fri Feb 21, 2025 12:20 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Copy Paste problem in TGet (Fwh 24.02)
- Replies: 6
- Views: 8224
- Tue Jul 30, 2024 5:22 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Switching from memo fields to files -
- Replies: 9
- Views: 4255
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 ...
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 ...
- Wed Jun 12, 2024 11:45 am
- Forum: FiveWin para Harbour/xHarbour
- Topic: Tema calendario nuevamente.
- Replies: 19
- Views: 3122
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.
And the week numbers are at left. Could show the number of the week in the year.
Just my 2 cents.
Regards, Euclides.
- Fri Mar 29, 2024 8:32 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: EXCEL CREATE HYPERLINK
- Replies: 3
- Views: 1513
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 ...
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 ...
- Wed Feb 28, 2024 11:17 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: COMBOBOX
- Replies: 7
- Views: 1240
Re: COMBOBOX
Hi Ruth.
You can do...
Regards, Euclides
You can do...
Code: Select all | Expand
REDEFINE COMBOBOX oCbx VAR cItem ... ID 100 ...
oCbx:SetFont(oFont)
- Sat Jun 24, 2023 8:42 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: read a big xml file
- Replies: 11
- Views: 1536
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
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
- Sat Jul 30, 2022 4:26 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: FIELD Selector for FiveWin ?
- Replies: 6
- Views: 1971
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:={} ...
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:={} ...
- Thu May 19, 2022 3:42 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Redondear centena
- Replies: 8
- Views: 1278
Re: Redondear centena
Hola, mas simples...
nAproximar := 50
nRedondear := 47085
? round(nRedondear / nAproximar, 0) * nAproximar
Saludos, Euclides
nAproximar := 50
nRedondear := 47085
? round(nRedondear / nAproximar, 0) * nAproximar
Saludos, Euclides
- Fri Sep 17, 2021 7:52 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: PAGE DOWN, no funciona?
- Replies: 5
- Views: 722
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 ...
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 ...
- Tue Jun 08, 2021 12:16 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Print Problem with FWH2104
- Replies: 27
- Views: 4425
Re: Print Problem with FWH2104
Hi! Sorry for jumping in...
With FWH 18.01 the printing works as Vilian expects.
Regrds, Euclides
With FWH 18.01 the printing works as Vilian expects.
Regrds, Euclides
- Tue May 25, 2021 12:47 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Editcol de twbrowse
- Replies: 2
- Views: 502
Re: Editcol de twbrowse
Hola!
..\SAMPLES\BROWSE.PRG
..\SOURCE\FUNCTION\BROWSE.PRG
Saludos, Euclides
..\SAMPLES\BROWSE.PRG
..\SOURCE\FUNCTION\BROWSE.PRG
Saludos, Euclides
- Wed Apr 21, 2021 1:21 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Question about WinExec()
- Replies: 10
- Views: 1265
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 ...
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 ...
- Tue Apr 20, 2021 12:54 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Question about WinExec()
- Replies: 10
- Views: 1265
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
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
- Wed Apr 01, 2020 8:15 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: very slow sample program xbrbckg1.prg
- Replies: 14
- Views: 4996
Re: very slow sample program xbrbckg1.prg
Ciao Marco...
Use this image: https://imagizer.imageshack.com/img923/276/DFYUs0.jpg
Is a quite faster... olga1.jpg is resized and is slow
regards, Euclides
Use this image: https://imagizer.imageshack.com/img923/276/DFYUs0.jpg
Is a quite faster... olga1.jpg is resized and is slow
regards, Euclides
- Sat Mar 28, 2020 9:44 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Resultado interesante
- Replies: 3
- Views: 814
Re: Resultado interesante
... matando pulgas a cañonazos...
#include "fivewin.ch"Function Main() ? str(11111111^2, 15) // 123456787654321 ? str(111111111^2, 18) // 12345678987654320 <- Limitación de Harbour/* 11111111 * 11111111 = 11111111+ 111111110+ 1111111100+ 11111111000+ 111111110000 ...
#include "fivewin.ch"Function Main() ? str(11111111^2, 15) // 123456787654321 ? str(111111111^2, 18) // 12345678987654320 <- Limitación de Harbour/* 11111111 * 11111111 = 11111111+ 111111110+ 1111111100+ 11111111000+ 111111110000 ...