forum.boolean.name

forum.boolean.name (http://forum.boolean.name/index.php)
-   Основной форум (http://forum.boolean.name/forumdisplay.php?f=49)
-   -   Разъясните (http://forum.boolean.name/showthread.php?t=2988)

fads 19.03.2007 20:10

Разъясните
 
Вот эта прога не пашет скажите в чем проблема
program YoMP3;
uses mfs;
var textField_id: integer;
begin
textField_id := FormAddTextField('Enter MP3 file with full path', '/a/mobile/audio/moto~.mp3', 20, TF_ANY);
ShowForm;
repaint;
mfs.open_file('textField_id');
if not OpenPlayer('textField_id', 'audio/mpeg') then Halt;
if not SetPlayerCount(-1) then Halt;
if not StartPlayer then Halt;
delay(2000000);
end.

jimon 19.03.2007 21:32

Re: Разъясните
 
может delay(2000000); ?

fads 19.03.2007 22:01

Re: Разъясните
 
Неа, он не билдит даже. Ошибка в восьмой строке. Не нравится ему mfs.open_file пишет этого нет в библиотеке

Bruteo 20.03.2007 08:17

Re: Разъясните
 
Замени
mfs.open_file('textField_id');
на
mfs.open_file(formGetText(textField_id));
И repaint; там не нужен.

fads 21.03.2007 11:38

Вложений: 2
Спасибо канешн. НО ни в какую не пашет.
может каие ресурсы подключать надо? я не знаю уж че делать. Если у кого успешно билдится, плз киньте код и jar файл

прилагаю весь проект

IVenoMI 21.03.2007 13:17

Re: Разъясните
 
По моему знаю в чем косяк... Вечером дома посмотрю...

ARV 21.03.2007 13:59

Re: Разъясните
 
1. Надеюсь, библиотека Lib_mfs.class помещена в папку Lib Мидлетпаскаля?
2. В коде проекта (из архива) логическая ошибка: ВСЕГДА при таком подходе будет запускаться плейер с файлом /a/mobile/audio/fads/riders.mp3 - ввод пользователя ничего не поменяет. Правильно - сначала дождаться закрытия формы (т.е. ввода соответствующей команды), а лишь потом открывать плейер. Смотри в хелпе про использование форм.

IVenoMI 22.03.2007 13:17

Re: Разъясните
 
Хм... У меня все компильнулось на ура...

fads 23.03.2007 21:06

Re: Разъясните
 
Библиотека естесственно есть. А насчет одного файла - я уж потом понял. С виндовсом какая то фигня. Переустановлю попробую заново.

[lol]2Fast4U 23.03.2007 22:39

Re: Разъясните
 
Вообще то это моя прога :)

Я не понял чё это за фигня... Вообщем забил я на неё. Кто хочет пусть из неё длает всё что хочет.


Часовой пояс GMT +4, время: 05:39.

vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot