Visual Basic :: Help Me How Can I Move Two Shaped Form Simultenously/concurrently

Shaped Form Help
i have tried to make shaped forms, and succeeded also, but by just getting code from some other source and copying and using it...
problem is

most part of the code i dont understand, i know use of api but to be honest really i cant understand most of it

can anyone helpme to explain in easy steps what does all that stuff means, or any place i can find it, step by step, for dummies like me.....

thanks

Odd Shaped Form
Any idea how I could get a form to look like the (bad) sketch below? I want a close button, a minimize button and a help button in the tab section. I also want the tab to be the same colour as the rest of the form (white)
______________
________/____|
|____________|
|____________|
|____________|
|____________|
|____________|
|____________|
|____________|

Thnx in Advance

Vb Shaped Form
does anyone knows where can i find the "vb shaped form creater" program?

Shaped Form Through API
how i can shaped a form through API

Form Shadowing On A Custom-shaped Form...
Well, I'm a bit stumped here...

I've found some valuable source on creating semi-transparent drop shadows on VB forms; however, none of them appear to work properly on custom shaped forms. What I'm trying to do, is create a custom splash (similar to the semi-transparent & shadowed splash of Fruity Loops).

I can get the custom shape, and form transparency down; however, the shadows draw as if the form is still rectangular (appears along the edge where the form would be, if it were visible). I tried having the shadow create after the form paints; however, it doesn't help... still the same issue!

Can anybody point me in the direction on where I can find a solution to this! Thanks...

Respectfully,

Eric D. Brown

Picture Shaped Form
Hello,

I want my form to have the shape of a picture. So first I tried with SetLayeredWindowAttributes, without any succes. Some parts are transparent, but there's I line of the bg-color of the form around the picture. ( See demo below )

Second I tried it with BitBlt, The picture is showing ok, but the bg-color is still visible... How can i make my form have the shape of the picture??
I have placed my project below.

Sphere-Shaped Form
I'm trying to create a sphere shaped form (Not circle-shaped). I don't know why this code doesn't work right (I want it to be a black sphere that fades to white when it gets to the center):

