Search:
Type: Posts; User: technorobbo
Search:
Search took 0.06 seconds.
-
you need to be running 2 instances and connect to the other
-
Text functionality has been added. Font, Font size and Font Color can now be overlayed in the sketchpad layer. Download from link above.
-
Nanni,
I've added the Bezier arrow system in the 2D sketchpad field. For convenience the mouse middle button activates the menu as well as the "m" key and I've sped up the code considerably. The...
-
1 would do just set a global variable for fade in or fade out and re-enable the timer
-
In order to accelerate Panning, Zooming and Rotating I am not turning off the sketchpad until you release the mouse. Your going to need this when you start rendering lots of text and bezier arrows....
-
Ok, Now I uploaded the sketchpad layer with a preliminary grid so you can check registration. As you can see everything aligns in the 3D and 2D view when you zoom and rotate. (The system does slow...
-
Ok - I re-uploaded with player graphics that register a bottom and a solid green field no texture. as you zoom and rotate you will note the players stay perfectly registered to their location. Next I...
-
You need to synchronize the color tables. If you are using photoshop follow this procedure.
Make back up copies just in case!
Open a copy of face.gif
open a copy of mhand.gif
convert both...
-
The problems lies in your Face.gif graphic - the black is not rgb(0,0,0) it's rgb(0,1,0).
If you change it will work just fine.
If your using photshop just edit the color table otherwise pianting...
-
What I'm going to do is create characters that are not motion so when they rotate they the bottom of their feet appear in the exact same coordinate each time.
Then I will remove the grass texture...
-
The lines are in correct proportions for the viewport distance chosen. When you "zoom in" the it is a magnification effect created by changing the viewport distance. Not a "dolly in" created by...
-
convert cursors to 256 colors and it will work
-
it is but I think he nanni wants to create user drawn play diagrams in realtime. I already presented a vector graphics example to nanni. Not whats required.
link to example...
-
you can draw in 2d space the rotate and map it to 3d space - it works.
-
Make a form with 1 button
Private Sub Form_Load()
Randomize
End Sub
Private Sub Command1_Click()
Dim chance50 As Integer
chance50 = Int(Rnd() * 2)
-
try drawing the arclike this
'Draw arc 1
Call SetArcDirection(Picture1.HDC, AD_CLOCKWISE)
arrPoint(13).X = Xoffset + ((11 - CircleRadius) * mZoom)
arrPoint(13).Y = Yoffset + ((HalfSoccerH -...
-
would this help?
make a form with a multiline-textbox and a timer - the form caption will tell you the line count.
Private Const EM_GETLINECOUNT = &HBA
Private Declare Function SendMessage...
-
Cause your wave buffer is 1 sine wave long - you never redimension it. 1 sinewave is no more than a click. Thats why I looped it and controlled the envelope using setvolume and getvolume. No need to...
-
If you want gradually lower the sound volume 1/4 second increments (250ms) if to abrupt you need to do smaller steps. That's why I recommended 10ms.
1.5 is just a multipliers to fade the sound...
-
try using a timer - the 1.5 is negotiable and so is the timer interval. 10ms should work good.
Private Sub Timer1_Timer()
Dim x As Long
x = dsToneBuffer .GetVolume
If x < (-8000) Then
...
-
perhaps something like this?
Dim bday As Date, target As Date
Dim numMo As Integer, numYrs As Integer, numDays As Integer
Dim tmpDate As Date
bday = CDate("1/1/2000")
target =...
-
I'll go with the "tare" analogy - the weight of the container. You shouldn't get charged for it.
It's quite a feat though, writing 1 line of "logic" that fully encompasses an entire program.
-
try this - Make a form and save the zip full of cursors in the project directory.
The cursors will change via radians so you'll have 12 perfectly sliced pie pieces on the form for each cursor to...
-
Brilliant - back in the old "4k of memory" days we used to have 1 line contests. I believe LaVolpe has won.
-
I would consider sub and end sub the form's and timer's events cause I didn't write them - they were there. Option Explicit would make it 4, If I use it.
-
3 lines
Private Sub Form_Load()
Timer1.Tag = Timer + 3600
Timer1.Interval = 500
End Sub
Private Sub Timer1_Timer()
If Timer > Val(Timer1.Tag) Then MsgBox "Get up off your but": Timer1.Tag...
-
Sure, but you realize that no one can click on desktop icons and you'll confuse them?
Ok that being said - this will slow down the chain movement since windows is doing the transparent...
-
Ok - here ya go. Inertia with no gravity - kinda like a tether in space:
Option Explicit
Private Const IMAGE_ICON As Long = 1
Private Const IMAGE_CURSOR As Long = 2
Private Const IMAGE_BITMAP...
-
It's just amatter of movig the gravity point between the start and end points - I'll post the change when I get home
-
I think you mean this or do you?:
Copy into form put picture below in same project folder
Option Explicit
Private Type POINTAPI
X As Long
Y As Long
End Type
-
Here ya go - from lower right with test.bmp. Escape to exit
Option Explicit
Private Const IMAGE_ICON As Long = 1
Private Const IMAGE_CURSOR As Long = 2
Private Const IMAGE_BITMAP As Long = 0...
-
Copymemory copies the raw data from the Long variable to the RGBQuad data type and back again. That way you don't have to do any AND's and divisions to extract the bits.
Both the Long variable and...
-
The more tightness the more calculations. -
I'll post right bottom screen changes when I get home.
-
he following changes apply to the code in the codeback:
http://www.vbforums.com/showthread.php?p=3557773#post3557773
The differences in the 3 images have to be accounted for:
1. The new...
-
What is Cmdstart? Is it a button? Or just a subroutine. I'm assuming command1 was a button since it worked.
-
It looks like you have to set the maskpicture and not the picture. Setting maskpicture automatically copies it to the picture property and the maskcolor will behave correctly. but settign the picture...
-
if you have 2 colors then each of the 3 primary color component amounts to 1/6th the intensity.In other words the 2 colors to be mixed would each provide 1/2 the red, 1/2 the blue and 1/2 the...
-
Hour Hand Mod
The hour hand is programmed to always point directly at the current hour. It is my preference. If you would like a traditional moving hour hand that slowly transitions from one hour...
-
-
Here some instructional code for formatting leading zeroes:
Dim SerialNum As Long, astr As String
SerialNum = 123
'6 digit
astr = Format(SerialNum, "000000")
MsgBox astr
'10...
|
Click Here to Expand Forum to Full Width
|