Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
 
  HOME    TRACKER    Visual Basic




Moving The Screen With The Player....


In my program I've got a Point on the screen that can move at any 360 degree angle and has its physics like space....

But my problem is it moves around the screen ..I want the screen to actually follow the point....but still move around with the space like physics that ive given the point(a ship)

like diablo..how the screen follows the player around with the player in the middle...




View Complete Forum Thread with Replies

See Related Forum Messages: Follow the Links Below to View Complete Thread
Player Select Screen
all solved thanx guyz!

Player Select Screen
hi guyz i need help on creating a player selection screen. this is what i want the screen to do:

1. The ability to store within the program whilst it is running

>The name of the player, who have used the program, should allow for 10 players to have their names stored per session
>The number of attempts which have been incorrect for each individual player on each part of the test of the program i.e. colours and numbers

thanx for ure help guyz, btw if u need my forms plz contact me.

Getting Rid Of Windows Media Player Splash Screen
Id like to know if I can get rid of the wmp logo splash screen that shows when theres no playback happening. I just want a blank, black screen instead.

This is primal to me, if I have to use another component to play movie files, Ill do so.

Thanks

Getting Rid Of Windows Media Player Splash Screen
Id like to know if I can get rid of the wmp logo splash screen that shows when theres no playback happening. I just want a blank, black screen instead.

This is primal to me, if I have to use another component to play movie files, Ill do so.

Thanks

Moving Pictures Around The Screen
I am making a screensaver and i want an image to change and move around the screen. can anyone tell me how to do this?

Moving An Object Away From The Screen
say i want to move an object farther away from the screen, like going into the distance, right now i got a cube with a black screen and i want it to move back, right now i changed the the z corodinates but it stays the same. should i change all the corodinates for every vertex, or just move the camera away from the object to make it seem like its moving farther away?

Moving Images On Screen.
Hi,

I have series of buttons that create an imagebox with a set picture in it. What I now require is to be able to move the imageboxs created around the form.

The following code will move the imagebox around the form, assuming there is one (1) imagebox on the screen. Because the user can press the "create" button x number of times, is there away that will allow the u/m code to be for all image controls that are on a forward (without writing this code 1000 times).

Many thanks for your help.

[[[[code]]]]

Option Explicit
Private XOffset As Integer
Private XDrop As Single, yDrop As Long
Private YOffset As Integer


Private Sub Image1_MouseDown(Button As Integer, _
Shift As Integer, X As Single, Y As Single)
XOffset = X: YOffset = Y
XDrop = Image1.Left: yDrop = Image1.Top
Image1.Drag vbBeginDrag
End Sub


Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single)
Image1.Move (X - XOffset), (Y - YOffset)
End Sub


Private Sub Image1_DragDrop(Source As Control, X As Single, Y As Single)
Image1.Move (XDrop + (X - XOffset)), yDrop + (Y - YOffset)
End Sub

Moving Focus To A New Ie Screen
The problem is this. I am writing a program that pulls information from a website. One part of the information can only be pulled by clicking a button on the site which opens up a new window and the data is in that new window of ie. I can find the Hwnd of the new window no problem, but i don't know how to move control over to that new window so i can get the data from it.

I tried

Set oIE = SendMessage(lhWndP, WM_GETOBJECT, 0&, 0&)

but it doesn't seem to make oIE be that instance of ie.

Any thoughts? I've checked all over the search function but haven't been able to find something similar to this.

Thanks!!

Moving Objects Across Screen
ok so i have a picture that i need to move across screen but it cant hit the sides of the screen or barriers that i make with other pictures.

i have no idea how i would go about doing this i dont necissarily want code but if someone could point me in right direction that would be chill

Help!! Moving An Image On The Screen
I am wanting to do it so when someone clicks on and image they can move it any where on the screen,and when they release the button the picture stays in that location...

Moving Programs Out Of The Screen
altavista free internet has a banner that always stays in the screen. can i make a program to always move it out?