Option Explicit
Private Declare Function CreateEllipticRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
Private Declare Function SetWindowRgn Lib "user32" (ByVal hwnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long
Private Declare Function DeleteObject Lib "gdi32" (ByValhObject As Long) As Long
Private Declare Function ReleaseCapture Lib "user32" () 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
Dim lngRgn As Long
Public gapx As Single
Public gapy As Single

Private Sub Form_Activate()
Dim i As Long
For i = 0 To Me.ScaleWidth
Me.ForeColor = RGB(i, i, i)
Me.Circle (Me.ScaleWidth / 2, Me.ScaleHeight / 2), i, , , , 1
Next i
End Sub

Private Sub Form_Load()
Me.Height = Screen.Height
Me.Width = Screen.Width
Me.Width = Me.Height
lngRgn = CreateEllipticRgn(0, 0, ScaleX(Me.Width, vbTwips, vbPixels), ScaleY(Me.Height, vbTwips, vbPixels))
End Sub

Private Sub Form_Resize()
Call SetWindowRgn(Me.hwnd, lngRgn, True)
End Sub

Private Sub Form_Unload(Cancel As Integer)
Call DeleteObject(lngRgn)
End Sub

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
gapx = X
gapy = Y
End If
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
On Error Resume Next
If Button = 1 Then
Form1.Move Form1.Left + X - gapx, Form1.Top + Y - gapy
End If
End Sub

I changed AutoRedraw to True and the BorderStyle equal to None.

Resizing A Shaped Form
Im using the attached code on a form. I am wondering how I would go about resizing the form along with the image.

Thanks.

SHAPED FORM PROGRAM!!!
This has to be the coolest program!!

http://members.fortunecity.com/alexv/

download: Shaped Form Creater

lets you draw shapes then it turns then into a shaped form!

A MUST HAVE !!!

Circular Shaped Form
ITtoolbox Portal for Visual Basic - http://visualbasic.ittoolbox.com/

Is it possible to create a form of Circular shape.
Does anyone have clue about this.

Thanks
Abizar

> ITtoolbox Portal for Visual Basic - http://visualbasic.ittoolbox.com/
>
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~~~~~~~~~~~~
>

How To Make Form Shaped Like 'donut'
How can we make VB form shaped like donut ?

Adding Manu To Shaped Form
hi
i have form with bitmap i want to make this resizeable and add manu on to it
please help me how can i do this
provide me code some body have

Form Caption Title Move && Move??
does everybody who can provide source code let me know how to make form caption title move & move??

add a timer control to count it moving.

caption title from left side move to right side, then form right side move to left side. repeat and repeat.

thanks!

here is small example which is title run & run, but I need it move & move.:

Code:
Public tit1 As String

Private Sub Form_Load()
tit1 = "This title can run and run!.......... "
Form1.Caption = title1
Timer1.Interval = 200
End Sub

Private Sub Timer1_Timer()
L = Len(tit1)
tit1 = Mid(tit1, 2, L - 1) + Left(tit1, 1)
Form1.Caption = tit1
End Sub

Move 1 Form..all Opened Forms Move With It
Hello,

I am trying to find documentation on how to have all opened forms move when moving 1 form. I have a project where up to 5 forms will be shown on the screen. Now if I move the main form I want all the other opened forms to move with it. I have been unable to find such documentation or links to pages where someone has done this to get an idea on how to do this. Thanks

2 Program To Run Concurrently.
hi

I have a sound recording function using the waveinopen API. I need to have this sound recording function to run in the background (able to continue recording) so that the main application can run other controls/functions at the same time. After the Main application has run some controls, there will be another function to stop the recording.

I tried using a pause function and its totally prevent recording of the sound file

I have read about timer and DoEvents in this forum but still cant figure out how to achieve the above.

Im using a standard exe project, without activeX. If the above can be achieve with timer and DoEVents, can someone show me how??

Any other alternatives i can try??

THks!!!

DSN Usage By ASP And A VB App Concurrently
Hello,

I am writing an VB6sp5 application and I would like to use a web (ASP)
interface for administrating the application. The application uses a
SystemDSN to connect to the Access database. Are there any issues with my
ASP pages using the same DSN and database concurrently? There is not a
chance of the two writing to the same table at the same time because what
the application writes to the db the ASP pages only read and vice versa.
Even though the two will never clobber data this application is going to be
heavily used.

Also, can someoone explain why one would use a FileDSN over a SystemDSN? Are
there any advantages either way?

Thanks,
Steve

Runtime SQL Server Concurrently
Hi..I know that the sql sever can reun concurrently. However i have some doubts on it. I am going to create a budget table...1) when a user put up a purchase requst form and select a category eg project A. From my database the latest total balance of amount should reflect on the form immediately. when the items he wish to puchase exceed this amount the system will reject the purchase raise. if its below the amount, the purchase is granted and will be deducted from the balance budget. And next time when the same category is selected, this lastest budget amount will be shown. My question is if two or more users going in to the same category, eg user1 is in the process of putting up the indent while user 2 is in the first form where he sees the current amount balance. And when user1 has been granted the purchase, the amount balance which will be deducted from his purchase should be the lastest budget balance. Will the form of user2 shows the lastest amount? menaing if user2 is on the first form, hold and wait, will the amount balance he sees changes from the current amount(time before user1 has successfully put up the indent) to the lastest amount (time after user1 successfully put up the indent)?
Will there be any complication to the database? Can if there are solution how do i resolve it?

Iterating Two Collections Concurrently
Hi,

How can I scan two collections in parallel as per below and retrieve each item in each collection?

VB Code:
For Each ctrl1 In col ... Next For Each ctrl2 In col00 ... Next Call Resizer(ctrl1, ctrl2, 0)

ADO Will Not Update Multiple Recordsets Concurrently??
I recently had the misfortune of developing a data migration routine for a project at work. I had the code all worked out using ADO and an OLEDB connection to an Access DB. The whole thing fell apart when I started testing it however. It seems with ADO you can't update more than one recordset at a time reliably. I kept getting an error message saying, Cannot update this record, this record is locked by (my computer name). 40% of the time the code ran without errors, the other 60 I got this error message.

Anybody know why? Is this an ADO thing or an OLEDB thing?

How To Select Multiple Items In A List Box Concurrently ?
Good day !

Let say I have a list box contains the following elements :

10
10
10
20
30
40
50
50

How can I program the code, to make it select all the items with 10 automatically when I click on any one of the element with 10 ?

I spend whole day thinking of it, but still cannot find any solution.

