[RESOLVED] Textbox Cursor Size

[Sean.Downes]

Would anyone know how to change the size of the cursor (IBeam) for a textbox, i.e: The blinker at the beginning of the textbox to the size of at least one character.

Cheers

[jmcilhinney]

Do you actually mean the width?

[Sean.Downes]

Yeah ive seen the cursor change event and ive tested some sorta of coding that i thought might work but didn't (probably isnt even the right one) aha

[jmcilhinney]

What you see in a TextBox is not the cursor in that sense. Anything to do with the cursor in WinForms is related to the mouse pointer. What you're talking about is called the caret.

This code is C# but it seems to address what you want to do:

http://stackoverflow.com/questions/6...nforms-textbox

[Sean.Downes]

cheers for that although i have no idea how C# works so i wouldnt be able to convert it into vb.net

[CoachBarker]

google convert C# to vb.net, then copy and paste

[Sean.Downes]

oh yes thats great. although now im placing the code in the form and its generated a load of issues for other tools. so i didnt save the program so i must be doing something wrong. heres the code: just to confirm, where does each bit go, i tried it and it nearly mucked up the whole thing.

Public Partial Class Form1
	Inherits Form
	<DllImport("user32.dll")> _
	Private Shared Function CreateCaret(hWnd As IntPtr, hBitmap As IntPtr, nWidth As Integer, nHeight As Integer) As Boolean
	End Function
	<DllImport("user32.dll")> _
	Private Shared Function ShowCaret(hWnd As IntPtr) As Boolean
	End Function

	Public Sub New()
		InitializeComponent()
	End Sub

	Private Sub Form1_Shown(sender As Object, e As EventArgs)
		CreateCaret(textBox1.Handle, IntPtr.Zero, 10, textBox1.Height)
		ShowCaret(textBox1.Handle)
	End Sub
End Class

[jmcilhinney]

cheers for that although i have no idea how C# works so i wouldnt be able to convert it into vb.net

C# works pretty much the same as VB but with a C-based syntax rather than a BASIC-based syntax. For instance, that code has a handler for the form's Shown event, just as you would in VB. It uses the DllImport attribute to decorate Windows API functions, just as you would in VB. Etc.

[jmcilhinney]

oh yes thats great. although now im placing the code in the form and its generated a load of issues for other tools. so i didnt save the program so i must be doing something wrong. heres the code: just to confirm, where does each bit go, i tried it and it nearly mucked up the whole thing.

Public Partial Class Form1
	Inherits Form
	<DllImport("user32.dll")> _
	Private Shared Function CreateCaret(hWnd As IntPtr, hBitmap As IntPtr, nWidth As Integer, nHeight As Integer) As Boolean
	End Function
	<DllImport("user32.dll")> _
	Private Shared Function ShowCaret(hWnd As IntPtr) As Boolean
	End Function

	Public Sub New()
		InitializeComponent()
	End Sub

	Private Sub Form1_Shown(sender As Object, e As EventArgs)
		CreateCaret(textBox1.Handle, IntPtr.Zero, 10, textBox1.Height)
		ShowCaret(textBox1.Handle)
	End Sub
End Class

Get rid of the constructor and the event handler actually has to hand the event. Try creating a handler for the Load event, or any event for that matter, and you'll see the obvious difference.

[Sean.Downes]

oh geee, i have no idea, im not a very good at programming, i barely know the basics :/ thanks anyhow for your help appreciated

[dunfiddlin]

Public Class Form1
    Declare Auto Function CreateCaret Lib "user32" (hWnd As IntPtr, hBitmap As IntPtr, nWidth As Integer, nHeight As Integer) As Boolean
    Declare Auto Function ShowCaret Lib "user32" (hWnd As IntPtr) As Boolean
 
    Private Sub Form1_Shown(sender As System.Object, e As System.EventArgs) Handles MyBase.Shown
        CreateCaret(TextBox1.Handle, IntPtr.Zero, 10, TextBox1.Height)
        ShowCaret(TextBox1.Handle)
    End Sub
End Class

[Sean.Downes]

Hi thanks, this works great but for some reason it adds the text im typing into a different textbox, ive checked the code just incase i put the wrong textbox number and i definently havent and also when i click a different textbox it returns to the normal skinny blinker

thank

[Joacim Andersson]

Only one control can own the text caret at the time so Windows will automatically destroy and recreate the caret when you move focus between controls. Move the two lines of code from the Form_Load event to the GotFocus event of the TextBox in question.

[Sean.Downes]

Works perfect thanks!