Acabo de probar el script aqui pongo
Código Delphi
[-]var
SOToken: ISpeechObjectToken;
begin
with lstEngineInfo.Items do
begin
Clear;
SOToken := ISpeechObjectToken(Pointer(
cbVoices.Items.Objects[cbVoices.ItemIndex]));
SpVoice.Voice := SOToken;
Add(Format('Name: %s', [SOToken.GetAttribute('Name')])); Add(Format('Vendor: %s', [SOToken.GetAttribute('Vendor')]));
Add(Format('Age: %s', [SOToken.GetAttribute('Age')]));
Add(Format('Gender: %s', [SOToken.GetAttribute('Gender')]));
Add(Format('Language: %s', [SOToken.GetAttribute('Language')]));
Add(Format('Reg key: %s', [SOToken.Id]));
end
end;
lo que pasa cuando ejecuto me manda este error yo estoy utilizando delphi 2010
First chance exception at $7592D3CF. Exception class EAccessViolation with message 'Access violation at address 004BA755 in module 'Project3.exe'. Read of address 00000000'. Process Project3.exe (5812)