改变MSN个人状态信息

改变MSN个人信息,如Windows Media Play(千千静听)播放音乐时,将会显示正在播放的内容一样.网上有C#的代码,但是Windows Live Messenger好像不能用.于是写了一个消息拦截的工具,将Messenger的WM_COPYDATA截下来,并分析...却也没发现跟之前的版本有什么不一样的地方,郁闷. procedure TFrm_Main.Execute_MSN7580;var hDestWnd: HWND; Buffer: Array[0..255] of Char; TempString: WideString; CDS: COPYDATASTRUCT;begin hDestWnd := FindWindow('MsnMsgrUIManager',NIL); if hDestWnd = 0 then Exit; TempString := '/0'+ComboBox_Kind.Text+'/00/0/0/0/0/0/0'+Chr(0); FillChar(Buffer,SizeOf(Buffer),0); StringToWideChar(TempString,@Buffer[0],255); CDS.dwData := $0547; CDS.cbData := Length(TempString)*2; CDS.lpData := @Buffer[0]; SendMessage(hDestWnd,WM_COPYDATA,0,Integer(@CDS)); TempString := '/0'+ComboBox_Kind.Text+'/01/0{0}/0'+Memo.Lines[FCurrentIndex]+'/0/0'+#$0; FillChar(Buffer,SizeOf(Buffer),0); StringToWideChar(TempString,@Buffer[0],255); Inc(FCurrentIndex); if FCurrentIndex >= Memo.Lines.Count then FCurrentIndex := 0; CDS.dwData := $0547; CDS.cbData := Length(TempString)*2; CDS.lpData := @Buffer[0]; SendMessage(hDestWnd,WM_COPYDATA,0,Integer(@CDS));end;