[fpc-pascal] Playing with SpVoice (ole object)

[Joao Morais]

Hello,

the following code:

{$mode objfpc}{$H+}
uses
   comobj;
var
   vsound: olevariant;
   s: string;
begin
   vsound := createoleobject('SAPI.SpVoice');
   writeln('playing using literal');
   vsound.speak('hello world');
   writeln('ok (press enter)');
   readln;
   writeln('now playing using a string var');
   s := 'hello world';
   vsound.speak(s);
   writeln('ok (press enter)');
   readln;
end.

speaks using a literal but says randomic words (sometimes says nothing) 
using a variable. Is there something that I am missing?

Thanks.