diff options
author | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2010-03-12 21:11:54 +0000 |
---|---|---|
committer | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2010-03-12 21:11:54 +0000 |
commit | 03d4c6996af2582d672454b0f5a1a6e4b9cbe5ad (patch) | |
tree | e24e8a20440fa8048165c68038c5543509cafc74 | |
parent | 62f4a5bc497a05431df9b324c3d5f4a1656a4ea4 (diff) | |
download | usdx-03d4c6996af2582d672454b0f5a1a6e4b9cbe5ad.tar.gz usdx-03d4c6996af2582d672454b0f5a1a6e4b9cbe5ad.tar.xz usdx-03d4c6996af2582d672454b0f5a1a6e4b9cbe5ad.zip |
rename cosmetics. no code change.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@2192 b956fd51-792f-4845-bead-9b4dfca2ff2c
-rw-r--r-- | src/media/UAudioInput_Portaudio.pas | 50 |
1 files changed, 25 insertions, 25 deletions
diff --git a/src/media/UAudioInput_Portaudio.pas b/src/media/UAudioInput_Portaudio.pas index 4a021cc7..c5ec8115 100644 --- a/src/media/UAudioInput_Portaudio.pas +++ b/src/media/UAudioInput_Portaudio.pas @@ -268,27 +268,27 @@ end; function TAudioInput_Portaudio.EnumDevices(): boolean; var - i: integer; - paApiIndex: TPaHostApiIndex; - paApiInfo: PPaHostApiInfo; - deviceName: string; - deviceIndex: TPaDeviceIndex; - deviceInfo: PPaDeviceInfo; - channelCnt: integer; - SC: integer; // soundcard - err: TPaError; - errMsg: string; - paDevice: TPortaudioInputDevice; - inputParams: TPaStreamParameters; - stream: PPaStream; - streamInfo: PPaStreamInfo; - sampleRate: double; - latency: TPaTime; + i: integer; + paApiIndex: TPaHostApiIndex; + paApiInfo: PPaHostApiInfo; + deviceName: string; + deviceIndex: TPaDeviceIndex; + deviceInfo: PPaDeviceInfo; + channelCnt: integer; + soundcardCnt: integer; + err: TPaError; + errMsg: string; + paDevice: TPortaudioInputDevice; + inputParams: TPaStreamParameters; + stream: PPaStream; + streamInfo: PPaStreamInfo; + sampleRate: double; + latency: TPaTime; {$IFDEF UsePortmixer} - mixer: PPxMixer; - sourceCnt: integer; - sourceIndex: integer; - sourceName: string; + mixer: PPxMixer; + sourceCnt: integer; + sourceIndex: integer; + sourceName: string; {$ENDIF} begin Result := false; @@ -303,7 +303,7 @@ begin paApiInfo := Pa_GetHostApiInfo(paApiIndex); - SC := 0; + soundcardCnt := 0; // init array-size to max. input-devices count SetLength(AudioInputProcessor.DeviceList, paApiInfo^.deviceCount); @@ -326,7 +326,7 @@ begin channelCnt := 2; paDevice := TPortaudioInputDevice.Create(); - AudioInputProcessor.DeviceList[SC] := paDevice; + AudioInputProcessor.DeviceList[soundCardCnt] := paDevice; // retrieve device-name deviceName := deviceInfo^.name; @@ -430,13 +430,13 @@ begin // close test-stream Pa_CloseStream(stream); - Inc(SC); + Inc(soundCardCnt); end; // adjust size to actual input-device count - SetLength(AudioInputProcessor.DeviceList, SC); + SetLength(AudioInputProcessor.DeviceList, soundCardCnt); - Log.LogStatus('#Input-Devices: ' + inttostr(SC), 'Portaudio'); + Log.LogStatus('#Input-Devices: ' + inttostr(soundCardCnt), 'Portaudio'); Result := true; end; |