Messenger ne dinliyorum

[zynex]

Messenger'in Ne Dinliyorum Özelliğine nasıl istediğimiz bi yazıyı gönderebiliriz. Mesela Messengeramp diye bi program Winamp ta çalan şarkıyı msn de gösteriyor. Gen_msn.dll diye bi dll dosyası var bu dosyayı inceledim ama bişey çıkmadı. Bunu Nasıl yapabiliriz?

[risk]

nasil yani dinlediğin şarkının baska isimde gorunmesini istiyorsan mp3 un IDtag ayarlarını değiştir o zaman baska bısı yazmıs olur:)

[zynex]

hayır ben kendi yazdığım bi programla o anda ne yaptığımı anlatmak istiyorum misal o anda internet explorer penceresi aktifse Sörf yapıyor veya Msn Messenger Penceresi aktif ise cevap vermeye hazır gibi yazılar göndermek istiyorum. IDTag la ilgili bisi değil yani

[risk]

pardon ben yanlıs anlamısım..o is beni a$ar:)

[mege]

Kod: Tümünü seç

procedure TmegeUTILITY.CurrentPlay(ARTIST: string;bStop:boolean);
var
  handleMSN:THandle;
  structCopy:TCopyDataStruct;
  stringBuffer:array [0..127] of WideChar;
begin
  ARTIST:= copy(ARTIST,1,75);
  FillChar(stringBuffer,SizeOf(stringBuffer),#0);

  if Not bStop then
    StringToWideChar('\0Music\0'+'1'+'\0'+'{0}'+'\0'+ARTIST+'\0'+'WMContentID'+#0,@stringBuffer[0],128)
  else  // parça stop edildi ise
    StringToWideChar('\0Music\0'+'0'+'\0'+'{0}'+'\0'+ARTIST+'\0'+'WMContentID'+#0,@stringBuffer[0],128);

  // orjinal hali
  //StringToWideChar('\0Music\0'+'1'+'\0'+'{0} - {1}'+'\0'+ARTIST+'\0'+TITLE+'\0'+ALBUM+'\0'+'WMContentID'+#0,@stringBuffer[0],128);

  ZeroMemory(@structCopy,SizeOf(TCopyDataStruct));
  with structCopy do
  begin
    cbData:=SizeOf(stringBuffer);
    dwData:=$547;
    lpData:=@stringBuffer[0];
  end;

  handleMSN:=FindWindowEx(0,0,'MsnMsgrUIManager',nil);
  while handleMSN <> 0 do
  begin
    SendMessage(handleMSN,WM_COPYDATA,0,Integer(@structCopy));

    handleMSN:=FindWindowEx(0,handleMSN,'MsnMsgrUIManager',nil);
  end;
end;

[zynex]

Gerçekten çok teşekkür ederim çok işime yaradı