*&---------------------------------------------------------------------*
*& Report ZVOICE
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT zvoice.
INCLUDE ole2incl.
DATA: ole TYPE ole2_object,
voice TYPE ole2_object,
text TYPE string.
PARAMETERS s1 RADIOBUTTON GROUP rd DEFAULT 'X'.
PARAMETERS s2 RADIOBUTTON GROUP rd .
PARAMETERS s3 RADIOBUTTON GROUP rd .
DATA: it_tline TYPE STANDARD TABLE OF tline WITH HEADER LINE.
*initialization.
CREATE OBJECT voice 'SAPI.SpVoice'.
SET PROPERTY OF voice 'Volume' = 100."音量0 -100
SET PROPERTY OF voice 'Rate' = -3."速度 -10 - 10
*at SELECTION-SCREEN OUTPUT.
IF s1 =
SAP 语音朗读
最新推荐文章于 2024-05-29 09:53:17 发布