Не удаётся определить тип устройства по указанному расширению файла (TMediaOlayer)

@MODifikator · Регистрация: 21.10.2014

Студворк — интернет-сервис помощи студентам

Появилась такая ошибка. До этого программа воспроизводила аудио нормально. Вроде и код не менял, однако всё равно выёживается. Вот код события:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
void __fastcall TForm1::ListBox1DblClick(TObject *Sender)
{//if (pl==false)
 {pl=true;
   MP1->FileName=ListBox3->Items->Strings[ListBox1->ItemIndex];
   TrackBar2->Position = 0;
   TrackBar2->Max = MP1->Length;
   MP1->Open();
   MP1->Play();
   Timer1->Enabled = true;
   long time = MP1->Length;
      long mm = time / 60000;
      time -= mm * 60000;
      long ss = time / 1000;
      char buff[20];
      sprintf( buff, "%0.2d:%0.2d", mm, ss);
      Maxt->Caption=buff;}
 
 if(st==true) {TrackBar2->Max = MP1->Length;
TrackBar2->Position = MP1->Position; st=false;}
}

@D1973 · 25.04.2016, 18:52

Сообщение от MODifikator

Вроде и код не менял, однако всё равно выёживается

Проверяй файл... Либо путь как-то коряво записывается, либо сам файл не читается...
насчет кода...

Сообщение от MODifikator

char buff[20];
* * * sprintf( buff, "%0.2d:%0.2d", mm, ss);
* * * Maxt->Caption=buff;

Я бы заменил:

C++
1
Maxt->Caption = String().sprintf("%0.2d:%0.2d", mm, ss);

(или

C++
1
Maxt->Caption = String().sprintf(L"%0.2d:%0.2d", mm, ss);

, если у тебя юникодный Билдер)

@MODifikator · 25.04.2016, 19:38 **[ТС]**

D1973, заменил. Теперь при открытии нового файла лейбл с временем воспроизведения при паузе показывает космические цифры. Так и должно быть?))

Добавлено через 17 секунд
Заменил на второй вариант, на первый он ругается

Добавлено через 58 секунд
И ещё при передвижении курсора бегунок трекбара носится по всей его длине)

Новые блоги и статьи Все статьи Все блоги /
Перемещение выделенных строк ТЧ из одного документа в другой Maks 30.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .

@MODifikator 0 / 0 / 1 Регистрация: 21.10.2014 Сообщений: 92
	25.04.2016, 19:38 [ТС]
	D1973, заменил. Теперь при открытии нового файла лейбл с временем воспроизведения при паузе показывает космические цифры. Так и должно быть?)) Добавлено через 17 секунд Заменил на второй вариант, на первый он ругается Добавлено через 58 секунд И ещё при передвижении курсора бегунок трекбара носится по всей его длине) 0