Search found 347 matches
- Mon Feb 15, 2021 1:55 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: barcode check
- Replies: 3
- Views: 4088
- Mon Feb 15, 2021 9:27 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Evaluate whether a color value is dark or light
- Replies: 9
- Views: 5478
Re: Evaluate whether a color value is dark or light
Without doing any of these calculations yourself, you can get the contrast color by calling the FWH builtin function: ContrastClr( nYourColor ) // ---> CLR_WHITE or CLR_BLACK Note: Logic is the same. But there is already a ready-made function. Just curiosity, which version of FWH has this functio...
- Sun Feb 14, 2021 11:35 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Evaluate whether a color value is dark or light
- Replies: 9
- Views: 5478
Re: Evaluate whether a color value is dark or light
In your screenshot applied my formula? because I see a green (153,255,50) that become 0.3*153+255*0.6+50*0.1 = 203.9 that is clearly a light color and you put the white border...
- Thu Feb 11, 2021 11:13 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Evaluate whether a color value is dark or light
- Replies: 9
- Views: 5478
Re: Evaluate whether a color value is dark or light
In those case you can convert the color to gray scale using the formula 0.3*R+0.6*G+0.1*B then check if it is nearest to white or to black 
- Fri Jan 29, 2021 10:15 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Use PNG image (Solved)
- Replies: 8
- Views: 4538
Re: Use PNG image
on my code I have, on RC file: PNG_REPEDI_SORT1_16 10 "..\\Images\\Common\\16x16\\ordina_A.png" PNG_REPEDI_SORT2_16 10 "..\\Images\\Common\\16x16\\ordina_D.png" PNG_REPEDI_SUM_16 10 &qu...
- Fri Jan 29, 2021 10:12 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: WebServices Request
- Replies: 3
- Views: 1412
Re: WebServices Request
I think it should be enough do cPost := "betriebnr=30346&companyCode=VTPMSTEST&communityNumber=41503&stringDateFrom=2020-01-01&stringDateTo=2021-01-31" cURL := "http://visitortaxtest.deskline.net/Services.asmx?op=PMSVRExport" loHyperlink := CreateObj...
- Mon Jan 18, 2021 7:38 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: error on createobject
- Replies: 2
- Views: 2537
Re: error on createobject
I am not sure it is the error, but on header you send Content-type equals application/json then send an xml. Why you load an xml inside a document then send the xml properties instead of send your xml directly? The xml is only <?xml version=""1.0"" encoding=""utf-8"...
- Mon Jan 18, 2021 7:34 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: CreateObject( "MSXML2.XMLHTTP" )
- Replies: 33
- Views: 57559
Re: CreateObject( "MSXML2.XMLHTTP" )
are you sure that is
and not
with https?
Code: Select all
ohttp:Open( "GET" ,"http://www.w3schools.com/angular/customers.php", .F. )Code: Select all
ohttp:Open( "GET" ,"https://www.w3schools.com/angular/customers.php", .F. )- Wed Dec 30, 2020 8:33 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: About TCalendar
- Replies: 16
- Views: 10101
Re: About TCalendar
I see, it works only on Vista and later, are you trying with win 7? see requirement section on https://docs.microsoft.com/en-us/window ... erecttomin. It is a shame,
- Tue Dec 29, 2020 8:02 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: About TCalendar
- Replies: 16
- Views: 10101
Re: About TCalendar
I just re-try with FiveWin 18.01 https://i.imgur.com/lbdqUqy.png in your screenshot these lines are not executed: rc := MonthCal_SizeRectToMin( ::hWnd, GetClientRect( ::hWnd ) ) SetWindowPos(::hWnd, 0, 0, 0, rc[4], rc[3], nOr(SWP_NOZORDER, SWP_NOMOVE)) ::CoorsUpdate() I did put them...
- Wed Dec 23, 2020 1:08 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: About TCalendar
- Replies: 16
- Views: 10101
Re: About TCalendar
Hello, I share my Last test, where added bViewChanged called when the view changes, SetCurrentView and GetCurrentView to set and get the current view. I tried to do a only month selection, but id does a little weird animation: #include <fivewin.ch> #include <calendar.ch> // MyCalendar #define MCMV_M...
- Mon Dec 14, 2020 2:35 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: About TCalendar
- Replies: 16
- Views: 10101
Re: About TCalendar
ops, there is a bug, bChange is called 2 time by Change method, here the fix: METHOD Change() CLASS TCalendar local aTmp static dOldDate, dOldDate2 if ::bChange != nil if ::lMultiselect aTmp = ::GetDateRange() if dOldDate != aTmp[ 1 ] .or. dOldDate2 != aTmp[ 2 ] ...
- Mon Dec 14, 2020 8:00 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: About TCalendar
- Replies: 16
- Views: 10101
Re: About TCalendar
hello, here a modifed version of testcal.prg from sample folder #include "FiveWin.ch" #include "dtpicker.ch" #include "calendar.ch" #include "wcolors.ch" FUNCTION Main() LOCAL oWnd, oCal, oDtp1, oDtp2, oDtp3, oDtp4, oCbx LOCAL oSayClr LOCAL nColor ...
- Wed Dec 09, 2020 1:12 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: About TCalendar
- Replies: 16
- Views: 10101
Re: About TCalendar
another problem:
In case of multiselect, if change only the Date end bChange is not called
Code: Select all
METHOD Change() CLASS TCalendar
static dOldDate
if ::bChange != nil .and. dOldDate != ::GetDate()
Eval( ::bChange, Self )
dOldDate = ::GetDate()
endif
return NIL- Mon Dec 07, 2020 10:07 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: About TCalendar
- Replies: 16
- Views: 10101
About TCalendar
Hello, In our program we ask for a range di date, using 2 DatePicker, I would like change it using the Month Calendar Control that is supported by FiveWin by the TCalendar class. What I saw, trying the testcal sample is the some animations are missing, I fixed it adding these pieces of code on the s...