1 uses Clipbrd;
public
NextClipHwnd:HWND;
procedure WMDrawClipBoard(var Message:TMessage);message WM_DRAWCLIPBOARD;
procedure TForm1.WMDrawClipBoard(var Message: TMessage);
begin
SendMessage(NextClipHwnd,Message.Msg,Message.WParam,Message.LParam);
if Clipboard.FormatCount=0 then ...
2 像废话,不管复制还是剪切来的都可以进行复制或者移动操作。既然你只是为了进行复制或者移动操作,
你没必要管它从哪儿来的!如果你非得知道,就判断WM_COPY, WM_CUT好了!