| Вопрос: Люди есть у кого DirectX 7 или 8 SDK | Добавлено: 24.09.07 12:37 |
Автор вопроса:  KreAtoR
|
| Если у кого есть SDK 7 или 8 Х, дайте плиз а если имеете ссылочку, то киньте плиз очень надо |
| Ответы | Всего ответов: 20 |
|
Номер ответа: 1 Автор ответа:  KreAtoR Вопросов: 120 Ответов: 438 |
Профиль | | #1 | Добавлено: 24.09.07 15:42 |
|
ну если нет ни у кого помогите хоть как нить.
Option Explicit
Implements DirectXEvent Dim DX As DirectX7 Dim DS As DirectSound Dim DC As DirectSoundCapture Dim curInfo As DSCURSORS Dim DSBuffer As DirectSoundBuffer Dim DCBuffer As DirectSoundCaptureBuffer Dim DSDesc As DSBUFFERDESC Dim DSWave As WAVEFORMATEX Private Const DSQuid As String = vbNullString Private Const DCQuid As String = vbNullString Private Sub Form_Load() Set DX = New DirectX7 Set DS = DX.DirectSoundCreate(DSQuid) Set DC = DX.DirectSoundCaptureCreate(DCQuid) With DSWave .nFormatTag = WAVE_FORMAT_PCM .nChannels = 2 .lSamplesPerSec = 22050 .nBitsPerSample = 16 .nBlockAlign = (.nBitsPerSample / 8) * .nChannels .lAvgBytesPerSec = .lSamplesPerSec * .nBlockAlign .nSize = 0 End With With DSDesc .lFlags = DSBCAPS_CTRLVOLUME .lBufferBytes = DSWave.lAvgBytesPerSec * 20 End With  S.SetCooperativeLevel Me.hWnd, DSSCL_PRIORITY
Set DCBuffer = DC.CreateCaptureBuffer(DSDesc) Set DSBuffer = DS.CreateSoundBuffer(DSDesc, DSWave) End Sub Private Sub Form_Unload(Cancel As Integer) Set DX = Nothing Set DSBuffer = Nothing Set DCBuffer = Nothing End Sub Private Sub Timer1_Timer() Dim bytes() As Integer ReDim bytes(curInfo.lWrite) CBuffer.ReadBuffer 0, UBound(bytes), bytes(0), DSCBLOCK_DEFAULT
SBuffer.WriteBuffer 0, UBound(bytes), bytes(0), DSBLOCK_DEFAULT
End Sub Private Sub DirectXEvent_DXCallback(ByVal eventid As Long) End Sub подключен directX 7 задача: сохранить аудиосигнал в SoundCaptureBuffer скопировать SoundCaptureBuffer в SoundBuffer воспроизвести SoundBuffer для пользователя это выглядит так, что он слышить звук, может его менять и сразу слышать изменения. проблемы: Set DCBuffer = DC.CreateCaptureBuffer(DSDesc)
здесь пишет что DSDesc ByRef не катит. Пробовал ByVal тоже ничего. собственно незнаю построен ли код правильно. никогда directX не занимался и SDK не имею, короче делаю все в слепую. |
||
|
Номер ответа: 2 Автор ответа: vitoРазработчик Offline Client Вопросов: 23 Ответов: 879 |
Web-сайт: Профиль | | #2 | Добавлено: 25.09.07 01:10 |
|
MS по удалила SDK 8 по моей старой ссылке.
Весь 8 SDK я конечно тебе не залью. Но вот что касается VB6 DSound (примеры) - это возможно. |
||
|
Номер ответа: 3 Автор ответа: KreAtoRВопросов: 120 Ответов: 438 |
Профиль | | #3 | Добавлено: 25.09.07 10:12 |
| давай с нетерпением жду | ||
|
Номер ответа: 4 Автор ответа: AndreyMp ICQ: 237822510 Вопросов: 28 Ответов: 1182 |
Профиль | | #4 | Добавлено: 25.09.07 10:38 |
| Есть DirectX 7 SDK, но не качал. Скока он весить должен? | ||
|
Номер ответа: 5 Автор ответа: KreAtoRВопросов: 120 Ответов: 438 |
Профиль | | #5 | Добавлено: 25.09.07 11:11 |
|
7 я уже нашел, кому надо обращайтесь выложу!!!!!!!!!!
надо щас 8 найти |
||
|
Номер ответа: 6 Автор ответа: KreAtoRВопросов: 120 Ответов: 438 |
Профиль | | #6 | Добавлено: 25.09.07 11:12 |
| 7 SDK в ZIP весит 122 метра | ||
|
Номер ответа: 7 Автор ответа: AndreyMpICQ: 237822510 Вопросов: 28 Ответов: 1182 |
Профиль | | #7 | Добавлено: 25.09.07 11:41 |
|
ed2k://|file|Microsoft%20DirectX%208%20SDK.iso|229539840|ED15FEEF34AB49D3E329BC2F8F227704|/
Не знаю поможет ли, но ничего стоящего больше - ~219 метров. |
||
|
Номер ответа: 8 Автор ответа: KreAtoRВопросов: 120 Ответов: 438 |
Профиль | | #8 | Добавлено: 25.09.07 11:58 |
| а если не осликом????? | ||
|
Номер ответа: 9 Автор ответа: vitoРазработчик Offline Client Вопросов: 23 Ответов: 879 |
Web-сайт: Профиль | | #9 | Добавлено: 25.09.07 17:31 |
|
KreAtoR
Кула слать -то? Может координаты укажешь? 
|
||
|
Номер ответа: 10 Автор ответа: KreAtoRВопросов: 120 Ответов: 438 |
Профиль | | #10 | Добавлено: 25.09.07 17:41 |
| f_nick@mail.ru | ||
|
Номер ответа: 11 Автор ответа: vitoРазработчик Offline Client Вопросов: 23 Ответов: 879 |
Web-сайт: Профиль | | #11 | Добавлено: 25.09.07 23:22 |
|
Ушло.
Все примеры из 8 по DSound для vb6. |
||
|
Номер ответа: 12 Автор ответа: KreAtoRВопросов: 120 Ответов: 438 |
Профиль | | #12 | Добавлено: 26.09.07 10:18 |
| сенкс ща глянем | ||
|
Номер ответа: 13 Автор ответа: KreAtoRВопросов: 120 Ответов: 438 |
Профиль | | #13 | Добавлено: 26.09.07 11:39 |
|
@vito
чел спасибо, о большем я и мечтать не мог. а что у тебя еще есть???
|
||
|
Номер ответа: 14 Автор ответа: vitoРазработчик Offline Client Вопросов: 23 Ответов: 879 |
Web-сайт: Профиль | | #14 | Добавлено: 28.09.07 02:02 |
|
KreAtoR
А что нужно - то?
Судя по твоим новым вопросам, инъекция не помогла.
|
||
|
Номер ответа: 15 Автор ответа: KreAtoRВопросов: 120 Ответов: 438 |
Профиль | | #15 | Добавлено: 28.09.07 13:28 |
|
смотри есть три возможности создать soundBuffer 1. из файла(ее могу она не нужна) 2. скопировать с captureBuffer(не получается ни в 7 ни в 8 изза недостатка параметров, но она нужна на 50 
3. создать BufferFromResource (не могу но надо) задача, повторю надо захватить звук с видеокарты и выдать его на звуковуюкарту, в реальном времени. тоесть что захватывается, то и слышу |
||