Help !

Thanks a lot !

SonicWave

How To Select Items In Multiple List Box Concurrently ?
Good day !

I just have a small problem here.

Let say I have 2 List Box in a form, each contain the same amount of items.

If I select an item in List Box #1 , how can I make it automatically select thehe item in the same row in List Box #2 ?

Is there any built-in properties that I can use ? or I have to program it manually ?

Thanks a lot !

Sonic Wave

Using OLE Container Control/Word Automation Concurrently
Hi everyone
I have some question about OLE and Word automation.
Is following possible?

Load OLE container control and open MS word automation by CreateEmbed method.
Once click some button(for example "edit" button), run Word Automation(update some part of word document automatically).
And then, once click another button(for example "save" button), that Word document file is saved.

What I'm wondering is whether Word automation of embeded MS Word by OLE container control is possible or not.

Could anybody help me?

Move Command Button Down Form And Add Form Height
Again...this should be simple but my oversimplified mind can't get it done.

I have a form with a command button on a control array.  I dynamically add additional elements of the control array based on the records of a recordset.

What I'm trying to do is:

1) make the form height taller to show all the reocrds and
2) move the command button down the form to stay below all the records.

my attempt

CODEcmdTop = cmdDone.Top
FormH = frmOperations.Height
chTop = chOps(0).Top
chLeft = chOps(0).Left
chHeight = chOps(0).Height

chOps(0).Caption = g_rsYield.Fields("OPERATION") & Chr$(32) & g_rsYield.Fields("description")

g_rsYield.MoveNext

Do Until g_rsYield.EOF

    frmOperations.Height = frmOperations.Height + 100
    FormH = frmOperations.Height

    cmdDone.Top = cmdDone.Top + 100
    cmdTop = cmdDone.Top

    'load the new check box in the dynamic array
    Load chOps(chOps.ubound + 1)
        With chOps(chOps.ubound)
            .Top = chTop + chHeight + 100
            chTop = .Top
            .Visible = True
        End With

    'Load the data in the newly added checkbox
    chOps(chOps.ubound).Caption = g_rsYield.Fields("OPERATION") & Chr$(32) & g_rsYield.Fields("description")

    g_rsYield.MoveNext

Loop

Making A Child Form Not Move Within A MDI Form
How can you make a form not move within another form. I have created an Outlook type toolbar and I wish for it not to move within my MDI form. How is this done?

Thanks in advance,
Jeff

How Can I Put My Second Form Alway Behind My First Form And Move Both Togather
how can i put my second form alway behind my first form and move both togather

hi
i have two shaped windows and want to develop my application like default windows media player skins or jet audio skin
as when uer click button other portion of application is visible by being animating
and other problem is how can i put my second windows always behind my first form even some portion of my second form is visible
when i click it it must be activated but does not come in front
and other problem i have two skin form if i move one form my second for will automatically move with it
please help me in my these problums

How Can I Put My Second Form Alway Behind My First Form And Move Both Togather
hi
i have two shaped windows and want to develop my application like default windows media player skins or jet audio skin
as when uer click button other portion of application is visible by being animating
and other problem is how can i put my second windows always behind my first form even some portion of my second form is visible
when i click it it must be activated but does not come in front
and other problem i have two skin form if i move one form my second for will automatically move with it
please help me in my these problums

Can A Form Have Scrollbar To Move Up And Down The Form
How do u print a bill.
I am designing a form to generate a bill for sell.I plan to print the form using printform method.
The eproblem is the bill format's height is more than the allowed height of a form.
can i use a scrollbar in the form to increase the height of the form so that it can accomodate what i want?
is there any better way to what i want?
Can i use a web Browser kind of thing to do this. can i access the elements of a browser form from within the vb code and print it.
PLease help

Move Frame From Form A To Form B?
Are we allow to move a control, for example move a frame from Form A to another Form B?

Below is the code I've so far:

Code:
Dim lForm As Form

Set lForm = frmTab
' The name of the TabStrip is "TabStrip1."
' The Frame control is named "frame1."

With lForm.frame1(0)

.Move frmMain.TabStrip1.ClientLeft, _
frmMain.TabStrip1.ClientTop, _
frmMain.TabStrip1.ClientWidth, _
frmMain.TabStrip1.ClientHeight
End With

Set lForm = Nothing

