如何让已驻留内存中的程序再次获得参数并运行？(100分)

hyby · 2002-03-08

我编了个Flash播放器，并让它设为默认的Flash播放器，在资源管理器中双击Flash文件时， 程序会自动启动，并在启动时检测内存中是否已有启动好的程序： 　　1、若无则顺序启动，并自动运行指定的那个Flash文件； 　　2、若有，则不再启动，仅传送点中的那个文件名给已启动的程序，然后让那个驻留的 程序播放这个文件。 　　第1点好办，已实现，可第2点不知怎么办，请哪位大侠多多指教！

minkerui · 2002-03-09

换一个思路，比如检查到已经装载后，把原来的窗体给关闭，然后重新打开加载新的 文件。或者在硬盘或注册表中建立一个文件或键掷，播放时对它进行比较，如果文件名改变，则 重新加载。     第二种方法应该快一些。当然你其实还可以用一些高级的方法，比如SendMessage对原 窗体发送消息，在程序中接收等等。

hyby · 2002-03-13

我的想法就是用API（好象也只能用API），但我不知怎么用，用什么？ 我用了ShowWindow(Application.Handle, SW_SHOW)，但没有任何反应， 想用ShowMain(Application.Handle,'','',SW_SHOW)，但不知该在uses处加入哪个单元？！ 不知有哪位懂API的帮帮忙忙！！！ 另：有知道的能否教一教如何查找一个API函数所在的uses单元？

hyby · 2002-04-22

为什么这么久都没人答出来？我看到不少关于PostMessage和SendMessage的贴子，但没有 发现一个关于使用它们发送和接收字符串传送的（大部分都只是发送，没看到如何接收）。 真的没人知道如何将选中的文件名传给一个驻留程序并处理它吗？这样的程序其实很多的。

Pipi. · 2002-04-22

FindWindow找到你需要的窗口，发送WM_COPYDATA消息 对方需要处理WM_COPYDATA消息，就可以得到传过来的数据

hyby · 2002-04-23

to Pipi.: 能具体的写两行代码吗？如何发送与接收的。 发送是否为postmessage(handle,wm_copydata,integer(Pchar(paramstr(1))),0)?

独孤求败 · 2002-04-23

pipi说得对， 陈宽达的《Delphi深度历险》就是这么说的， 我因为没有实际用过，记得不清楚了（书不在这），你可以找来看看[

]

kfzd · 2002-04-23

用事件来进行同步操作。 先创建一个事件 然后再程序中用WaitForSingleObject等待该事件。 然后写一个Shell的扩展，在双击flash文件的时候SetEven, 这样你的服务进程就可以就这执行了.

hyby · 2002-04-24

To Pipi,独孤求败,kfzd: 实在不好意思，API我用得很少，手头也没有相关书籍，所以各位能否写点具体的、 有效的代码？

nunimao · 2002-04-24

>另：有知道的能否教一教如何查找一个API函数所在的uses单元？ 这简单，只要在delphi的win32 help中查到相应的声明即可。 这些其实是ms的东东。然后找到相应的头文件（include file），把它加入uses即可。 另外，不同程序之间用postmessage和sendmessage传指针无效， 这是由于windows的虚拟空间造成的。所以，应该考虑用别的方式传递。

妄语 · 2002-04-24

你为什么不让它在播放完成后自动关闭。

kfzd · 2002-04-24

