100分请高手帮看代码!!!
请教如何将以下的VB代码译成delphi代码:特别是第3行和第6行。
1) Dim PassChar As Byte
2) Dim PassWord As String
3) PassWord = String(256, Chr(0))
4) PassChar = SendMessage(Ihwnd, EM_GETPASSWORDCHAR, 0, 0)
5) Call PostMessage(Ihwnd, EM_SETPASSWORDCHAR, 0, 0)
6) Call SendMessage(Ihwnd, WM_GETTEXT, 256, ByVal PassWord)
7) Call PostMessage(Ihwnd, EM_SETPASSWORDCHAR, PassChar, 0)
8) GetText = PassWord
为什么老是出错。。。
第6行的Byval是不是该参数按值传递的意思?在delphi中应如何表示???
先谢了!!!