Урок 14 Вкладка Win 3.1, TFileListBox, TDirectoryListBox, TDriveComboBox, TFilterComboBox No title

April 1, 2006
в колонках играет Jeffersone Airplane-Somebody to love


После долгого забивания на программу, я решил написать ещё статью, ибо к моему удивлению люди посещают мой сайти даже иногда пишут письма.Некоторые просят новых статей, а некоторые спрашивают, почему так много мата?Отвечаю - а вы попробуйте не ругаться, когда программа написана а при запуске выдаёт дюжину ошибок..

Итак, приступим.Откройте C++ Builder и вкладку Win 3.1 на палитре компонентов.Там есть нескока компонентов, мы рассмотрим четыре из них.

TFileListBox
TDirectoryListBox
TDriveComboBox
TFilterComboBox

Кидаем все 4 компонента на форму и располагаем в удобном нам порядке.
Также кидаем на форму Memo1.

Ну теперь можна начинать писать код.
Сначала выделяем DriveComboBox1 и в Object Inspector(Инспектор объектов) и меняем св-во DirList на DirectoryListBox1.

Аналогично меняем у FilterComboBox1 и DirectoryFileBox1 св-во FileList на FileListBox1
Теперь в событии onClick у FileListBox1 напишем следующий код.

void __fastcall TForm1::FileListBox1Click(TObject *Sender)
{
Memo1->Lines->LoadFromFile(FileListBox1->FileName);
}

Можно запускать!Это было слишком просто - теперь слегка усложним задачу.
Вместо Memo1 киньте на форму TCppWebBrowser c вкладки Internet

и в событии onClick у FileListBox1 меняем код на:
void __fastcall TForm1::FileListBox1Click(TObject *Sender)
{
CppWebBrowser1->Navigate(WideString(FileListBox1->FileName));
}

Теперь меняем св-во Filter в FilterComboBox1 как показано на рисунке

Ну теперь помолитесь и давите F9 из последних сил!

Если есть вопросы по этому материалу или вопросы в принципе, пишите на мыло, ответы постараюсь выложить в последующих уроках.


Author of article - MA F*CKA CREW 2006
www.builderhelper.3dn.ru
builder.helper@rambler.ru