Declare integer PostMessage in win32api as F_PostMessage Long ,Long ,Long ,string

isec=STR(Seconds(),10,5)
F_PostMessage (thisform.HWnd,1024+22,LEN(isec),isec )


Procedure OnProgress
Lparameters tnHWnd,tnwMsg,tnwParam,tnLparam
? SYS(2600,tnLparam,tnwParam) &&这句显示乱码，要如何才能显示正确的字符串
?tnwParam,tnLparam

EndProc



        /// 使用COPYDATASTRUCT来传递字符串
        /// </summary>
        [StructLayout(LayoutKind.Sequential)]
        public struct COPYDATASTRUCT
        {
            public IntPtr dwData;
            public int cbData;
            [MarshalAs(UnmanagedType.LPStr)]
            public string lpData;
        }

[此贴子已经被作者于2023-12-22 09:53编辑过]

第4个参数用字符串地址

问下，使用postmessage 设置字符串时
会出错，这是什么问题

For x=1 to 10


imessagestring=TEXTMERGE("<<Datetime()>> <<Seconds()>> <<x>> <<nMax>> <<this.Pro>> ")
F_PostMessage(this.ParentHwnd,this.ParentMsg,LEN(imessagestring),imessagestring) &&通知主程序

*!*    isec=STR(Seconds(),10,5)
*!*    SendMessage(this.ParentHwnd,this.ParentMsg,LEN(isec),isec )

For y =1 to 200
*!*    Activate Screen
?Seconds()
EndFor
EndFor

不能在FOR 中使用字符类型的消息传递吗？

参见2楼

方案一：传递String，接收方可直接接收字符串
方案二：传递String的内存地址，接收方从 发送方 该地址读取内存内容。
楼主SYS(2600,)是读取接收方本进程内存，传递的肯定是发送方的内存地址，所以读取的内容不对。接收方可用OpenProcess(0x1F0FFF,0,发送方pid)+ReadProcessMemory()跨进程读取。

postMess int 可以