I have now succeeded in getting the program to work in a W7 environment.
Also another graphics program which I had previously only been able to use in XP.
I also tried running it through a VB 2008 converter but it yielded 102 errors which
I wasn't going to try to resolve.
Thank you again for...
I have actually made some progress. I dug out an old HP laptop which has XP and transferred the Dana Seaman files.
I did have to select GDI+Type library in the VB6 References and make a few other minor changes in order to get
the program to work. It does look very professional but there was a...
Thank you for all your efforts.
I did try some of Tanner's other examples when I worked on this several years ago but the only one I got to work was the one
which went through one pixel at a time.
Unfortunately I had the same problem with the code you provided. I think the problem is that...
Thank you. I will try this out later and let you know the outcome (it may be a few days. The original code was written by the legendary Tanner Helland from Australia and I made a few adaptions.
Thankyou for the quick response. Yes, you are off course correct about BTable not being a native VB function. I posted this close to midnight UK time when I was dropping off to sleep.
What I meant re RGB was if there was a way of distinguishing a light red from a dark red (or in between shade)...
I am using the following code to examine the color of each point on a picture box and then changing it before
redisplaying as a different color on a 2nd picturebox. Although it works I was wondering if other colors outside the
RGB range could be utilised ? Also I have been unable to find any...
Here is the sample code (calls to the relevant trig functions are highlighted :
It was adapted from code downloaded from a VB 6 "shareware" website
Variable declarations
Rem Main Loop
For Count = Xst - 2 * MyPi To Xst + 2 * MyPi Step 3
'Step++ = Faster; Step-- = Slower
'...
Owing to VB6 not having the standard Hyperbolic Trig functions (Sinh, Cosh etc) I have written routines to calculate them from scratch,
e.g Sinh(x) = (e^x - e^-x)/2 and Cosh(x) = (e^x + e^-x)/2
However when multiple calculations are required within a loop then the process grinds to a halt as it...
I have a program which uses the Arcsin and Arccos features of the language.
I have found that if the value to be converted into an angle is 1 or greater then the calculated value
returns as "Nan".
If the value is less than 1 then the angle calculates correctly.
Is this a known problem and are...
I am trying to convert 2 programs from VB6 into VB 2010. Both use Direct Draw graphics features
and generate dozens of conversion errors. Basically each time Direct Draw is referenced.
Have you any ideas on how to handle these?
I have found I can get round the problem by making the changes on the XP laptop and transferring the
exe file over to the W7 PC. The same approach also works for W10.
Thank you to those who wrote a reply.
I have a program, developed in VB6 on Windows XP, which extensively uses the Compute.Eval method to perform calculations
based on inputted text (e.g x*Sin(X), Log(X) etc). However when moved on to a Windows 7 environment the program no longer works,
except when the compute statement is removed...
Sorry for the delay.
Here is the error message :
https://files.engineering.com/getfile.aspx?folder=533f164a-2ce0-4385-b2b5-d67412be4a20&file=Test_Contain_Err.jpg
Around 8 years ago I downloaded a VB 2010.Net program from Microsoft which has source code for creating and manipulating an
on screen Abacus.
The program works when it is run directly from the source code. However when an executable is created this crashes out with
an undecipherable error...
I have a legacy VB6 graphics program which achieves realistic scrolling using the CopyMemory feature.
When I move the program from Windows XP to W7 (or higher) the program crashes on attempting to run.
Removing CopyMemory solves that problem but much functionality is lost.
Are there any...
This should be relatively straight forward in code.
Something along the lines of :
If count(Prd_items) >= 3 then' ensure this refers to same item and not all items on grid.
price = prom_price
else
[indent][indent]prd_price = normal_price
endif
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.