Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Delphi


Информационный Канал Subscribe.Ru

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 361
от 21.01.2006, 01:36

Администратор:Калашников О.А.
В рассылке:Подписчиков: 239, Экспертов: 57
В номере:Вопросов: 5, Ответов: 11


Вопрос № 33284: Приветствую вас уважаемые эксперты! Подскажите пожалуйста ХОРОШИЙ компонент для работы с MP3. ВГИМАНИЕ!!! Я прошу подсказать КОНКРЕТНЫЙ компонент! Ответы типа: "Поищи в yandex’е или на torry.net" прошу не присылать. Благодарю за...
Вопрос № 33306: Доброго дня, утра у кого что :) Меня интересует вот такой вопрос : Необходимо в компоненте TWebBrowser при нажатии юзером Открыть в новом окне, в правом контекстном меню, блокировать открытие нового окна и получить его URL для последущего отк...
Вопрос № 33323: Здраствуйте У меня два вопроса: 1.Как можно проверить существует ли папка или нет и если не то создать её. 2.И посоветуйте компонент для элементарного редактирования звука, а именно для обрезания, например чтобы вырезать из трэка с 0:10 д...
Вопрос № 33341: Здравствуйте, уважаемые эксперты! Я хочу, чтобы у меня в MainMenu напротив какого-то MenuItem располагалась картинка, которая загружается во время запуска программы из ResourceFile N19.Bitmap.LoadFromResourceName(Hinstance,'CheckT'); Но карт...
Вопрос № 33342: Здравствуйте, уважаемые эксперты! Как можно сделать так, чтобы Help File открывался не только при нажатий F1, но и при нажытий какой-то кнопки (N25 в MainMenu)? Спасибо....

Вопрос № 33.284
Приветствую вас уважаемые эксперты!
Подскажите пожалуйста ХОРОШИЙ компонент для работы с MP3.
ВГИМАНИЕ!!! Я прошу подсказать КОНКРЕТНЫЙ компонент! Ответы типа: "Поищи в yandex’е или на torry.net" прошу не присылать.
Благодарю за внимание, заранее спасибо!
Отправлен: 15.01.2006, 03:28
Вопрос задал: maCC (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Denisss
Здравствуйте, maCC!

Для конкретных ответов требуются конкретные вопросы!!!
Что Вам надо? Читать mp3 тэги, воспроизводить музыку, конвертировать из одного формата в mp3 и наоборот или же редактировать музыку?
Для воспроизведения mp3 можно использовать стандартный компонент TMediaPlayer с закладки "System".
Если Вам захочется воспроизводить не только mp3, но и Vorbis OGG, wma и др. некоторые другие форматы, то рекомендую воспользоваться библиотекой Bass.dll и специальным набором компонентов для работы с ней: TBassPlayer.
(В т.ч. в этом наборе компонентов имеется и работа с тэгами).

Удачи!
Ответ отправил: Denisss (статус: Специалист)
Отправлен: 15.01.2006, 10:48
Оценка за ответ: 4
Комментарий оценки:
Подразумевается всё выше перечисленное, но упор делается на РЕДАКТИРОВАНИЕ (особенно разрезание трэков на куски)


Вопрос № 33.306
Доброго дня, утра у кого что :)
Меня интересует вот такой вопрос :
Необходимо в компоненте TWebBrowser при нажатии юзером Открыть в новом окне, в правом контекстном меню, блокировать открытие нового окна и получить его URL для последущего открытия на новой закладке.
Заранее благодарен.
Отправлен: 15.01.2006, 14:53
Вопрос задал: Aleckset (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Denisss

Здравствуйте, Aleckset!

У TWebBrowser есть событие OnBeforeNavigate2, вот в это событие Вам и надо вставить Ваш обработчик:
procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
Headers: OleVariant; var Cancel: WordBool);
var
  fURL: string;
begin

// Получаем URL, на который нажал пользователь
  fURL:= VarToStr(URL);
// Блокируем открытие этого URL
  Cancel:= True;
// Или же вставьте Ваш обработчик:
// Cancel:= True - блокирует открытие
// Cancel:= False - разрешает открытие URL.

end;


Удачи!
Ответ отправил: Denisss (статус: Специалист)
Отправлен: 16.01.2006, 09:43


Вопрос № 33.323
Здраствуйте
У меня два вопроса:
1.Как можно проверить существует ли папка или нет и если не то создать её.
2.И посоветуйте компонент для элементарного редактирования звука, а именно для обрезания, например чтобы вырезать из трэка с 0:10 до 0:30(сек) кусок звука
Отправлен: 15.01.2006, 18:45
Вопрос задал: Dimon007 (статус: Посетитель)
Всего ответов: 5
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Архангельский Андрей Германович
Здравствуйте, Dimon007!

В приложении стандартный диалог сохранения файлов в какой-то папке

Приложение:

Ответ отправил: Архангельский Андрей Германович (статус: Студент)
Отправлен: 15.01.2006, 19:05

