Lock the Rich Text Box Control

Printable View

Mar 31st, 2004, 02:36 PM
DarkX_Greece

Lock the Rich Text Box Control

If you use RichTextBox1.Locked = True property the RichTextBox is not totally Locked.

For example i locked the richtextbox with an image inside and i still resized the image and delete it but i couldn't type anything! Is there any way to lock Rich Text Box control in all properties?
(Text, Images etc)
Mar 31st, 2004, 03:31 PM
timeshifter

I'm not in VB right now, so my info is probably faulty, but have you tried the "Enabled" property?
Mar 31st, 2004, 03:47 PM
DarkX_Greece

Enable = False property does not allow user to click on Rich Text Box and i don't want something like this! But thanks for help!

If you find something else then please send it!
Mar 31st, 2004, 03:57 PM
manavo11

Might not be the best but when you are done with all the adding data, have the exact same text/images in another RTB and in the change event of the main RTB you show, set the data to the data of the hidden RTB... Of course, it's not the best solution and it could have flickering...
Apr 1st, 2004, 08:13 AM
DarkX_Greece

I wouldn't be a good idea because it would be too slow!

Any other ideas?
Apr 2nd, 2004, 04:27 AM
manavo11

How would LockWindowUpdate work? I don't have VB now to try it...
Apr 2nd, 2004, 07:53 AM
DarkX_Greece

I don't have idead for what are you talking about! I don't know this!

VB Code:

Declare Function LockWindowUpdate Lib "user32" Alias "LockWindowUpdate" (ByVal hwndLock As Long) As Long

Pass the RTB's hwnd...

Apr 3rd, 2004, 05:26 AM
Pc_Madness

I had a similar problem for a chat program that I was making, and the only solution was to enable = false it.
Apr 3rd, 2004, 06:51 AM
DarkX_Greece

Manavo11, and how to unlock it then?
Apr 3rd, 2004, 07:11 AM
aafuss
Quote:
Originally posted by manavo11

VB Code:

Declare Function LockWindowUpdate Lib "user32" Alias "LockWindowUpdate" (ByVal hwndLock As Long) As Long

Pass the RTB's hwnd...
Very simple and easy to use code.
Apr 3rd, 2004, 04:53 PM
manavo11
Quote:

Originally posted by DarkX_Greece
Manavo11, and how to unlock it then?
VB Code:
```
LockWindowUpdate 0&
```
Apr 4th, 2004, 01:39 PM
DarkX_Greece

Thanks Manavo11! ( I am not good on API coding)
I like most the math coding!
Apr 5th, 2004, 04:18 PM
manavo11

No problem ;) So it works?
Apr 5th, 2004, 05:22 PM
DarkX_Greece

No!!!

I have a code:

LockWindowUpdate 0& 'This for unlocking the rtb
'There is some code here...for example....
RichTextBox.SelRtf = "\b Hello\b0"
LockWindowUpdate RichTextBox.hWnd 'This for locking the rtb

But there is nowhere Hello , that it should be in the RTB!

What is the wrong in the whole thing?
I can't make it work!
:confused:
Apr 5th, 2004, 10:36 PM
Pc_Madness

Fiddling with the RTF will only end in tears mate. ;)

Might I suggest instead,

RTB1.Selstart = whatever
RtB1.sellength = len(ofword)
RTB1.SelBold = True
Apr 5th, 2004, 11:31 PM
chemicalNova
You will probably need a DoEvents in there somewhere. As MartinLiss pointed out to me in another post, LockWindowUpdate will store everything that happens to the object, and once you pass 0& to LockWindowUpdate again (to 'unlock' it), all the changes that were stored will take place. Also, with LockWindowUpdate, it will automatically stop when you move the window (application window). You will need something like this:

You also may want to use UpdateWindow to unlock it, as LockWindowUpdate 0& doesn't seem to work everytime (for me anyway):
VB Code:
```
Declare Function UpdateWindow Lib "user32" (ByVal hwnd As Long) As Long
```
Phreak
Apr 6th, 2004, 07:43 AM
DarkX_Greece

Use the UpdateWindow decalere function with LockWindowUpdate declare function! Can i lock a RichTextBox control through UpdateWindow? Or only to unlock it?