ProFox March 2017

profox@leafe.com

36 participants
36 discussions

Re: Modless form out of top-level form
by Fernando D. Bozzo 03 Mar '17

03 Mar '17

If you define the inner form as to show "in a top level form", if you configure it with desktop=.T. I think that you can do it El 3/3/2017 11:44, "Man-wai Chang" <changmw(a)gmail.com> escribió: Given a g_form as top-level form in READ EVENTS, could a new modeless form be popped out of the top-level form, possibly without _SCREEN.visible? Do I need to play with MDI forms? g_form=Createobject("myform") DO case CASE Type("g_form")="O" Set Sysmenu To _Msm_edit g_form.Show() Read Events .... ENDCASE -- .~. Might, Courage, Vision. SINCERITY! / v \ 64-bit Ubuntu 9.10 (Linux kernel 2.6.39.3) /( _ )\ http://sites.google.com/site/changmw ^ ^ May the Force and farces be with you! [excessive quoting removed by server]

1 0

Modless form out of top-level form
by Man-wai Chang 03 Mar '17

03 Mar '17

Given a g_form as top-level form in READ EVENTS, could a new modeless form be popped out of the top-level form, possibly without _SCREEN.visible? Do I need to play with MDI forms? g_form=Createobject("myform") DO case CASE Type("g_form")="O" Set Sysmenu To _Msm_edit g_form.Show() Read Events .... ENDCASE -- .~. Might, Courage, Vision. SINCERITY! / v \ 64-bit Ubuntu 9.10 (Linux kernel 2.6.39.3) /( _ )\ http://sites.google.com/site/changmw ^ ^ May the Force and farces be with you!

1 0

Hard-Coded Scalar Value Substituted at Run Time
by Ken Dibble 02 Mar '17

02 Mar '17

I swear, my code is haunted. I have some code in a subclass of my custom-built list control class. I provide enough code here to indicate the context, but I don't think I need to explain its purpose to illustrate what has just happened: FOR m.x = 1 TO ALEN(THISFORM.oMail.aSortList,1) ** 2/28/17: ** ** On this date, a user had an "Array dimensions are invalid" ** error at this point in the code. However, the trace gave the ** offending line of code as follows: ** ** thekey = THISFORM.oMail.aSortList(m.x,10) ** ** The parent code doesn't contain any lines like that, at all. ** The array has 5 hard-coded columns, not 10. It has always ** had 5 columns since I wrote this code many years ago. ** There is NO WAY that the hard-coded scalar value of 5 ** in this code could be changed to 10. That is really, really, ** REALLY weird. ** This is the actual code: * Find the corresponding row in the temporary storage array. thekey = THISFORM.oMail.aSortList(m.x,5) ** See? Not 10. It's 5. findrow = ASCAN(THISFORM.aTmpSort,thekey,-1,-1,5,15) IF findrow > 0 * We found it. Copy the temporary storage array row back to the * listcontrol's RowSource. FOR m.y = 1 TO ALEN(THISFORM.aTmpSort,2) THIS.aItemList(therow,m.y) = ; THISFORM.aTmpSort(findrow,m.y) ENDFOR * We use this to control which aItemList row to populate because * I'm not sure the two arrays will have an equal number of rows * in all cases. (They SHOULD because the RemoveAddress() method * truncates both the RowSource and last-name-sorted arrays, but * just in case...) therow = therow + 1 ELSE * The row absolutely should be there. RETURN .F. ENDIF ENDFOR Now, this particular user uses this feature and executes this code quite frequently. But today, somehow, at run time, a hard-coded scalar value of 5 was replaced with 10. This crashed the program, which emailed me as a result, so I have the trace. I can't reproduce it. So it does not appear that the last compile messed something up. Instead, something magically changed that number this ONE TIME while the code was executing. Is this really the proverbial cosmic ray flipping a bit? Has anyone ever seen anything like this? If not, why do these things only happen to me? Thanks for any thoughts. Ken Dibble www.stic-cil.org

6 9

Re: Hard-Coded Scalar Value Substituted at Run Time
by Ken Dibble 02 Mar '17

02 Mar '17

> > FOR m.x = 1 TO ALEN(THISFORM.oMail.aSortList,1) > > thekey = THISFORM.oMail.aSortList(m.x,10) && "array dimensions > > invalid" > > > >Is this m.x declared local to the procedure, or is it possibly shared >with other m.x's in different scopes? It's declared local in this procedure, and all of the other m.x loop counters in the affected objects are also local. Thanks, Ken