Moving The Screen Or 'game Map'
I am totally confused on this problem and i hope someone can help.

On most games where you direct a little guy around the screen, the screen moves with the man when he hits the side of the window. Kind of like maps for the game. How on earth would I attempt to do this.

Thanks.

--------------------------
You just have to accept that some days your the pigeon and some days your the statue

--------------------------------------------------

'If a man ask you a question just reply 42, if he asks you what you mean, give him a calculater'

-------------------------------------------------

Longhorn is just like Labour, All promises and no show

Moving GIFs Across The Screen?
Hi all,

I was wondering if someone has any idea how to make some of my gifs (pictures)
move across the screen when someone runs my program?

Thanks,
Mike

VB In Excel Moving Screen
How can I get Excel to scroll so that a given cell, say f13, is the top left cell?

Sorry for the noob question. I'm used to Visual C++. Thanks.

Windws Media Player Will Not Stay Full Screen!
Code:
'SET FULL SCREEN TO TRUE!
Form3.WindowState = 0
WindowsMediaPlayer1.uiMode = "none"
WindowsMediaPlayer1.windowlessVideo = True
WindowsMediaPlayer1.settings.autoStart = True
WindowsMediaPlayer1.settings.volume = 100
WindowsMediaPlayer1.settings.setMode "loop", True


Dim cMonTo As cMonitor
Dim cMonFrom As cMonitor

Set cMonTo = m_cM.Monitor(MonitorScreen(3))
Set cMonFrom = m_cM.MonitorForWindow(Me.hwnd)

If Not (cMonTo.hMonitor = cMonFrom.hMonitor) Then

' work out my offset from the origin of this monitor:
Dim lOffsetX As Long
Dim lOffsetY As Long
lOffsetX = ScaleX(Me.Left, vbTwips, vbPixels) - cMonFrom.Left
lOffsetY = ScaleY(Me.Top, vbTwips, vbPixels) - cMonFrom.Top

If (lOffsetX < 0) Then
lOffsetX = 32
End If
If (lOffsetY < 0) Then
lOffsetY = 32
End If

' move to the newly selected monitor
Me.Move Me.ScaleX(lOffsetX + cMonTo.Left, vbPixels, vbTwips), Me.ScaleY(lOffsetY + cMonTo.Top, vbPixels, vbTwips)
End If
'
'
'

Const Dir1Path As String = "C:wampwww railers"
Dim FileFinalList As String
i = 0
'
Dim fso As Scripting.FileSystemObject
Set fso = New Scripting.FileSystemObject
'
Dim SelectedFile As Scripting.File, myFiles As Scripting.Files
Set myFiles = fso.GetFolder(Dir1Path).Files
'
Set sPlayList = WindowsMediaPlayer1.playlistCollection.newPlaylist("Video")
'
For Each SelectedFile In myFiles 'Cycle through and get all files in Dir1.Path
If right$(SelectedFile.Name, 3) = "avi" Or right$(SelectedFile.Name, 3) = "wmv" Then
Set sMedia = WindowsMediaPlayer1.mediaCollection.Add("C:wampwww railers" & SelectedFile.Name)
WindowsMediaPlayer1.currentPlaylist.insertItem (i), (sMedia)
i = i + 1
End If
Next
WindowsMediaPlayer1.Controls.play
I have the Windows media player move to a monitor considering im using 3 and I want it to stay full screen when I play WMV files in the folder its fine but when I add a AVI file to it ive tryed three different ones, and like 3/4 into the WMV files it cuts out of full screen and continues playing.

the Play list follows
spiderman3.wmv
assassins.wmv
Cars.avi <--- just added

cars.avi was a random one I added to the folder and now right when its 3/4 through the firstmovie spiderman it cuts out every time in the same spot.

so i went and removed the AVI file and replaced it! Still happens with another AVI file. then I removed the avi file completly leaving just the 2 wmv files in the folder to playlist and it works again?! why is this happening, does it have to do with the codecs, does anyone know?

