Вопрос №17147: Как проиграть mp3 файл? Желательно без использования MediaPlayer, например через DirectSound.
Планируется многопоточное приложение, проигрование пойдёт в отдельную нить, "фоном"....Вопрос №17154: Уважаемые эксперты.
При попытке вывести результат из dll (в приложении) выскакивает ругань,вывод я делаю так
procedure TForm1.Button1Click(Sender: TObject);
var
temp:byte;
begin
Temp := Read_T(romsensor[0,0]);// ' считать тем...Вопрос №17172: У меня такая проблема. Может она и слишком проста, но я не нашел решения.
Как известно, у windows есть папка SendTo куда можно кидать ярлыки к программам и впоследствии отправлять программам нужные данные. Как работает этот процесс?
Могу конк...
Вопрос № 17147
Как проиграть mp3 файл? Желательно без использования MediaPlayer, например через DirectSound.
Планируется многопоточное приложение, проигрование пойдёт в отдельную нить, "фоном".
Отправлен: 17.02.2005, 17:28
Вопрос задала: Shizuku Tsukishima (статус: 2-ой класс)
Всего ответов отправлено: 1
Отвечает: John Freeman
Здравствуйте, Shizuku Tsukishima!
Ищи компонент, IMHO MP3 Decoder + JEDI DirectX SDK тебе помогут, но долго это...
Если лень - BASS библиотека.
Ответ отправил: John Freeman (статус: Специалист)
Отправлен: 17.02.2005, 20:37
Вопрос № 17154
Уважаемые эксперты.
При попытке вывести результат из dll (в приложении) выскакивает ругань,вывод я делаю так
procedure TForm1.Button1Click(Sender: TObject);
var
temp:byte;
begin
Temp := Read_T(romsensor[0,0]);// ' считать температуру сенсора
if temp=255 then
label1.Caption:='error';
label1.Caption:=FormatFloat('0.00',Temp)+'''C';
при пошаговом исполнении ошибка вылетает на строке Temp := Read_T(romsensor[0,0]),а если убрать строку label1.Caption:=FormatFloat('0.00',Temp)+'''C'; то ошибки нет но и значение temp становится другим.Подскажите в чем дело.
С уважением Антон.
Приложение:
Отправлен: 17.02.2005, 19:48
Вопрос задал: антон (статус: Посетитель)
Всего ответов отправлено: 2
Отвечает: John Freeman
Здравствуйте, антон!
Так не сказать, а что у тебя в переменной после вызова(в HEX без всякого FOrmat)
и что дебаггер кажет
Ответ отправил: John Freeman (статус: Специалист)
Отправлен: 17.02.2005, 20:46
Отвечает: sir henry
Здравствуйте, антон!
А какая ошибка то вылетает? :)
Функция в dll'ке возвращает значение типа INT (в Дельфи это INTEGER), а Вы это значение пытаетесь присвоить переменной типа BYTE.
Ответ отправил: sir henry (статус: Профессор)
Отправлен: 18.02.2005, 06:57
Вопрос № 17172
У меня такая проблема. Может она и слишком проста, но я не нашел решения.
Как известно, у windows есть папка SendTo куда можно кидать ярлыки к программам и впоследствии отправлять программам нужные данные. Как работает этот процесс?
Могу конкретнее...
Если в Windows нажать на файле отправить...адресату, то откроется окно для формирования отправки файла (с темой, аттачами, куда и пр.). Так вот, как сделать то же самое из под Delphi? Очень нужно обычную отправку файла, чтобы открывалось такое окно (такое, так как к нему уже все привыкли, а программу я пишу не для себя и не для программистов или продвинутых пользователей, поэтому своего клиента нежелательно писать) при указании на файл (Хотя я даже понятия не имею, как это возможно, есть мысли, что насчет WinAPI,
но кто их знает, как сделан SendTo, ведь ярлык <адресату> это файл с расширением MAPIMAIL, который неизвестно (мне) как работает).
Отправлен: 18.02.2005, 10:50
Вопрос задал: Большаков Сергей Владимирович (статус: Посетитель)
Всего ответов отправлено: 2
Отвечает: Bob Johnson
Здравствуйте, Большаков Сергей Владимирович!
Имя файла, на котором нажали "send to.." будет передано тебе в коммандной строке. Так что просто напиши программу, которая разбирает параметры командной строки и помести ярлык на нее в эту папку.
Ответ отправил: Bob Johnson (статус: Академик)
Отправлен: 18.02.2005, 14:22
Отвечает: Shizuku Tsukishima
Здравствуйте, Большаков Сергей Владимирович!
Чтобы открыть окно стандартного почтового клиента, с заполнеными почтовыми реквизитами, для отправки нового письма, надо использовать функции WinExec или ShellExecute (рекомендую), в них надо обязательно передать специальным образом сформированную строку-ссылку HTML-кода. О формате такой строки можно прочитать здесь:
http://egorix.net.ru/tr_1.php
http://htmlhelp.chat.ru/link_T_1.html
Поместив вызов такой функции в обработчик onClick для Label, мы получим самую обычную интернет-ссылку. Естественно можно взять любой другой обработчик, например сделать контекстное меню для мыши.
Справку по фукциям см. в Delphi Help: "Multimedia API Reference". У меня это файл: "E:Program FilesCommon FilesBorland SharedMSHelpMM.HLP".
------------
В приложении см. пример
Приложение:
Ответ отправила: Shizuku Tsukishima (статус: 2-ой класс)
Отправлен: 21.02.2005, 13:31
