如何使用 F# 中的 SendMessage？

发布于 2024-12-22 21:57:40 字数 431 浏览 2 评论 0原文

我想使用此处的代码来暂停我使用 F# 编写的代码中富文本框的屏幕刷新。我不知道如何使用 SendMessage （或 WM_SETREDRAW 或 EM_GETEVENTMASK ）。如何声明和使用 F# 中的相关函数？

代码：

private void StopRepaint()
{
    // Stop redrawing:
    SendMessage(this.Handle, WM_SETREDRAW, 0, IntPtr.Zero);
    // Stop sending of events:
    eventMask = SendMessage(this.Handle, EM_GETEVENTMASK, 0, IntPtr.Zero);
}

原文

I would like to use the code here to suspend screen refresh of a rich text box in code I am writing using F#. I don't know how to use SendMessage (or WM_SETREDRAW or EM_GETEVENTMASK for that matter). How can I declare and use the relevant functions from F#?

The code:

private void StopRepaint()
{
    // Stop redrawing:
    SendMessage(this.Handle, WM_SETREDRAW, 0, IntPtr.Zero);
    // Stop sending of events:
    eventMask = SendMessage(this.Handle, EM_GETEVENTMASK, 0, IntPtr.Zero);
}

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

惟欲睡 2024-12-29 21:57:40

Msdn 文档介绍了如何在 F# 中声明外部函数。

您的函数看起来会是这样喜欢：

open System
open System.Runtime.InteropServices

module InteropWithNative =
    [<DllImport(@"User32")>]
    extern IntPtr SendMessage(IntPtr hWnd, int Msg, IntPtr wParam, IntPtr lParam)

Msdn documents how to declare external functions in F#.

Your function would look something like:

open System
open System.Runtime.InteropServices

module InteropWithNative =
    [<DllImport(@"User32")>]
    extern IntPtr SendMessage(IntPtr hWnd, int Msg, IntPtr wParam, IntPtr lParam)

回复收藏 0 原文

~没有更多了~