Thanks
-AgentSmithers

Shell Window Media Player In Full Screen
I have a program that shells Windows Media Player. Does anyone know how I can pass the ALT and ENTER keys so that it opens in Full Screen?

Private Sub cmdPlay_Click()

Dim strProgram As String
Dim video1 As String
Dim video2 As String

strProgram = "C:Program FilesWindows Media Playerwmplayer.exe"
video1 = """C:Program FilesGroksterMy GroksterGnR-DontCry.mpg"""
video2 = """C:Program FilesGroksterMy Grokster ransam commercial.mpg"""

Shell strProgram & " " & video1 & " " & video2, vbNormalFocus 'vbMaximizedFocus

End Sub

Placing Text Over Windows Media Player Screen
Hi This is my first post and probably should be in the newbie section.
I have managed make video clip player that play clips on a second screen (tv out of video card).
Now I need to somehow overlay text along the bottom of the player screen and preferably scroll it.
Is this even possible.
Any tips greatly appreciated

Windows Media Player Full Screen Issue
Hello all. I was wondering if anyone could tell me if it is possible to display a VB6 form over the top of media being played in WMP full screen mode. I have an app which sits in the backgroung and listens for keystrokes. When a keystroke is detected a I want VB6 form to be displayed over the top of the media player. At present it works, except the VB6 form which is opened sits behind the media being played on full screeen. Any help on this would be much appreciated. Thanks.

Moving (Or Animating) Shapes Across The Screen???
I need to make a shape move from one position on the screen to another position.........at the click of a button. And I mean actually move, not just disappear from the first position and then re-appear in the new position within a split second.......It already does that and it looks ****, so I need actual "movement".

Now I know it's possible, but i've searched all over the net AND on msdn, but I can't find anything (plus I don't exactly know what I'm looking for.....word for word......so it's hard to search for it)

Does anyone know how to do this???

Moving A Borderless Window Around The Screen
Ok im using my own graphic images made in PS to make a nice interface for a game im makeing, however i dont want the windows style border around the screen so i set the borderstyle of the form to none, however when i run the program i find i cant move the window around the screen ne more. This could be annoying to some one useing the program cos the window would be stuck in one position all the time. So i was wonder if there was a way of moveing the window around when border style is set to none. Thanks for any help

Richtext Box Flickers When Moving Off Screen
I have an application where I need to move a full screen sized richtext box off screen (similar to a tele-prompter). I am getting a nasty flicker! Is there any way to maintain the text formatting of the RTF "and" eliminate the flicker when it is being moved off screen? I have done some research on BitBlt but I have not had any success getting it to work. Any suggestions would be greatly appreciated...

Moving Borderless Form Across The Screen
Hello Everybody,

I've a problem. I've made a program without a border(borderstyle=0) which contains a label which displays a name and the same name is the caption of the form, if the label.caption changes de form.caption changes. But the problem is because the form has no border I can't move it across the screen. Is there a way I can still have no border, but can move the program across the screen?

How To Programmatically Get A Screen Capture From An Embedded Windows Media Player?
Hi,

Does anyone out there have any clue on how to programmatically get a screen capture from an embedded Windows Media Player in a VB .NET appilcation?

Thanks,
Bill

Setting And Reading Windows Media Player Screen Coordinates
I use the "OpenDirectory" subroutine below to open windows media player 6.4 which automatically plays avi files that are selected from my program. Would you please tell me how to set the coordinates for the media player windows and also how to read the coordinates for the media windows. My program opens multiple media player windows at the same time and sometimes the multiple windows are nicely cascaded but other times they are not, so i would like to manually set the screen coordinates from code as each window is opened, so they will be nicely cascaded...

Thanks!

ddutke



Private Declare Function ShellExecute Lib "shell32.dll" _
Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal _
lpOperation As String, ByVal lpFile As String, ByVal _
lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
Private Const SW_SHOWNORMAL = 1