1 0

Re: Hard-Coded Scalar Value Substituted at Run Time
by Ken Dibble 02 Mar '17

02 Mar '17

>Never seen something like this, but if you are distributing an exe, then >you should md5 it so you can detect any change comparing with a saved md5. > >This way I've found viruses that changed parts of the code and antiviruses >have cleaned them up, but leaving the exes in a different state than the >original, sometimes even unrunnable. That's a really good idea. As it turns out, I'm embarrassed to say, the line of code reported in the trace does exist, in a virtually identical list control subclass on the same form (one overlays the other exactly). I wasn't paying attention to the name of the control in which the error occurred. There are actually 10 columns in the array in this method. So what actually happened is that somehow, between: FOR m.x = 1 TO ALEN(THISFORM.oMail.aSortList,1) and thekey = THISFORM.oMail.aSortList(m.x,10) somehow the length of the array got truncated. Now, there is NO other code between those two lines, so ALEN(THISFORM.oMail.aSortList,1) would have had to return an impossible result for the next line to fail. I have seen this on a few occasions when iterating arrays, but I remain mystified as to how it could happen. Ken

2 2

ProFox List Statistics for February 2017
by List Administrator Account 01 Mar '17

01 Mar '17

================================================== ProFox List Statistics February 2017 ================================================== Subscriber Count at End of Month: ProFox: 287 ProFoxTech: 187 ================================================== Total Posts: 276 (Up 63.31% from January 2017) Total [OT] Posts: 2 (Up 100.0% from January 2017) Total [NF] Posts: 46 (Down 4.17% from January 2017) Daily Message Counts for February 2017 ------------------------------------------------ DOW Date Count --- ---- ----- W 1 - 11 T 2 - 12 F 3 - 29 S 4 - 1 S 5 - 1 M 6 - 7 T 7 - 28 W 8 - 11 T 9 - 8 F 10 - 18 S 11 - 10 M 13 - 9 T 14 - 23 W 15 - 4 T 16 - 18 F 17 - 15 M 20 - 14 T 21 - 19 W 22 - 3 T 23 - 4 F 24 - 4 M 27 - 21 T 28 - 6 Message Counts By Day of Week for February 2017 ------------------------------------------------ DOW Count --- ----- Sun - 1 Mon - 51 Tue - 76 Wed - 29 Thu - 42 Fri - 66 Sat - 11 Distinct Posters to the List (changes relative to January 2017) ------------------------------------------------ Non-OT messages: 40 (Down 16.67%) OT messages: 2 (Up 100.0%) NF messages: 17 (Down 19.05%) Total number: 41 (Down 14.58%) Top 20 Contributors by Number of Non-OT Posts ------------------------------------------------ | Posts Contributor | ------------------------------------------------ 1. 27 Dave Crozier 2. 23 Alan Bourke 3. 21 mbsoftwaresolutions(a)mbsoftwaresolutions.com 4. 18 Richard Kaye 5. 18 Ted Roche 6. 15 Fernando D. Bozzo 7. 13 Gene Wirchenko 8. 13 AndyHC 9. 12 Paul Newton 10. 10 Thierry Nivelet 11. 8 Tracy Pearson 12. 8 Ken Dibble 13. 7 Stephen Russell 14. 7 Rick Schummer 15. 6 Ed Leafe 16. 6 Fred Taylor 17. 6 Paul H. Tarver 18. 6 rafael copquin 19. 5 Jan Bucek 20. 5 John Weller Top 2 Contributors by Number of OT Posts ------------------------------------------------ | Posts OT% Contributor | ------------------------------------------------ 1. 1 7% Gene Wirchenko 2. 1 100% Michael Madigan Top 17 Contributors by Number of NF Posts ------------------------------------------------ | Posts Contributor | ------------------------------------------------ 1. 11 Dave Crozier 2. 7 Ken Dibble 3. 5 AndyHC 4. 4 Ted Roche 5. 3 John Weller 6. 2 Alan Bourke 7. 2 Dave Thayer 8. 2 Kevin J Cully 9. 2 Gene Wirchenko 10. 1 José Enrique Llopis 11. 1 rafael copquin 12. 1 Michael Glassman 13. 1 Malcolm Greene 14. 1 Jan Bucek 15. 1 Vince Teachout 16. 1 Mike 17. 1 Stephen Russell Top 20 Contributors by Total Number of Posts ------------------------------------------------ | Posts Contributor | ------------------------------------------------ 1. 27 Dave Crozier 2. 23 Alan Bourke 3. 21 mbsoftwaresolutions(a)mbsoftwaresolutions.com 4. 18 Richard Kaye 5. 18 Ted Roche 6. 15 Fernando D. Bozzo 7. 14 Gene Wirchenko 8. 13 AndyHC 9. 12 Paul Newton 10. 10 Thierry Nivelet 11. 8 Tracy Pearson 12. 8 Ken Dibble 13. 7 Stephen Russell 14. 7 Rick Schummer 15. 6 Ed Leafe 16. 6 Fred Taylor 17. 6 Paul H. Tarver 18. 6 rafael copquin 19. 5 Jan Bucek 20. 5 John Weller Top 16 Contributors by Number of New Threads Started ------------------------------------------------ | Posts Contributor | ------------------------------------------------ 1. 4 mbsoftwaresolutions(a)mbsoftwaresolutions.com 2. 3 Alan Bourke 3. 3 Ken Dibble 4. 2 Paul Newton 5. 2 Paul H. Tarver 6. 1 List Administrator Account 7. 1 John Weller 8. 1 Dave Crozier 9. 1 Richard Kaye 10. 1 Tracy Pearson 11. 1 Ted Roche 12. 1 Rick Schummer 13. 1 William Tormey 14. 1 Gene Wirchenko 15. 1 Graham Brown 16. 1 pamechu umgobwe Top 20 Non-OT Threads by Total Number of Posts ------------------------------------------------------------------ | Posts Subject | ------------------------------------------------------------------ 1. 29 Diffing VCXs 2. 27 SQL Backend Question - Part Deux 3. 23 [NF] Drop-Dead Simple USB Drive Encryption 4. 23 Copy Excel worksheet to another workbook 5. 17 SQL Backend Question 6. 17 X# 7. 13 [NF] Anti-Virus Programs 8. 12 Scope Resolution :: 9. 12 VFP Codeplex site down? 10. 11 TaskPane entry for ProFox outdated 11. 11 So what tech do you like to work in nowadays? (was TaskPane entry for ProFox outdated) 12. 10 [NF] Unbiased Cyber Security Resources 13. 10 Trying to create shortcut text 14. 8 VFP6 / Codemine7 kill switch 15. 6 "Cannot locate the Microsoft Visual FoxPro Support Library" 16. 6 Grid - Height : Expression evaluated to an illegal value 17. 5 Flashback Friday 18. 5 ActiveX Question 19. 4 Integrating FoxBin2PRG (was Diffing VCXs) 20. 4 WOULD LOVE TO BUY VFP 9 +SP2 . Top 2 OT Threads by Total Number of Posts ------------------------------------------------------------------ | Posts Subject | ------------------------------------------------------------------ 1. 1 [OT] Non-Natives' English (was: SQL Backend Question - Part Deux) 2. 1 [OT] Non-Natives' English (was: SQL Backend Question - Part Deux) Top 20 Threads by Total Number of Posts ------------------------------------------------------------------ | Posts Subject | ------------------------------------------------------------------ 1. 29 Diffing VCXs 2. 27 SQL Backend Question - Part Deux 3. 23 [NF] Drop-Dead Simple USB Drive Encryption 4. 23 Copy Excel worksheet to another workbook 5. 17 SQL Backend Question 6. 17 X# 7. 13 [NF] Anti-Virus Programs 8. 12 Scope Resolution :: 9. 12 VFP Codeplex site down? 10. 11 TaskPane entry for ProFox outdated 11. 11 So what tech do you like to work in nowadays? (was TaskPane entry for ProFox outdated) 12. 10 [NF] Unbiased Cyber Security Resources 13. 10 Trying to create shortcut text 14. 8 VFP6 / Codemine7 kill switch 15. 6 "Cannot locate the Microsoft Visual FoxPro Support Library" 16. 6 Grid - Height : Expression evaluated to an illegal value 17. 5 Flashback Friday 18. 5 ActiveX Question 19. 4 Integrating FoxBin2PRG (was Diffing VCXs) 20. 4 WOULD LOVE TO BUY VFP 9 +SP2 .

1 0

2026

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

ProFox March 2017