You're right of course; you have to work pretty hard to buy an expensive notebook. they're out there, some of the ones with the extra big extra nice monitors, and accessories (if you have to share with a sighted person), can run $2000, but usually there's no need to some cheap insurance.
Chip -----Original Message----- From: bb [mailto:[email protected]] Sent: Wednesday, August 17, 2011 2:03 PM To: [email protected] Subject: Re: laptops Hi Chip, In my errands today one of them was a stop at Walmart and took a look at new notebooks. HP has a real good one in the $500 range and when Black Friday at Thanksgiving comes they are half price. Last fall I picked up one in that range and paid only $295 for it and it was a dual core, 4 gig ram, 250 gig hard drive media HP notebook with Windows 7, I had gotten for a Christmas present for my grand daughter. Now, probably the same thing will be this fall and will get one at that time. The thing is, the price of a computer is so cheap now, getting any insurance is very costly. But I don't know what you have on yours but the HP is a pretty good deal for the one I saw today had a quad core and in the $500 range. HP is one of the best for parts and such. Notebooks need experts for repairs since there so tightly packed. Mine is going to be shipped out tomorrow to EVAS for re-install. I asked them to load Windoweyes and not Jaws; just in case removing Jaws left lingering drivers that could be a possible cause. I have a copy of both screen readers only because Jaws has all the stuff for Access Data Base and I did not know scripting then. I have always preferred Windoweyes. Hopefully GW Micro will replace the disk if something happens during this process. Thanks for the idea Chip. I could install the latest version on my old notebook but that notebook has only 512 ram and a 18 gig hard drive. Not much to work with there. Sincerely Bruce Sent: Wednesday, August 17, 2011 12:22 PM Subject: laptops Sorry to hear that Bruce. My Dell laptop has been fine for many years; can't say I think much of their software support policy though (which was limited to only a couple of years). Nothing seemed as well built to me as my original thinkpad built by IBM (or as costly!); Lenovo's aren't the same. It may not be worth it any more, but my home owners insurance company allowed me to purchase a rider policy for my original thinkpad (which cost me around $2800) for $75 a year. If anything happened to it (lost, stolen, or just dropped) they would pay for it completely. If you buy an expensive laptop, you could ask about this kind of coverage. I did collect on it once after I dropped it, and it saved me $450 in repairs. Chip -----Original Message----- From: bb [mailto:[email protected]] Sent: Tuesday, August 16, 2011 7:59 PM To: [email protected] Subject: Re: Reading Status Bar in Notepad and Word 2007 Hi Chip, Yes, when I did the scan, it did not have the collection issue you discovered in 2003. Very easy to get and the reason why I added it to my page_num routine since I do have the 2007 version and it works fine. Did not do the color thing you discussed in the last scripting class because my good old Del notebook died again. I have had it for a year and it has died 4 times now. EVAS is going to ship it back and start over again once I get it in a box. But, dealing with a Del product is nothing short of a nightmare... This fall I am going to buy my own and probably will last like the one I am using now, 11 years and still working, including falling 18 feet off my upper deck I built when resting it on the handrail and it decided to leap. Falling on leaf mulch on the ground and still works...for 5 years since it happened. So I will be slightly out of commission for a while. This computer has only 4.2 version on it... Take care, Bruce Sent: Tuesday, August 16, 2011 5:55 PM Subject: RE: Reading Status Bar in Notepad and Word 2007 Thanks for doing all this Bruce. It looks to me as if the 2007 status bar doesn't present nearly the problem in understanding that the 2003 status bar does, so I don't think I'll need to do anything with it. Chip -----Original Message----- From: BT [mailto:[email protected]] Sent: Monday, August 15, 2011 12:53 PM To: [email protected] Subject: Re: Reading Status Bar in Notepad and Word 2007 Hi Tom, Thanks, I did it quick last night for chip since he did not have Word 2007. I first looked at what names were listed and 31 names came up for Word 2007 and 2 of them were for the Status Bar. When searching for that 2 word name, with a space between, I came up with the same clip data for both. Assuming that probably one child is for the first pain and the second one for a split screen having 2 windows, I just chose the first one for now. Having said that, I will look at your suggestion if I have time and see if Word 2007 will come up with the same wtStatus results and works in getting the collection for Word 2007. All I was wondering about and going to look into is when can the second status bar be used; assuming it is for a split screen and don't really know. It was a quick solution for Chip's question and I gave him a list of all the window names on the Word 2007 first screen that had no entries since the word for status bar is different in each Office Word. I just posted it just in case someone else wanted a quick page line number routine; Word 2007 numbers lines if you set it up to display it inside the setup section of the menu. For the status bar only gives page numbers and word count; and maybe more depending on settings. I am sure that is why you mentioned to use that form and maybe it will work for all of them, which it probably is true, but who trusts Microsoft for being standard??? Having this may help in other future programs and searches...figuring out the top level convention to get to children as you mentioned. thanks Tom, when I get time I will test it out and see what else can come up using this method. Sincerely Bruce Sent: Monday, August 15, 2011 1:02 AM Subject: Re: Reading Status Bar in Notepad and Word 2007 Here's a little more direct method to get a status bar when it's a standard status bar window, as in Notepad. Note, in some programs it will be a direct child and others it won't. So use DirectChildren or Children as needed. You can find out quickly in the immediate mode window. Although, if it is a direct child it will still be considered a child as well. So check the direct children first. There are usually many more children. So using DirectChildren will have to check fewer window objects. Set oStatusWindows = ActiveWindow.DirectChildren.FilterByType(wtStatus) This will return a collection which may be more than one if it's an MDI window. Hth, Tom On 8/14/2011 11:21 PM, BT wrote: > > To All, > > There is more than one status bar in Word 2007 and the name is > different than what is in Notepad so this is what I did to get it to > speak the status bar in my Page_Num app to get the line and column > number in Notepad and now at least the Page and word count in Word > 2007. > > you have more than one status bar in Woord 2007 so do a loop and speak it. > This is one of 2 methods to get the item number for the object in 2007 > for it will not return an object until you know it's location. > > App Segment: > dim objMainWindow, objStatusBarWindow, objResults > set objMainWindow = activeWindow.overlap 'First Notepad: > set objResults = objMainWindow.children.filterByName( > "msctls_statusbar32") > if not objResults is nothing then > if objResults.count> 0 then > ' Window Found! > set objStatusBarWindow = objResults(1) ' where 1 is the location > for the Status Bar object. > SpeakStatusBar objStatusBarWindow > Exit Sub > end if > end if > ' Word 2007: > set objResults = objMainWindow.children.filterByName( "status bar") > if not objResults is nothing then > ' Go through the collection of status bar objects. > For Each objStatusBarWindow in objResults > SpeakStatusBar objStatusBarWindow > Exit Sub > Next > End If > End Sub > > Sub SpeakStatusBar( oStatusbar) > ' now speak contents of the object clips. > ' First convert any text for easier reading. > Dim txt: txt = oStatusbar.clips.clipstext > txt = Replace( txt, "Ln", " Line ") > txt = Replace( txt, "Col", " column ") > txt = Replace( txt, ",", " ") > Speak txt > End Sub > >