---------------------------------------------------------------------

Public Sub OpenDirectory(Directory As String)

ShellExecute 0, "Open", Directory, vbNullString, _
vbNullString, SW_SHOWNORMAL

End Sub

Media Player Show Movie File (4:3) Full Screen
windows media player have Menu Tools>option>Devices >> and display properties
can setup pixel aspect ratio for run movie file (4:3) full screen size
i have a problem in my program. i use wmp control can play movie but not show full screen size.
(Windows Media Player 11)

thank you for all

Show Some Message On Media Player When Playing Full Screen
i want to show some message or form or anything on top of media player when it is playing in fullscreen ,such as show list of next movie or song to play with media player , help me please , thank u very much for ur suggession

How To Show A Label While Playing Media Player In Full Screen
I want to show a label While playing video file with media player control
in full screen mode


how a label can show in front of a media player control

Moving A Form Just Like A Windows Screen Saver
Can we model an application in such a way that current active form becomes the screen saver- i mean moves across the screen and is always on top.What i understand here is i could make a current active form as always on top until any mouse event or keyboard event happens and moving it around until then.I not able to understand how to move the form around the monitor as if it were afloat.u r help is higly appreciated.
thank you,
-srikant

Moving Cursor To Specific Pixel On Screen
Hey guys. I have a pixel on my screen (1 pixel that can be located anywhere on my screen). What I want to do is I want the cursor to move to that pixel whenever i click one of my command buttons. The pixel color as a long value is 3706556. Could anyone help? I used GetPixel to scan the window for the pixel im searching for, and i used a nested loop to make it search both x and y positions. The thing is, it takes WAY too long and it lags too much to do that. Anyone got any better ideas?

Converting Screen Points And Moving Mouse
I got a problem. I have got some objects on the form and want to select them. But when the user clicks on the form I get an x and an Y, but those values aren't comparable with the .left and .height from the object, how to convert these?? My form scaleMode is on twips. DOn't say I must use the object_click porperty cause that's not wat I want.

And How to set the mouseCursor to a specific point on the screen. The positon of the object for example. I know there is something like SetCursor, but I can't get it working

Child Forms Moving Down Screen On Loading
Hi all,

I have a mdi form which currently has two child forms that are loaded from the menu of the mdi.
The problem is that when I open the mdi and load either of the child forms for the first time it is positioned correctly at the top of the screen under the toolbar of the mdi.
However when I unload then reload the form (either one) the form opens a couple of cm from the top. Each time I umload and reload the form(s) they move down the screen until they eventually appear at the correct position and the process starts again. There is no code etc in the forms resize event.

I've tried changing the forms from sizeable to dialod etc, and making their startup position to full screen which makes the form flicker before they appear on full screen.

Has anyone any idea how I can make the forms always appear in the correct position and if on full screen to stop flickering from standard size to full screen.

I'm training today but will check my mail when I can, thanks in advance for any ideas etc.


Graham


!UNRESOLVED! Moving Mouse To A Color On The Screen?
Hey, what I want to do is have my program scan the screen for a certain color. Say, FF00FF, pure purple. Once it has found the color, move my mouse to that pixel. If there are more than one pixels next to each other of that color (IE: a 4x4 square of purple) then move the mouse to the middle of that square. I found one way of doing it but it loops around the screen moving my mouse to every pixel of that color. I just want it to find the middle of a group of pixels that are a certain color and move my mouse there. And I'm not worried about if it see's 2 colored pixels that aren't next to each other, I can take care of that on my own. Does anyone know how to do this? Is it possible in VB? I'm sorry if you couldn't understand what I meant, it's hard to say. If I wasn't detailed enough please let me know.

Remember that this world is not reality. It's a playground of appearances on which we practice overcoming seems-to-be with our knowledge of what is.
ViRuaL

Edited by - ViRuaL on 6/14/2005 5:43:47 PM

