VB与delphi翻译问题
VB的两行：
Const PROCESS_QUERY_INFORMATION = &H400
Const STILL_ALIVE = &H103
翻译成Delphi怎么写？
Const
PROCESS_QUERY_INFORMATION = $400;
STILL_ALIVE = $103;
谢谢~接着问
VB
Call CloseHandle(hProcess)
关闭进程hProcess
翻译成Delphi怎么写？
VB代码：
hProcess = OpenProcess(PROCESS_QUERY_INFORMATION, 0, pid)
Do
Call GetExitCodeProcess(hProcess, ExitCode)
DoEvents
Loop While ExitCode = STILL_ALIVE
Call CloseHandle(hProcess)
翻译成Delphi 该这么写？
PROCESS_QUERY_INFORMATION 和 STILL_ALIVE 的定义我会了~其他的呢？
hProcess = OpenProcess(PROCESS_QUERY_INFORMATION, 0, pid)
repeate
GetExitCodeProcess(hProcess, ExitCode) ;
DOEvents;
until ExitCode = STILL_ALIVE
CloseHandle(hProcess) ;
Delphi(Pascal) code:
hProcess := OpenProcess(PROCESS_QUERY_INFORMATION, 0, pid);
repeat
GetExitCodeProcess(hProcess, ExitCode);
Application.ProcessMessages;
until ExitCode <> STILL_ALIVE;
CloseHandle(hProcess);
相关问答：
我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
MouseWait()
Dim ClearTempTabelSQL As String
'If Not ......
vb中 现在我要把数据库里存储的一个附件的内容替换了，怎么做，只是替换我指定的位置，不是全部替换
请将问题说明白，存储字段格式，如果是Binary格式的比较麻烦，如果是字串，直接替换。最好不要进行指定位置替换� ......
