Автор |
Текст |
nayk
#195
|
Раздел: Компьютерный раздел Тема: DELPHI
/ Сб Апр 14, 2007 8:13 pm
|
Во первых нужно выяснить почему не добавляются файлы. Может быть ты где-то после очищаешь список.
-Запусти программу по шагам с параметром и проверь всё. |
![](/templates/fs2/images/spacer.gif) |
nayk
#196
|
Раздел: Компьютерный раздел Тема: DELPHI
/ Сб Апр 14, 2007 4:26 pm
|
WOLF3848, почитай ты книжку в конце концов. Это же базовые знания, которые доходчиво объясняются в любой книге типа "Delphi для начинающих". Экспериментировать конечно полезно, но без этих знаний ты всю жизнь будешь на форумах спрашивать такие элементарные вещи. ![Exclamation](images/smiles/icon_exclaim.gif) |
![](/templates/fs2/images/spacer.gif) |
nayk
#197
|
Раздел: Компьютерный раздел Тема: DELPHI
/ Пт Апр 13, 2007 1:35 pm
|
когда ты делаешь "Открыть с помощью.." то запускается программа с именем файла в качестве параметра, например файл 1.txt открыть с помощью блокнота:
Код: |
start notedad.exe 1.txt
или
start c:\windows\notepad.exe "d:\my files\1.txt" "d:\2.txt"
|
тебе при старте программы нужно проверять командную строку на наличие параметров, к примеру так (в обработчике onCreate):
[code:1:3234213ae1]
var i: integer;
...
begin
i ... ..... .... ... .. . |
![](/templates/fs2/images/spacer.gif) |
nayk
#198
|
Раздел: Компьютерный раздел Тема: DELPHI
/ Пт Апр 13, 2007 1:05 pm
|
ну типерь винамп захлебнётся от зависти ![Very Happy](images/smiles/icon_biggrin.gif) |
![](/templates/fs2/images/spacer.gif) |
nayk
#199
|
Раздел: Компьютерный раздел Тема: DELPHI
/ Чт Апр 12, 2007 3:56 pm
|
А где у тебя переменная ffilename меняется то?
Может вот так всётаки:
Код: |
procedure TfrmMain.ListBox1Click(Sender: TObject);
begin
if (ListBox1.ItemIndex>=0) then
begin
ffilename:=ListBox1.Items.Strings[ListBox1.ItemIndex];
BASS_PlaySoundFile(ffilename);
end;
end;
|
|
![](/templates/fs2/images/spacer.gif) |
nayk
#200
|
Раздел: Кухня съедобностей Тема: Как мариновать мясо для шашлыков?
/ Пн Апр 09, 2007 11:38 am
|
вместо уксуса лимонный сок хорошо подходит |
![](/templates/fs2/images/spacer.gif) |
nayk
#201
|
Раздел: Компьютерный раздел Тема: DELPHI
/ Пн Апр 09, 2007 9:32 am
|
WOLF3848 писал(а): | Блин с пле-листом пробелемы использую библиотеку bass при открывании файла он добавлянестя в список потом если я добавлю ещё то файл в списке будет проигрываться один и тот же в списке ПОмогите plaaese |
это уже вопрос к разработчикам библиотеки bass (если конечно ты сам что-нибудь не напутал). |
![](/templates/fs2/images/spacer.gif) |
nayk
#202
|
Раздел: Все клубы Омска Тема: 07.04.2007 - Time 2 Bass vol.3 feat. Kaleb(Finland)
/ Сб Апр 07, 2007 9:11 pm
|
Ну всё, футволка поглажена, красовки помыты - пора выдвигаться..
до встречи на месте ![Wink](images/smiles/icon_wink.gif) |
![](/templates/fs2/images/spacer.gif) |
nayk
#203
|
Раздел: Флейм Тема: Что в Аватаре твоей?
/ Сб Апр 07, 2007 4:32 pm
|
Просто нарисовал. |
![](/templates/fs2/images/spacer.gif) |
nayk
#204
|
Раздел: Компьютерный раздел Тема: DELPHI
/ Пт Апр 06, 2007 4:11 pm
|
Bodya писал(а): | 2 WOLF3848
Купи любую книгу по Delphi, почитай, и не позорься, задавая такие глупые вопросы. ![Confused](images/smiles/icon_confused.gif) |
да даже просто F1 нажми и почитай )
и в инете куча книг и статей лежит. |
![](/templates/fs2/images/spacer.gif) |
nayk
#205
|
Раздел: Компьютерный раздел Тема: DELPHI
/ Пт Апр 06, 2007 1:27 pm
|
Код: |
if OpenDialog1.Execute then
ListBox1.Items.Add(ExtractFileName(OpenDialog1.FileName));
|
по хорошему надо название из тэгов вытягивать надо. Как это делается посмотреть можно тут:
[url]
[внешняя ссылка]
[/url] |
![](/templates/fs2/images/spacer.gif) |
nayk
#206
|
Раздел: Компьютерный раздел Тема: DELPHI
/ Пт Апр 06, 2007 11:11 am
|
Код: |
if OpenDialog1.Execute then
ListBox1.Items.Add(OpenDialog1.FileName);
|
Что дальше спросиш? Как читать тэги из МП3, как удалять из списка? ![Very Happy](images/smiles/icon_biggrin.gif) |
![](/templates/fs2/images/spacer.gif) |
nayk
#207
|
Раздел: Компьютерный раздел Тема: DELPHI
/ Чт Апр 05, 2007 4:25 pm
|
может формат плейлиста другой. Открой в блокноте да посмотри. |
![](/templates/fs2/images/spacer.gif) |
nayk
#208
|
Раздел: Компьютерный раздел Тема: DELPHI
/ Чт Апр 05, 2007 3:48 pm
|
Брекпойнт тебе в помощь. |
![](/templates/fs2/images/spacer.gif) |
nayk
#209
|
Раздел: Компьютерный раздел Тема: Что за синяя фигня????
/ Чт Апр 05, 2007 1:31 pm
|
Вопрос: а как отключаеш компьютер? Завершение работы правильно делаешь? |
![](/templates/fs2/images/spacer.gif) |
|