Prevent User Moving Form On Screen
How does one prevent a user from moving a form around the screen in VBA?


<Edit> AbbydonKrafts - Moved thread to VBA forum </Edit>



Edited by - AbbydonKrafts on 11/3/2006 7:35:51 PM

Bunch O Timers - Moving Objects - Bounce Off Screen Edge
I'm sure it's been covered before . It's not that hard to do
yet I have issues . This is simple , Move the Object around the screen . The problem lies when it's moving to the right hand side . It seems to hit the wall then go straight up , yet on the left it works fine . I fail to see the error in my code and was hoping that you would have a look . The code is below .

Code:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_GETTEXT = &HD

Private Sub cmd_StartRecord_Click()

End Sub

Private Sub cmd_StopRecording_Click()

Sleep 4000 ' 2000 milliseconds = 2 seconds to delay

Timer1.Enabled = True

retval = SetCursorPos(0, 0) ' move the cursor to top left corner

End Sub

Private Sub cmd_Start_Click()
Sleep 4000 ' 2000 milliseconds = 2 seconds to delay

Timer1.Enabled = False


retval = SetCursorPos(0, 0) ' move the cursor to top left corner
End Sub

Private Sub Command1_Click()

End Sub

Private Sub cmd_Stop_Click()
Timer1.Enabled = False
End Sub

Private Sub Form_Load()
'Call the Formsontop function
'USAGE: Call formsontop(Me ,True ) -ONTOP MOST
' Call formsontop(Me ,False ) -NOT TOP MOST

Call FormsOnTop(Me, True)



'Set Initial Settings
Steps = 0
'Set the Steps Caption to the amount of steps
lbl_Steps.Caption = "Steps (" & Steps & ")"
Recording = False
Playing = False

'Get the screen Resolution
Dim x, y As Integer

x = Screen.Width / Screen.TwipsPerPixelX
y = Screen.Height / Screen.TwipsPerPixelY


Label3.Caption = "Screen Width =" '& x '& " TwipsPerPixel"
lbl_X.Caption = x
Label4.Caption = "Screen Height =" ' & y '& " TwipsPerPixel"
lbl_Y.Caption = y


Timer2.Enabled = True ' This captures the links
End Sub

Private Sub Timer1_Timer()

If IsOnScreen Then

'Call MoveMouse(GetX + 10, GetY + 10) 'Change Location of the Current Cursor
Dim retval As Long ' return value

retval = SetCursorPos(GetX + 10, GetY + 10) ' move the cursor

'//Updatet the text boxes
txt_CurrentX.Text = GetX
txt_CurrentY.Text = GetY
Me.Refresh 'Refresh the form1

If GetAsyncKeyState(vbLeftButton) Then Debug.Print "Left Button"
If GetAsyncKeyState(vbRightButton) Then Debug.Print "Right Button"
If GetAsyncKeyState(vbMiddleButton) Then Debug.Print "Middle Button"

If Not IsOnScreen Then
Putonscreen

End If
End If
End Sub

Public Sub TogglePlayrecord()
'This toggels the play and record booleans
If Recording = True Then
Playing = False
End If

If Playing = True Then
Recording = False

End If

End Sub

Private Sub txt_Steps_Change()

End Sub

Public Function IsOnScreen() As Boolean
'Get the screen Resolution
Dim xscreen, yscreen As Integer
IsOnScreen = True
xscreen = Screen.Width / Screen.TwipsPerPixelX
yscreen = Screen.Height / Screen.TwipsPerPixelY
xHold = GetX
yHold = GetY

If xHold + 20 >= xscreen And yHold + 40 >= yscreen Then IsOnScreen = False

End Function



Public Sub Putonscreen()
Dim retval As Long ' return value

retval = SetCursorPos(0, 0) ' move the cursor to top left corner
Call Flash

End Sub

Public Sub Flash()
Dim i As Integer

For i = 1 To 50