Отвечает: Ерёмин Андрей
Здравствуйте, Dimon007!
1) Вот код:

if not(DirectoryExists('C:\DIR')) then MkDir('C:\DIR');


2) Это сложно. Таких компонент очень мало. К тому же, вы не указали, какой формат вы хотите редактировать. Поищите на Torry.net по ключевым словам "sound editing" и "wave".
---------
Работа - не волк, а произведение силы на расстояние!
Ответ отправил: Ерёмин Андрей (статус: Профессионал)
Отправлен: 15.01.2006, 19:35

Отвечает: sir henry
Здравствуйте, Dimon007!
1) Есть специальная функция DirectoryExists(), которая возвращвет True, если папка существует и False в противном случае:
Uses SysUtils;
...
If not DirectoryExists(Название_папки) Then
ForceDirectories(Название_папки); {Создаем папку, если она не существует}
...
Ответ отправил: sir henry (статус: Академик)
Отправлен: 15.01.2006, 19:37

Отвечает: Lexus
Здравствуйте, Dimon007!

К сожалению, могу ответить только на первую часть:

if not(DirectoryExists('c: emp') then CreateDir('C: emp') ;
Ответ отправил: Lexus (статус: 1-ый класс)
Отправлен: 15.01.2006, 20:46

Отвечает: Schmak
Здравствуйте, Dimon007!
1) Чтобы проверить существует ли директория можно использовать функцию
DirectoryExists(Directory:string):boolean. Она возвращает True если директория есть и False если нет. Для создания папки можно использовать процедуру MkDir(Directory:string). В итоге получаем:
if not DirectoryExists('C:Program Files') then MkDir('C:Program Files');

---------
Не всё то Windows, что висит!
Ответ отправил: Schmak (статус: Практикант)
Отправлен: 16.01.2006, 05:54


Вопрос № 33.341
Здравствуйте, уважаемые эксперты!
Я хочу, чтобы у меня в MainMenu напротив какого-то MenuItem располагалась картинка, которая загружается во время запуска программы из
ResourceFile N19.Bitmap.LoadFromResourceName(Hinstance,'CheckT'); Но картинка не появляется. А если до этого там была другая картинка, загруженная при помощи Object Inspector, то картинка меняется. Как сделать так чтобы картинка появлялась независимо от того, было там до этого что-то или нет?
Спасибо.
Отправлен: 15.01.2006, 23:09
Вопрос задал: Граур Василий Олегович (статус: 1-ый класс)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: One
Здравствуйте, Граур Василий Олегович!
А почему именно из файла ресурсов грузишь? Кидаешь на форму ImageList с закладки Win32, заполняешь картинками, цепляешь на менюху (Images -> ImageList1), у MenuItem в св-ве ImageIndexs програмно ставишь какую надо картинку. Смотри код.

Приложение:

---------
Компьютер должен работать, а человек - DOOMать.

Ответ отправил: One (статус: 1-ый класс)
Отправлен: 15.01.2006, 23:57

Отвечает: Маренич Владимир
Здравствуйте, Граур Василий Олегович!
Попробуйте сначала создать TBitmap, загрузить в него картинку из ресурсов, потом назначить этот TBitmap пункту меню:
var
Bmp: TBitmap;
begin
Bmp:=TBitmap.Create;
try
Bmp.LoadFromResourceName(Hinstance,'CheckT');
N19.Bitmap.Assign(Bmp);
finally
Bmp.Free;
end;
Ответ отправил: Маренич Владимир (статус: 10-ый класс)
Отправлен: 16.01.2006, 14:00
Оценка за ответ: 5

Отвечает: Меркулов Алексей
Здравствуйте, Граур Василий Олегович! Попрбуйте вставлять пустой рисунок в роли Bitmapa
Ответ отправил: Меркулов Алексей (статус: 2-ой класс)
Отправлен: 16.01.2006, 22:19


Вопрос № 33.342
Здравствуйте, уважаемые эксперты!
Как можно сделать так, чтобы Help File открывался не только при нажатий F1, но и при нажытий какой-то кнопки (N25 в MainMenu)?
Спасибо.
Отправлен: 15.01.2006, 23:15
Вопрос задал: Граур Василий Олегович (статус: 1-ый класс)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Slava
Здравствуйте, Граур Василий Олегович!
на OnClick кнопки

Application.HelpFile := 'name.hlp';
Application.HelpContext(1);
Ответ отправил: Slava (статус: 6-ой класс)
Отправлен: 16.01.2006, 02:17
Оценка за ответ: 5


Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2006, Портал RusFAQ.ru, Россия, Москва.
Идея, дизайн, программирование: Калашников О.А.
Email: adm@rusfaq.ru, Тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале
Яндекс Rambler's Top100

Subscribe.Ru
Поддержка подписчиков
Другие рассылки этой тематики
Другие рассылки этого автора
Подписан адрес:
Код этой рассылки: comp.soft.prog.delphiplus
Архив рассылки
Отписаться Вебом Почтой
Вспомнить пароль

В избранное