建议你装一套msdn，作为一个程序员没有msdn是不行的。 给你发一段代码，从msdn上copy的 这段代码写的就是如何用TEven内核对象来同步程序执行的 ---------------------------------------------------   Platform SDK: DLLs, Processes, and Threads Using Event Objects Win32-based applications use event objects in a number of situations to notify a waiting thread of the occurrence of an event. For example, overlapped I/O operations on files, named pipes, and communications devices use an event object to signal their completion. For more information about the use of event objects in overlapped I/O operations, see Synchronization and Overlapped Input and Output. In the following example, an application uses event objects to prevent several threads from reading from a shared memory buffer while a master thread is writing to that buffer. First, the master thread uses the CreateEvent function to create a manual-reset event object. The master thread sets the event object to nonsignaled when it is writing to the buffer and then resets the object to signaled when it has finished writing. Then it creates several reader threads and an auto-reset event object for each thread. Each reader thread sets its event object to signaled when it is not reading from the buffer. #define NUMTHREADS 4 HANDLE hGlobalWriteEvent; void CreateEventsAndThreads(void) {     HANDLE hReadEvents[NUMTHREADS], hThread;     DWORD i, IDThread;     // Create a manual-reset event object. The master thread sets     // this to nonsignaled when it writes to the shared buffer.     hGlobalWriteEvent = CreateEvent(         NULL,         // no security attributes         TRUE,         // manual-reset event         TRUE,         // initial state is signaled         "WriteEvent"  // object name         );     if (hGlobalWriteEvent == NULL) {         // error exit     }     // Create multiple threads and an auto-reset event object     // for each thread. Each thread sets its event object to     // signaled when it is not reading from the shared buffer.     for(i = 1; i <= NUMTHREADS; i++)     {         // Create the auto-reset event.         hReadEvents = CreateEvent(             NULL,     // no security attributes             FALSE,    // auto-reset event             TRUE,     // initial state is signaled             NULL);    // object not named         if (hReadEvents == NULL)         {             // Error exit.         }         hThread = CreateThread(NULL, 0,             (LPTHREAD_START_ROUTINE) ThreadFunction,             &hReadEvents,  // pass event handle             0, &IDThread);         if (hThread == NULL)         {             // Error exit.         }     } } Before the master thread writes to the shared buffer, it uses the ResetEvent function to set the state of hGlobalWriteEvent (an application-defined global variable) to nonsignaled. This blocks the reader threads from starting a read operation. The master then uses the WaitForMultipleObjects function to wait for all reader threads to finish any current read operations. When WaitForMultipleObjects returns, the master thread can safely write to the buffer. After it has finished, it sets hGlobalWriteEvent and all the reader-thread events to signaled, enabling the reader threads to resume their read operations. VOID WriteToBuffer(VOID) {     DWORD dwWaitResult, i;     // Reset hGlobalWriteEvent to nonsignaled, to block readers.       if (! ResetEvent(hGlobalWriteEvent) )     {         // Error exit.     }     // Wait for all reading threads to finish reading.     dwWaitResult = WaitForMultipleObjects(         NUMTHREADS,   // number of handles in array         hReadEvents,  // array of read-event handles         TRUE,         // wait until all are signaled         INFINITE);    // indefinite wait     switch (dwWaitResult)     {         // All read-event objects were signaled.         case WAIT_OBJECT_0:             // Write to the shared buffer.             break;         // An error occurred.         default:             printf("Wait error: %d/n", GetLastError());             ExitProcess(0);     }     // Set hGlobalWriteEvent to signaled.     if (! SetEvent(hGlobalWriteEvent) )     {         // Error exit.     }     // Set all read events to signaled.     for(i = 1; i <= NUMTHREADS; i++)         if (! SetEvent(hReadEvents) ) {             // Error exit.         } } Before starting a read operation, each reader thread uses WaitForMultipleObjects to wait for the application-defined global variable hGlobalWriteEvent and its own read event to be signaled. When WaitForMultipleObjects returns, the reader thread's auto-reset event has been reset to nonsignaled. This blocks the master thread from writing to the buffer until the reader thread uses the SetEvent function to set the event's state back to signaled. VOID ThreadFunction(LPVOID lpParam) {     DWORD dwWaitResult;     HANDLE hEvents[2];     hEvents[0] = *(HANDLE*)lpParam;  // thread's read event     hEvents[1] = hGlobalWriteEvent;     dwWaitResult = WaitForMultipleObjects(         2,            // number of handles in array         hEvents,      // array of event handles         TRUE,         // wait till all are signaled         INFINITE);    // indefinite wait     switch (dwWaitResult)     {         // Both event objects were signaled.         case WAIT_OBJECT_0:             // Read from the shared buffer.             break;         // An error occurred.         default:             printf("Wait error: %d/n", GetLastError());             ExitThread(0);     }     // Set the read event to signaled.     if (! SetEvent(hEvents[0]) )     {         // Error exit.     } } Built on Thursday, May 11, 2000 ----------------------------------------------------

Borinp · 2002-05-16

启动时发现已有实例在运行时，向原来实例发WM_SETTEXT消息     hWnd := 0;     Application.Title := '';     hWnd := FindWindow('TMyApp',nil);     hApp := FindWindow('TApplication','MyApp');     if hApp <> 0 then     begin       SetForegroundWindow(hApp);       ShowWindow(hApp,SW_RESTORE);     end;     if hWnd <> 0 then     begin       if trim(ParamStr(1)) <> '' then       begin         GetMem(lpszFileName,255);         lpszFileName := PChar(trim(ParamStr(1)));         SendMessage(hWnd,WM_SETTEXT,0,LPARAM(lpszFileName));         SendMessage(hWnd,WM_USERFILE,0,0);       end;     end; 在主窗体中处理WM_USERFILE自定义消息 procedure TMyApp.OnUserFile(var msgMessage: TMessage); var   lpszText: PChar; begin   GetMem(lpszText,255);   if SendMessage(Application.Mainform.Handle,WM_GETTEXT,255,LPARAM(lpszText)) > 0 then   begin     LoadMyFile(string(lpszText));   end;   FreeMem(lpszText); end;

hyby · 2002-05-26

Borinp：您的方法我一直没空试，不过我已用WM_COPYDATA成功了，但仍然感谢您的回答 ，谢谢！

hyby · 2002-06-10

好了，我早已解决了此问题，谢谢各位参加！

如何让已驻留内存中的程序再次获得参数并运行？(100分)

hyby

Unregistered / Unconfirmed

minkerui

Unregistered / Unconfirmed

hyby

Unregistered / Unconfirmed

hyby

Unregistered / Unconfirmed

Pipi.

Unregistered / Unconfirmed

hyby

Unregistered / Unconfirmed

独孤求败

Unregistered / Unconfirmed

kfzd

Unregistered / Unconfirmed

hyby

Unregistered / Unconfirmed

nunimao

Unregistered / Unconfirmed

妄语

Unregistered / Unconfirmed

kfzd

Unregistered / Unconfirmed

Borinp

Unregistered / Unconfirmed

hyby

Unregistered / Unconfirmed

hyby

Unregistered / Unconfirmed

Similar threads