The frame is remain at the frmTab after I run the code...so I'm wondering is VB6 allow us to do this....

Move Borderless Form Within Another Form
hello

I was wondering how to move a borderless form but only within the area of another borderless form.

Thanx

Form Move
Hello,
I Have form border style 0-None
can i move form with mouse draging,like blue field in top of every windows form,but from Label or some control on form?

Thank`s RL

Form.move ?
I make a program designed for 800*600 rezolution monitor,and i wrote in form.load : Form.move 0,0.
But in rezolution 1024*768 i want to move my form to fit in the center of monitor.
Is something with Screen,but i don't have MSDN...

Move A Form, Together With An Other
Hi,

I trying to make some code to move one form, when other is moved. And, not when its droped, but together with the other.
so, like its attached to it.

i have this

Code:
Option Explicit
Private Declare Function ReleaseCapture Lib "user32" () 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 HTCAPTION = 2
Private Const WM_NCLBUTTONDOWN = &HA1
Private Const WM_SYSCOMMAND = &H112
Private Sub Form_Load()
Form2.Visible = True
End Sub
Private Sub SSTab1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
SendMessage Me.hwnd, WM_NCLBUTTONDOWN, HTCAPTION, 0&
End Sub
to move the first form, but i cant figure out how to make form2 move with it (or with +100 top) together with it.

Anyone know how to do this?

Gr. Ron

Move Around A Form
Hello

Sorry if this is a ridiculously basic question.

I have created a Form in Excel using Controls. It prompts the user to enter a variety of bits of information in text boxes embedded in the worksheets, and tick boxes and radio buttons. The info. entered is fed into a results sheet. There's some very basic code in there which allows users to press 'Forward' and 'Back' buttons to move around the sheets etc.

I am very pleased with my form, but one thing is driving me mad. The user cannot use the tab key to move from text box to text box! I have tried protecting the sheet and saving as a template, but that doesn't work. I have messed with tabindex, but have no idea how that works either. Am I missing something so basic that even my frantic searching on the internet cannot find it!

There's lots of talk of Tab Order, but this only seems to be relevant for User Forms, not where the worksheet itself is one big form.

Please help!!

On Form Move?
Is there such a thing as Form Move? I want to make another form move when my main form is moved. How could I do this?

Form Move
How can I tell when the user moves a form (not resizes) by dragging the titlebar?

Move Form
How can I move a form that has no caption bar and clip controls?
Of course, I have to move it by mouse (drag the whole form).

Form Move...
how to find out if a form is being dragged or moved ?

Move Form
as to move form without appearing the lines, making form to walk mouse together with?

Move Form Together
I have form1 and form2 show side by side.. When I move form1 to other location, the form2 still remain..Doesnt move.. Why?I want when I move form1, form2 move together .

Code:

Private Sub Form_Load()
'Position to the right of the main form
form2.Move Form1.Left + Form1.Width, Form1.Top
If (form2.Left + form2.Width) > Screen.Width Then
form2.Left = Screen.Width - form2.Width
End If
End Sub

Move A Form
Hi, all.

I wanted to move a form around the screen with my own custom code. I can already move the form, but on slower computers, there's a "drag" effect on the screen as the form moves that messes everything up. I would like to try the Windows 98 method of moving a form, which instead of moving the form, you move a rectangle in place of the form. When the mouse button is released, the form takes place of the rectangle and the rectangle vanishes.

Would anybody know how I could do this?

Thanks!

Move The Form
Hi,
Im making a GUI for my program instead of using the blue windows deafult one with the _, ♦, and X

how do i make an area that i can click and drag to move the forum?

thanks

Move Across Form
I have a grid that when double clicked adds something to my main form's grid. But the problem is this form is on top of my main form so no one can really see if the item was added or not.

I do NOT want to use a message box each time something is added...

But I do want to do the following. Is it possible to have say a label that reads "Component Added..." to scroll from one end of the form to the other and then disappear each time the component is added?

Something neat to that affect???

Jon

Help Me How Can I Move Two Shaped Form Simultenously/concurrently

hi i have two shaped form i want to move these two form simultanously mean if i move one formthen other form will move as i move first one please provide me some example code/demo code waiting for response

hi
i have two shaped form i want to move these two form simultanously mean if i move one form
then other form will move as i move first one please provide me some example code/demo code
waiting for response