Q quharry Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-05 #3 能写得清楚点吗,我是个入门级的呀(只能还没入门 ^_^)![]
P Pearl. Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-06 #4 var ProcessId: THandle; ThreadId: THandle; begin ThreadId := GetWindowThreadProcessId(您感兴趣的form的Handle, @ProcessId); // ProcessId就是您要的进程的Id, ThreadId是这个form所在的线程的Id end;
var ProcessId: THandle; ThreadId: THandle; begin ThreadId := GetWindowThreadProcessId(您感兴趣的form的Handle, @ProcessId); // ProcessId就是您要的进程的Id, ThreadId是这个form所在的线程的Id end;
Q quharry Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-06 #5 搞定,不好意思再问个问题! 测试一个字符串中有没有指定的子串,有没有这个函数!
P Pearl. Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-06 #6 function pos(substr, sourcestr: string): Integer;