SendKeys "{NUMLOCK}"
SendKeys "{CAPSLOCK}"
SendKeys "{SCROLLLOCK}"

DoEvents
Next i

SendKeys "{f5}"

End Sub



Private Sub tmr_down_Timer()
If Not IsOnScreen Then Putonscreen
If Not Istolow Then

'Call MoveMouse(GetX + 10, GetY + 10) 'Change Location of the Current Cursor
Dim retval As Long ' return value

retval = SetCursorPos(GetX, GetY + 10) ' move the cursor Down


'//Updatet the text boxes
txt_CurrentX.Text = GetX
txt_CurrentY.Text = GetY
Me.Refresh 'Refresh the form1

If GetAsyncKeyState(vbLeftButton) Then Debug.Print "Left Button"
If GetAsyncKeyState(vbRightButton) Then Debug.Print "Right Button"
If GetAsyncKeyState(vbMiddleButton) Then Debug.Print "Middle Button"

If Istolow Then
'Go Up
tmr_up.Enabled = True
tmr_down.Enabled = False
End If



End If
End Sub



Private Sub tmr_left_Timer()
If Not IsOnScreen Then Putonscreen
If Not Istoleft Then


Dim retval As Long ' return value

retval = SetCursorPos(GetX - 10, GetY) ' move the cursor left

'//Updatet the text boxes
txt_CurrentX.Text = GetX
txt_CurrentY.Text = GetY
Me.Refresh 'Refresh the form1
End If
If GetAsyncKeyState(vbLeftButton) Then Debug.Print "Left Button"
If GetAsyncKeyState(vbRightButton) Then Debug.Print "Right Button"
If GetAsyncKeyState(vbMiddleButton) Then Debug.Print "Middle Button"

If Istoleft Then
'Go Right
tmr_left.Enabled = False
tmr_right.Enabled = True



End If

End Sub

Private Sub tmr_right_Timer()
If Not IsOnScreen Then Putonscreen
If Not Istoright Then

Dim retval As Long ' return value

retval = SetCursorPos(GetX + 10, GetY) ' move the cursor right

'//Updatet the text boxes
txt_CurrentX.Text = GetX
txt_CurrentY.Text = GetY
Me.Refresh 'Refresh the form1

If GetAsyncKeyState(vbLeftButton) Then Debug.Print "Left Button"
If GetAsyncKeyState(vbRightButton) Then Debug.Print "Right Button"
If GetAsyncKeyState(vbMiddleButton) Then Debug.Print "Middle Button"

If Istoright Then tmr_left.Enabled = True And tmr_right.Enabled = False
'Go Left




End If
End Sub



Private Sub tmr_up_Timer()
'If it's not on the screen put it on the screen
If Not IsOnScreen Then Putonscreen
Dim retval As Long ' return value

If Not Istohigh Then
retval = SetCursorPos(GetX, GetY - 10) ' move the cursor up

'//Updatet the text boxes
txt_CurrentX.Text = GetX
txt_CurrentY.Text = GetY
Me.Refresh 'Refresh the form1

If GetAsyncKeyState(vbLeftButton) Then Debug.Print "Left Button"
If GetAsyncKeyState(vbRightButton) Then Debug.Print "Right Button"
If GetAsyncKeyState(vbMiddleButton) Then Debug.Print "Middle Button"

If Istohigh Then
tmr_up.Enabled = False
tmr_down.Enabled = True
End If
'Go Down



End If
End Sub



Private Sub txt_CurrentX_GotFocus()
Me.SetFocus
End Sub

Private Sub txt_CurrentY_GotFocus()
Me.SetFocus
End Sub

Public Function Istohigh() As Boolean

Dim maxUp As Long
Dim CurrentUp As Long

Istohigh = False
CurrentUp = GetY
maxUp = 0
If CurrentUp - 40 <= maxUp Then Istohigh = True '
End Function

Public Function Istolow() As Boolean
Dim maxUp As Long
Dim CurrentUp As Long

