test 2 - Visual Basic Discussion Boards

31-May-01 10:23

Thanks for your response.

Actually it is a Normal TextBox. I looked over the documentation on MSDN and found that there was a slight problem. I was passing lPoint as ClientCoordinates not ScreenCoordinates, so I fixed that, yet SendMessage is still returning -1.

MSDN Says....

"Edit controls: The low-order word contains the horizontal coordinate. The high-order word contains the vertical coordinate."

It appears that is what I am doing.....

GetCaretPos ptCaret

ClientToScreen txtPrice.hwnd, ptCaret

lPoint = (ptCaret.y * &H10000) Or (ptCaret.x And &HFFFF&)
lIndex = SendMessage(txtPrice.hwnd, EM_CHARFROMPOS, 0, lPoint)

If lIndex And &H8000& Then
nCharIndex = lIndex Or &HFFFF0000
Else
nCharIndex = lIndex And &HFFFF&
End If

Thanks
Chris Mancini

Re: Getting the Caret Location

Jason Teagle31-May-01 10:36

Jason Teagle

31-May-01 10:36

Ignore my rich edit comment... for some reason I thought you were passing lParam incorrectly, but you are not - my mistake.

I see no reason why this would not work then. You checked lPoint in hex to make sure it was formed right, did you? Other than that the only other reason I can think of that it would return this (it's actually returning two short integers, both -1: for line number and char number) is if there was no text in the control at the specified point... are you clicking within a portion you KNOW contains text, or are you cliking beyond the text it contains?

Re: Getting the Caret Location

31-May-01 10:45

Yes I did check the lPoint value in Hex. It was set up correctly.

I am not clicking in the control to trigger the code I am doing the code within KeyPress. I know the textbox has text. And I have tried it when the cursor is at the end of the text as well as in the middle of the text.

I am stumped.

Chris Mancini

Re: Getting the Caret Location

Jason Teagle31-May-01 10:52

Jason Teagle

31-May-01 10:52

I'm stumped too. If you had only tried with the caret at the end, I might have understood; MSDN also says:

"The index indicates the line delimiter if the specified point is beyond the last visible character in a line."

which might explain the -1.

But if you've tried it from the middle...

I'm not sure what you're trying to achieve, but an alternative might be to keep a copy of the text box's text each time a key is pressed. Then when the next key is pressed, you can get its current contents and compare to the contents saved from last time. That will tell you what character has been deleted or added...

Re: Getting the Caret Location

31-May-01 11:11

If you are interested I put together a simple demo which is shows this happening.

Chris Mancini

Re: Getting the Caret Location

Jason Teagle31-May-01 11:13

Jason Teagle

31-May-01 11:13

Yes, OK - throw it my way (jteagle@ntlworld.com). Tomorrow I can then take a look and see if I can spot anything (I'm on UK time). No guarantees though.

test

28-May-01 20:28

test

test

test 2

28-May-01 20:29

test 2

test 2

Hi Test Only

7-Jun-01 17:10

Hi ! I'm Lucky Luck, I'm student in Australia, I like programming with VB, I want to ask you anything :

When I creat any form, I don't know what to do in spite of form ? What will I do ?? Ex : Program : - Sonicque
- Herosoft
- ....anything Confused | :confused:

Re: Hi Test Only

Ulf Öhlén7-Jun-01 22:26

Ulf Öhlén

7-Jun-01 22:26

Well, you're not the only one who's confused here Wink | ;-)

What exactly are you trying to ask?

--------------
"Criticism is often constructive because it makes you feel superior when you give it"
-- Dogbert

Hi Test Only

7-Jun-01 17:11

Timer refresh?

Geoff Anderson28-May-01 1:28

Geoff Anderson

28-May-01 1:28

Hi
I've been trying to get a macro to refresh the formulae in a workbook (say every 10 seconds or so) to update a timer I've constructed. I will need to be able to run other macros while the timer is running.

Can anyone point me in the right direction please?

Thanks

Geoff Anderson

Re: Timer refresh?

Jarek G8-Jun-01 10:37

Jarek G

8-Jun-01 10:37

maybe the DoEvents will help you?

Qapla

Adding to chart data range

Geoff Anderson28-May-01 1:24

Geoff Anderson

28-May-01 1:24

Hi

I've been trying to find how to get a macro to adjust the size of a range of data that feeds a chart. I want the range to grow by one cell each time a new piece of data is logged.

Can anyone help please? Big Grin | :-D

Geoff Anderson

Re: Adding to chart data range

Eric Jacobsen20-Jun-02 12:31

Eric Jacobsen

20-Jun-02 12:31

I don't think this even uses a macro, but check out this example:

http://www.ozgrid.com/download/default.htm

Go to this site and download the ChartByMonth.zip example.

General System Information

25-May-01 0:22

Are there any VB functions, or is ther a way to retrieve general information about a PC. Information such as Make, Model, Monitor Make, Network Card Make and Model

Joe

Re: General System Information

jamesdturner@hotmail.com6-Jun-01 17:19

jamesdturner@hotmail.com

6-Jun-01 17:19

Assuming you are talking Microsoft OS...MS Diagnostics holds most of what you've mentioned if not all and you could possibly get that info from the registry.

I too would be interested in other methods to solve this problem.

Best to you...

\\Jim

General System Information
jamesdturner@hotmail.com

jamesdturner@hotmail.com

General System Information

25-May-01 0:21

Are there any VB functions, or is ther a way to retrieve general information about a PC. Information such as Make, Model, Monitoer Make, Network Card Make and Model

Joe

Creating Sub Properties in ActiveX Control

24-May-01 10:15

Is ther any one can tell me that how to creat a sub property in ActiveX control, like A recordset has sub properties and the TableDef has an array or properties and same with the fields.
I will obviously thankfull to you.
sameers
sameers@hangamahouse.com

Re: Creating Sub Properties in ActiveX Control

1-Jun-01 19:26

i think you mean something like this

in class, MyActiveXControl

<br />
Private m_sStringProperty as String<br />
<br />
...<br />
<br />
Public Property Get MyStringProperty() as String<br />
     MyStringProperty = m_sStringProperty<br />
End Property<br />
<br />
Public Property Let MyStringProperty(sSP as String)<br />
     ' Validate if you want<br />
     m_sStringProperty = MyStringProperty<br />
End Property<br />

You can also use 'Public Property Set' to have an object be a property and you can use Private to make your property read/write only as well.

James Johnson

--
There are two secrets to success. 1) Never tell anyone everything you know.

