Search:
Type: Posts; User: Bruno
Search:
Search took 0.26 seconds.
-
-
February 6th, 2001, 08:23 AM
' Form1 code
option Explicit
private Type Rect
Left as Long
Top as Long
Right as Long
Bottom as Long
End Type
private Type POINTAPI
X as Long
-
February 6th, 2001, 07:22 AM
To dinamically add control to a form, use:
option Explicit
Dim withevents ctlDynamic as VBControlExtender
private Sub Form_Load()
me.BackColor = vbBlue
set ctlDynamic =...
-
February 6th, 2001, 06:20 AM
Hi,
change
>circleObject.setDrawObject (picDisplay)
to
circleObject.setDrawObject picDisplay
or
Call circleObject.setDrawObject(picDisplay)
-
February 5th, 2001, 06:21 PM
We use arrays and collections most of the time. But you can create your own data structures:
http://www.devx.com/upload/free/features/vbpj/2000/05may00/fb0500/fb0500-1.asp
-
February 5th, 2001, 06:03 PM
Jase, I am not sure you did it right. You should try NOT to use Variant variables for strings and numbers, but you should use specific data types (String, Integer, Long,...) instead.
You should...
-
February 5th, 2001, 05:06 PM
public Function FormIsLoaded(frmName as string) as Boolean
Dim i as Integer
for i = 0 to Forms.Count - 1
If Forms(i).Name = frmName then
FormIsLoaded = true
...
-
February 5th, 2001, 02:25 PM
>the value in errVal is always 0. Now i figured this would be because i am passing errVal 'ByVal', when i should be passing it ByRef
Correct, pass it ByRef.
> - however, when i pass it...
-
February 5th, 2001, 01:04 PM
Use Frame control as container for your option boxes.
Set BorderStyle=0 for your Frame.
To disable option boxes on the frame, use : Frame1.Enabled = False
-
February 3rd, 2001, 08:24 AM
>very tiresome to declare all these api before i can use them
It is not - just use 'API Text Viewer' in Visual Studio 6.0 Tools program group.
Using type libraries can save few bytes in your...
-
February 3rd, 2001, 08:05 AM
Hi, Balki
You can do this if B is property of some object.
option Explicit
public PropOfObject as string
private Sub Form_Click()
Dim PropName as string
PropName = "PropOfObject"
...
-
February 1st, 2001, 10:51 AM
Form1; to test, change window sheme to e.g. "Rainy Day" and click on form.
option Explicit
private Declare Function GetSystemMetrics Lib "user32" (byval nIndex as Long) as Long
private Const...
-
January 31st, 2001, 11:12 AM
There is a limit on control names: 255 different control names on one form.
You can use control arrays, since the whole array uses one control name. E.g. you can load 32000 labels into one array,...
-
January 31st, 2001, 10:59 AM
option Explicit
private Const DBCP_FH_LENGTH as Long = 80 ' #define DBCP_FH_LENGTH 80
private szFHtext as string * DBCP_FH_LENGTH
private Sub Form_Click()
MsgBox len(szFHtext)
End Sub
-
January 31st, 2001, 10:37 AM
There is a very hardcore solution.
See: http://www.vbdotcom.com/FreeCode.htm (Call Pointer, class clsCallFunction)
Here is how to use that class instead of 'normal': lngReturn = GetDC(Me.hWnd)...
-
January 30th, 2001, 08:22 PM
> But how about this - My ActiveX has a property of Object type, that object has its own property.
> How to create this structure to be able to work with that property like this:
>...
-
January 30th, 2001, 08:19 PM
>What should I do to have the ability to work with all the properties, methods and events of constituent controls this way:
I don't think it is good, but it is possible.
You'll need one property...
-
January 27th, 2001, 04:36 PM
Hi, Stuart
>how I can read the horizontal position of a listview
option Explicit
private Declare Function GetScrollPos Lib "user32" (byval hwnd as Long, byval nBar as Long) as Long
private Const...
-
January 27th, 2001, 05:21 AM
If you want good performance, use ONLY 1-D arrays.
>Variant array
Are you sure you have good reason not to use specific data type?
>The array is not bound to any data control.
Huh??
>what...
-
January 25th, 2001, 05:40 PM
>... but is not visible ...
Then use InvisibleAtRunTime = True
-
January 25th, 2001, 04:07 PM
>ControlContainer=True
Oops, you don't need this property. :-)
-
January 25th, 2001, 04:03 PM
Set these properties of your control:
Alignable=True
ControlContainer=True
-
January 25th, 2001, 07:04 AM
Use Add method of Forms collection:
Forms.Add("Form1").Show
You'll need VB6 SP3 for Forms.Add to work. Without SP3 it won't work when compiled.
option Explicit
private Sub Form_Click()
...
-
January 23rd, 2001, 01:26 PM
If you didn't add some buttons recently, check Keycode when you press arrows on your keyboard, e.g.:
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Print KeyCode
End Sub
If...
-
January 23rd, 2001, 06:04 AM
I don't have the code, last time I tried, I was not able to use UpdateResource.
For setting any resource, I suggest automating your task with your Resource editor. Use Sendkeys to send commands to...
|
Click Here to Expand Forum to Full Width
|