sub OnRecognition {
		  my($self,$event,$streamnumber,$steamposition,$recognitiontype,$result) = @_;
		  my $newresult = $self->Invoke('Dispatch',$result);
		  # What now ???
		}