Problem mit iTunes und COM

[sebi87]

Wie kann ich herrausfinden in welchen Thread dieses Event läuft?

Delphi-Quellcode:

procedure TForm1.IdHTTPServer1CommandGet(AThread: TIdPeerThread;
  RequestInfo: TIdHTTPRequestInfo; ResponseInfo: TIdHTTPResponseInfo);
begin
  if RequestInfo.Params.Strings[0] = 'in:request' then
  begin
    Label1.Caption := 'Eingehender Anruf von ' +  RequestInfo.Params.Strings[2] ;
    if iTunesRunning then iTunesPause ;
  end ;
  if RequestInfo.Params.Strings[0] = 'in:cancel' then
  begin
    Label1.Caption := 'Verpasster Anruf' ;
    if iTunesRunning then iTunesPlay ;
  end ;
end;

Oder reicht es wenn ich das CoInitialize(nil) am Anfang der procedure aufrufe?