|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
15.05.2009, 16:59 | #1 |
Форумчанин
Регистрация: 05.04.2008
Сообщений: 244
|
Как перевести на делфи следующий код?
int mic=-1, n, flags;
for (n=0; (flags=BASS_RecordGetInput(n, NULL))!=-1; n++) { if ((flags&BASS_INPUT_TYPE_MASK)==BASS _INPUT_TYPE_MIC) { // found the mic! mic=n; break; } } if (mic!=-1) printf("Found a microphone at input %d\n", mic); else printf("No microphone found\n"); Спасибо. |
15.05.2009, 17:18 | #2 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Примерно так:
Код:
I'm learning to live...
|
15.05.2009, 17:26 | #3 |
Форумчанин
Регистрация: 05.04.2008
Сообщений: 244
|
спасибо за подсказку.
|
15.05.2009, 17:42 | #4 |
Форумчанин
Регистрация: 05.04.2008
Сообщений: 244
|
компилятор ругается на эту строку:
flags:=BASS_RecordGetInput(n, NULL); что там не так? Спасибо. |
15.05.2009, 18:02 | #5 |
Участник клуба
Регистрация: 19.01.2009
Сообщений: 1,453
|
Код:
Последний раз редактировалось uberchel; 15.05.2009 в 18:10. |
15.05.2009, 20:50 | #6 |
Форумчанин
Регистрация: 05.04.2008
Сообщений: 244
|
все равно ругается на строку:
n:=0; flags:=BASS_RecordGetInput(n, NIL); что еще может быть не так? |
15.05.2009, 20:58 | #7 |
Участник клуба
Регистрация: 19.01.2009
Сообщений: 1,453
|
А у тебя в деббагере пишет это:
Код:
А можешь просто скачать C++ и скомпилировать там, компонент(модуль) то для неё! Последний раз редактировалось uberchel; 15.05.2009 в 21:05. |
15.05.2009, 21:48 | #8 |
Форумчанин
Регистрация: 05.04.2008
Сообщений: 244
|
нет компилятор пишет следующее:
[Pascal Error] unit1.pas(2660): E2033 Types of actual and formal var parameters must be identical |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Код игры на Паскале и на Делфи сильно отличается? Как переписать код с Паскаля в Делфи? | Mclaren | Помощь студентам | 2 | 27.04.2009 22:37 |
Перевести код с Delphi на С++ | Vladya | Помощь студентам | 10 | 30.03.2009 20:31 |
Как сделать следующий скрипт… | vl.artes | JavaScript, Ajax | 10 | 21.01.2009 08:42 |
Как алгоритм перевести в код VBA | valerij | Microsoft Office Excel | 18 | 29.05.2008 01:32 |