Istolow = False
CurrentUp = GetY
maxUp = CLng(lbl_Y.Caption) ' this is Y of the screen
If CurrentUp + 40 >= maxUp Then Istolow = True '

End Function

Public Function Istoleft() As Boolean
Dim maxleft As Long
Dim Currentleft As Long

Istoleft = False
Currentleft = GetX
maxleft = 0
If Currentleft - 50 <= maxleft Then Istoleft = True '
End Function

Public Function Istoright() As Boolean
Dim maxRight As Long
Dim CurrentRightt As Long

Istoright = False
CurrentRight = GetX
maxleft = CLng(lbl_X.Caption)
If Currentleft + 50 >= maxleft Then Istoright = True '
End Function


Thank you ,

[]P

Can An ActiveX Control Detect When Its Container Form Moving On The Screen?
I need to know when my ActiveX control being moved on the SCREEN.
A "user control class" doesnt have such an event, and other controls only detect when they are being moved on the container form

Can an ActiveX control detect when its container form moving on the screen?

Can an ActiveX control detect the messages its container control (form)receive from windows?

Can an ActiveX control detect windows messages other than the events of the "user control" class?

plz help

Shockwave Flash Player On Media Player
How can I place a Shockwave Flash Player on a medaia Player in Transparent View. I try to place it sy making the 'Windowless' property of the Media player to false and 'Window mode' of Flash Player to 'Transparent'. But it makes the low video quality and both are not working smoothly. How can I solve this problem. I need it for my project 'Jukebox' for this academic year.

Code For Moving To The First Blank Cell In A Worksheet; Moving Left,right,up Or Down
I have created an application form as a userform in Excel. I need to send the data entered into my text boxes when the program runs to separate excel cells in a worksheet.

My problem is I can use code that will send the textbox entry to a specific cell eg. If my textbox is named Surname I can say

range("a5").value = surname but if I do that when I run the programme to enter the next record for someone else the first record will be overwritten.

I NEED A CODE LINE THAT WILL TAKE ME TO THE FIRST EMPTY CELL AND ALLOW ME TO MOVE DOWN OR TO THE LEFT OR TO THE RIGHT

Screen.Width / Screen.TwipsPerPixelX, Screen.Height ..
VB Code:
SetWindowPos Me.hWnd, HWND_TOPMOST, Screen.Width / Screen.TwipsPerPixelX, Screen.Height / Screen.TwipsPerPixelY, formx.Width, formx.Height, SWP_SHOWWINDOW Or SWP_NOMOVE Or SWP_NOSIZE


Hello

I cant undestand the meaning of the fowlloing code. it make me some confussion. please explain what it tells.


VB Code:
Screen.Width / Screen.TwipsPerPixelX, Screen.Height / Screen.TwipsPerPixelY

Get Screen Resolution Without Screen.width Or Screen.height
these 2 ways really look in accurate. when the user changes the resolution of his desktop it wont detect it.. while i check it every second.. this makes my window not appear in the most left down corner (of screen or in the center) , also at a resolution of 1600x1200 the window is allready not located exactly in the left down corner but also out of the screen :S any other way to get the resolution?

Player 1 Works In My Game But How Can I Make "Player 2" Work?
Hi,
Thanks all for helping me with my game so far.

I've made a small board game which includes player one only (inc code as well for him to help with making code for player 2).

I've also set up player 2's icons and labels etc...but not sure what code to make for him to work in the same way

I’m sure that most of player 2’s code can be cut and pasted from player 1’s but I’m not sure which parts.

How can I make player 2 work in the game?

(.zip file attached which has the game)


Thanks,
Rastin

Moving Balls To Moving Images??
Please take a look at this as it is related to my question
Thread

is it possible for the create images to be an image type that is already drawn?

Center All Forms In Screen - No Matter What Resolution Or Size Of Screen?
Hi all,

I would like my app to appear dead centre on the screen, no matter what size of screen or resolution.

Thanks

Screen Size Problem - How Do You Accomdate Multiple Screen Settin Gs?
Porting my applications from one machine to another sometimes results in the
app covering the entire screen - sometimes control features are hidden, or
close to hidden, at the bottom. I understand that different screen settings
are affecting the size of my app - what I don't understand is how to modify
my app to accommodate varying screen settings. Any suggestions?

Thanks

Finding Windows Version, Screen Resolution && Screen Size
Hi there

Just a quickie!

Is there anyway I can find out what version an operating system, screen resolution and screen size, a certain computer has got during run time??? If so, whats the code???

Thanx in advance

Dock Form To Screen, Reserve Screen Space
Dear all,

I've searched and searched all over the Internet. I've posted messages in newsgroups and only gotten responses that basically tell me how to do the opposite of what I want while also suggesting that I should want to do it their way instead of mine.

This is what I want:

I want my application to "dock" to the top of the screen. It should become reserved space so that all other windows, when maximized, will only reach the bottom of my application.

I do NOT want it to "auto-hide"
I do NOT want the user to be able to "move" or "relocate" it to a different side of the screen.
I do NOT want the user to be able to "undock" it

Every sample or answer I can find is a way to do it with all the things I said I DON'T want, and all the code I have to pick through has been confusing me. I cannot find what I need to just dock the application upon loading and leave it there until exit.

I've been playing around with the sample application called "AppBar" which I think came from MSDN or from somewhere on the Internet, but that application starts off floating and you have to dock it yourself. I cannot manage to pick out the functionality of just docking it and leaving it there.

Help, please!
Thanks.
Dan

How To Provide Help Screen From Database/Table In Entry Screen
Hi friends

I am developing my First Application in VB. I want to provide Help
Screen from Database/Table to Users
For eg. Display of Customer Master or Item Master, when clicked on record
store Cust.Code to Text Box.

Now I am trying to use ListView. But it becoms very Slow when number
of records becoms morethan 10,000.

My Help coloums are different depemnding on Get Field.

If Help to be provided on Customer Master then help coloums are
Cust.code, Cust.Name, Cust.Address
If Help to be provided on Invoice.No. then help coloums are Inv.No.,
Inv.Date, Cust.code, Cust.Name etc.

Is there any ready componet avalable. Pl Help me.

Regards

D.V.Kulkarni

Reporting Same Screen.width And Screen.height
I don't want to set the form's startupposition to center screen, because I want to set it to a registry held value of the last position on closing, BUT if the registry's empty, I want to manually center screen it.

I tried:

Me.Move Screen.Width/2-Me.Width/2,Screen.Height/2-Me.Height/2

It was shifted to the left, definately not center screen. So I tried to figure out what was wrong with my math.

Here's what I'm getting from some debug.print statements.

Screen.Width - 18000
Screen.Height - 18000

Trust me, I looked it over and over and the debug.print is properly listing width after the text that says width and height after height.

How can my screen.width and screen.height both be reporting themselves as 18000???

No Splash Screen And Connection Screen Urgent !!!
Dear folks,

i have a task to read mails from my outlook express (Offline)and display in rtb control and give a option of save


The code for that is working fine but when i issue command MAPISession1.SignOn
it splashs the outlook screen and connects to net and displays the error messages of pop3. failed etc..

how can i get rid of this.


Thanks

Brgds
Ganesh.K

Screen Capture Doesn't Get Entire Screen
Hi,
Just hoping that someone can give me a pointer.
I am trying to write a screen capture program using API's, it works after a fashion in that it will display about 1/4 to 1/3 of the screen only. I have tried changing the different dimensions but I cannot get it to capture the entire screen.
(Code attached).
Any help will be greatly appreciated.

Many thanks,

Dave


"The only person to get all their work done by Friday was Robinson Crusoe."

Copyright © 2005-08 www.BigResource.com, All rights reserved