Главная
Регистрация
Вход
Вторник
23.10.2018
14:56
Приветствую Вас, Гость | RSS

Меню сайта

Категории раздела
Программы с GUI [8]
Создание программ с графическим интерфейсом пользователя

Форма входа


Наш опрос
Оказался ли Вам полезным наш сайт?
Всего ответов: 415

Пользователи

Онлайн всего: 1
Гостей: 1
Пользователей: 0

 Каталог статей 
Главная » Статьи » C++ Builder 6 - GUI » Программы с GUI

PDA-версия страницы

Создание плеера

Наш медиаплеер мы будем строить на основе компонента MediaPlayer. После добавления его на форму установите свойство Visible в false, т.к. мы создадим свои кнопки. Разместите на форме 6 кнопок типа BitBtn и подгрузите в них изображения, используя свойства Glyph. Значки находятся по адресу Program Files\Common Files\Borland Shared\Images\Buttons . Я использовал fileopen, vcrplay, vcrpause, vcrstop, cddrive. Для выбора иконки в верхнем левом углу воспользуйтесь свойством формы Icon. Иконки можно найти по адресу Program Files\Common Files\Borland Shared\Images\Icons . В свойстве Filter OpenDialog напишите форматы файлов, например:



 У компонента TrackBar в свойстве ThumbLenght пропишите 15 (выберите более удобный для вас размер ползунка). И поэкспериментируйте со свойством TickStyle. В свойстве формы BorderStyle выберите bsSingle. А в BorderIcons установите biMaximize в false.

Форма-заготовка:



Важно!
Текст модуля нельзя копировать напрямую, т.к. это вызовет ошибки при компиляции(относится к обработчикам событий). Следует сперва щелкнуть, например, по кнопке, а затем вставить код:

Пример для
BitBtn1:

Щелкаем дважды по кнопке BitBtn1, появится:

void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
     
}


Затем между фигурными скобкам вставляем код:

 MediaPlayer1->Play(); 

И в итоге получаем:

void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
 MediaPlayer1->Play();      
}




Код программы:


//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::BitBtn6Click(TObject *Sender)
{
 if (OpenDialog1->Execute())//выбираем файл и подгружаем в MediaPlayer
 {
 MediaPlayer1->FileName=OpenDialog1->FileName;
 MediaPlayer1->Open();
 }
 ListBox1->Items->Add(OpenDialog1->FileName);//добавляем путь к файлу в ListBox
}
//---------------------------------------------------------------------------
 
//событие формы OnClose
 
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
 MediaPlayer1->Close();  
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn4Click(TObject *Sender)
{
 mciSendString ( "Set cdaudio door open wait", NULL, 0, NULL);//открываем DVD-ROM   
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn5Click(TObject *Sender)
{
 mciSendString ( "Set cdaudio door closed wait",NULL,0,NULL);//закрываем DVD-ROM  
}
//---------------------------------------------------------------------------
void __fastcall TForm1::TrackBar1Change(TObject *Sender)
{
 TrackBar1->Max = 65350 ;
 waveOutSetVolume(0, MAKELONG(TrackBar1->Position, TrackBar1->Position));//регулируем громкость
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
 MediaPlayer1->Play();        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{
 MediaPlayer1->Pause();        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn3Click(TObject *Sender)
{
 MediaPlayer1->Rewind();//останавливаем песню для воспроизведения с начала
}
//---------------------------------------------------------------------------

Скомпилированный исходник:


Категория: Программы с GUI | Добавил: Admin (23.09.2011)
Просмотров: 14038 | Рейтинг: 4.4/5
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]

Помочь сайту!
рублей WMR
WebMoney на кошелек R407507742179

Закладки

Поиск по сайту

Друзья сайта

Ссылки

Разное
Система Orphus

Copyright H-L-L.RU © 2018
Сделать бесплатный сайт с uCoz