context sensitive help to bookmark

24-May-01 0:45

I understand how to go from a HelpContextID to an .htm file using the Map and Alias
tabs of the HTML Help Workshop.

Can one go from a HelpContextID to a bookmark in an HTML file?

Specifying

IDH_Helpme = file.htm#bookmark

does not work (It gives file file.htm#ookmark not found). Is there a syntax which does work?

thanks

nick toop

Scrolling a form

Waleed Eissa23-May-01 8:18

Waleed Eissa

23-May-01 8:18

Hello codegurus,

I have a deep problem with Visual Basic. I just started using it a few days ago so there's still a lot to learn (sorry for any dull questions). The problem is that I tried to put a lot of controls on a form that I had to change the height of the form to the maximum but still needed to put more controls so I thought it was best to add scroll bars to the form and just scroll the contents of the page. OK, now I have two problems; the first probelm is that I have resized the form to its maximum height but still need to add more controls, how can I change the height of the form after it reached its maximum (11520 twips on 1024x768 resolution)?! Do I have to create the controls dynamically? Or should I just place them anywhere then change their positions at run-time? the second problem is that I can't add scroll bars to the form (of course I could've used the scroll bar control but this is not what I want, I want to add the scroll bars to the window not as seperate controls). Should I use SetWindowLong() to change the style of the window at run-time? If I add the scroll bars how can I scroll the contents of the page?

Any suggestions would be appreciated.

Re: Scrolling a form

5-Jun-01 22:16

Hehe, Why not try EasyGrid ActiveX?
It'll be helpful.

I guess it can be found in the web.
But I forget the Url.

Try at altavista.com with the keyword of easygrid activex.

best wishes.

creatiing a login screen

22-May-01 7:59

Hi everyone...
I'm new at working around vba and i'm trying to figure out a way to secure a mde file using a access form at the begining of the program.

What it should do is check if the user has a registered key to access the main program file and allow him to work on the database.

And if he doesn't have a registered key, get him to call the client to obtain one.

So there's the the problem... i don't know where to start.

Can anyone help me with this?

Any example code is appreciated... Confused | :confused:

Re: creatiing a login screen

3-Jun-01 22:58

Hopefully it helps Big Grin | :-D

Private Sub cmdOK_Click()
1 Dim CNN As New ADODB.Connection
2 Dim RCS As New ADODB.Recordset
3 Dim CNNstr As String
4 Dim sqlstr As String
5 Open App.Path + "\" + "db\CNNstr.txt" For Input As #1
6 Input #1, CNNstr
7 Close #1
8 CNN.CursorLocation = adUseClient
9 CNN.Open CNNstr
10 sqlstr = "select * from TABLE where UserID = '" & Text1.Text & "' and UserPassword ='" & Password & "'"
11 RCS.Open sqlstr, CNN, adOpenForwardOnly, adLockReadOnly
12 If RCS.RecordCount > 0 Then
13 Form1.Show 1
14 Else
15 r = MsgBox("Unauthorised User")
16 Text1.SetFocus
17 End If
End Sub

1, 2, 3, 4 Declare variable
5 get the database path in text file
10 check whether the user exist and the password correct or not at once

Last Visit: 31-Dec-99 18:00 Last Update: 4-May-24 13:02

Refresh

ᐊ Prev 1...4802 4803 4804 480548064807 4808 4809 4810 4811 Next ᐅ

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.