Search found 1048 matches
- Thu Jan 17, 2019 10:49 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: aGetfiles bug
- Replies: 27
- Views: 3180
aGetfiles bug
I will using aGetfiles(). Now i see, that a selection over 15 files not possible. Over 15 files is a error "Abnormal program termination" or the program freezes!
- Wed Jan 16, 2019 3:49 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: XBROWSE bEditValid bug? updated!
- Replies: 5
- Views: 738
Re: XBROWSE bEditValid bug? updated!
I make a test-program to show the problem: If you leave a column the program the ::bEditValid show the variable and the len of the variable. 1. On the first browse the data-array are build at init of the dialog. All columns are now interpreted as wide. 2. On the second browse the data-array are buil...
- Wed Jan 16, 2019 2:28 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: XBROWSE bEditValid bug? updated!
- Replies: 5
- Views: 738
Re: XBROWSE bEditValid bug? updated!
Thanks, what are the difference between oGet:varget() and eval( oGet:bSetGet) ?
The second bug is definitive!
if :lAutosave := .T. for this column, the bEditValue is evaluated twice if i leave the column with ENTER but when leaving with mouse sometime runtime-error nLastkey == NIL.
The second bug is definitive!
if :lAutosave := .T. for this column, the bEditValue is evaluated twice if i leave the column with ENTER but when leaving with mouse sometime runtime-error nLastkey == NIL.
- Tue Jan 15, 2019 10:27 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: XBROWSE bEditValid bug? updated!
- Replies: 5
- Views: 738
XBROWSE bEditValid bug? updated!
When i use a variable in column 4 with the value "0101" and edit the column the resulting len of the x is 10, not 4! oBrw:aCols[4]:bEditValid := {|x|msginfo("'"+Eval( x:bSetGet)+"'"+CRLF+"Len: "+alltrim(str(len(Eval( x:bSetGet))))),.T.} It seems, that the vari...
- Mon Jan 14, 2019 3:36 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: oJump for Antonio
- Replies: 1
- Views: 371
oJump for Antonio
Antonio, you set oJump after one navigation to this control to NIL, but if going again to the same control now the oJump is no further functioning as it is NIL!? METHOD ForWhen() CLASS TControl ……... // keyboard navigation if ::oJump != nil SetFocus( ::oJump:hWnd ) ::oJump = nil …....
- Mon Jan 14, 2019 3:31 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: TGET behavior (Antonio)
- Replies: 7
- Views: 829
Re: TGET behavior (Antonio)
Adapted code to respect oJump if present. if !::lKeepFocus ::oBtn:bAction := {|| Eval( oThis:bAction, oThis ),oThis:refresh(),if(valtype(::bValid) == "B",; //if bvalid is "B" if(Eval( ::bValid, oThis ),; //if bValid == .T....
- Sun Jan 13, 2019 7:18 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: TGET behavior (Antonio)
- Replies: 7
- Views: 829
Re: TGET behavior (Antonio)
Rick, you can use your code as before if you do not set ::lKeepFocus to .F.!
I want this behavior for example to put a date from a calendar and if the valid-clause is .T. the cursor steps to next control without using the keybord.
I want this behavior for example to put a date from a calendar and if the valid-clause is .T. the cursor steps to next control without using the keybord.
- Sat Jan 12, 2019 7:34 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: TGET behavior (Antonio)
- Replies: 7
- Views: 829
Re: TGET behavior (Antonio)
Antonio, i think nobody has used ::lKeepFocus as it was not used in actual tget-code! But it saves keybord- or mouse activation in the case of exist ::oBtn in the get and is elegant.
I am also excite to add in the headerfile on GET and [ACTION[NONEXT]]. [NONEXT] sets ::lKeepfocus to .F.
I am also excite to add in the headerfile on GET and [ACTION[NONEXT]]. [NONEXT] sets ::lKeepfocus to .F.
- Sat Jan 12, 2019 3:02 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: TGET behavior (Antonio)
- Replies: 7
- Views: 829
Re: TGET behavior (Antonio)
I add this code to method createbutton() after line 943 in FWH 18/12 if !::lKeepFocus ::oBtn:bAction := {|| Eval( oThis:bAction, oThis ),oThis:refresh(),if(valtype(::bValid) == "B",; //if bvalid is "B" if(Eval( ::bValid, oThis ),...
- Thu Jan 10, 2019 9:31 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: TGET behavior (Antonio)
- Replies: 7
- Views: 829
Re: TGET behavior (Antonio)
Antonio,
as the Button is an other way to input the value my idea is:
if lKeepfocus is false, to evaluate the oGet:bValid if present an then go to next control!
as the Button is an other way to input the value my idea is:
if lKeepfocus is false, to evaluate the oGet:bValid if present an then go to next control!
- Tue Jan 08, 2019 2:43 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: TGET behavior (Antonio)
- Replies: 7
- Views: 829
TGET behavior (Antonio)
In method createbutton() is this line ::oBtn:bAction := {|| Eval( oThis:bAction, oThis ),oThis:SetFocus() } It respects not the present data ::lKeepFocus!! Should be: ::oBtn:bAction := {|| ( Eval( oThis:bAction, oThis ), if( ::lKeepFocus, oThis:SetFocus(), nil ) ) } as i cannot automatic go to next...
- Fri Jan 04, 2019 3:34 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: List all functions and classes in FWH library
- Replies: 13
- Views: 3246
Re: List all functions and classes in FWH library
Mr. Rao, the static "c:\bcc7\" should be able to override with a parameter for the ??.exe. And please provide the compiled ??.exe!
- Mon Dec 31, 2018 7:34 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Child of Folder
- Replies: 2
- Views: 443
Re: Child of Folder
Thanks, but i have only the result of getactivewindow(). In a dialog with folders normally this gives the handle from the selected one of the dialogs in the folder. But i will check if this handle is a handle from a dialog in a folder. Also a question for a function to get the oWnd- or oDlg-Object f...
- Mon Dec 31, 2018 10:06 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Child of Folder
- Replies: 2
- Views: 443
Child of Folder
How to determine, if a dialog is inside a folder(ex)?
- Sat Dec 29, 2018 9:08 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: XBROWSE Facelifting and another behavior!
- Replies: 7
- Views: 1051
Re: XBROWSE Facelifting and another behavior!
If using code in this form, the headers, justify and sizes are not respected! REDEFINE COLUMN XBROWSE oList ARRAY aList OF oDlg ID 103 MESSAGE "Liste" ; HEADERS {"Datum","Buchungstext","Betrag","Beleg"} ; JUSTIFY {...