如何更改主机托盘尺寸?

时间:2014-07-09 14:00:39

标签: vb.net

我有控制台应用程序,我需要更改插入符号大小。但它不起作用。 我使用了以下函数:http://msdn.microsoft.com/en-us/library/windows/desktop/ms648399%28v=vs.85%29.aspx

这是我的代码:

Module MyApplication
    ' Functions
    Private Declare Function CreateCaret Lib "user32.dll" _
        (ByVal hWnd As Integer, ByVal hBitmap As Integer, _
         ByVal nWidth As Integer, ByVal nHeight As Integer) As Boolean

    Private Declare Function ShowCaret Lib "user32.dll" _
        (ByVal hWnd As Integer) As Boolean

    Private Declare Function SetCaretPos Lib "user32.dll" _
        (ByVal X As Integer, ByVal Y As Integer) As Boolean

    Sub Main()
        CreateCaret(Process.GetCurrentProcess().MainWindowHandle, 0, 20, 8)
        SetCaretPos(0, 0)
        ShowCaret(Process.GetCurrentProcess().MainWindowHandle)
        Console.ReadLine()
    End Sub 
End Module

知道可能是什么问题吗?

谢谢

1 个答案:

答案 0 :(得分:0)

你使用了错误的功能。控制台不是普通窗口,不能视为一个。

您需要使用特定于控制台的功能,例如SetConsoleCursorInfoSetConsoleCursorPosition

您可以在Consoles (Windows)

下的MSDN网站上找到有关控制台,可用于使用它的功能和类型以及使用这些功能和类型的示例(主要是C和C ++)的信息。