Edit с стрелками

@Tarik20 · Регистрация: 14.02.2013

Author24 — интернет-сервис помощи студентам

Нужно edit который будет показывать путь к файлу не так "C:\Program Files\Borland\CBuilder6\", а вместо "\" стрелка
так как в стандартном проводнике.

@Avazart · 29.04.2013, 17:46

Пиши свой компонент, или ищи среди сторонних

@Tarik20 · 29.04.2013, 17:52 **[ТС]**

Сообщение от Avazart

Пиши свой компонент, или ищи среди сторонних

Мне нужно просто 26-той символ в едит засунуть.

@Avazart · 29.04.2013, 17:53

И что дальше ? Он то не будет срабатывать на нажатие как в проводнике ...

@Tarik20 · 29.04.2013, 18:01 **[ТС]**

Сообщение от Avazart

И что дальше ? Он то не будет срабатывать на нажатие как в проводнике ...

Мне нужно стрелку только показывать но когда сделать

C++

1	Edit1->Text = char(26);

Выпадает не понятно какой-то символ!

@Avazart · 29.04.2013, 18:07

Вероятно что Builder6 не выйдет ибо нет юникода

C++

1
2
3

 String Text  = L"C:Program Files \u25ba Borland \u25ba CBuilder6 \u25ba";
 
 Edit1->Text= Text;

- Builder XE3

@nick42 · 29.04.2013, 18:11

Символы, значением меньше 32, являются непечатными (управляющие символы). Если хочешь любоваться стрелкой, - найди в таблице символов подходящий шрифт и код.

@Tarik20 · 29.04.2013, 18:27 **[ТС]**

Сообщение от nick42

Символы, значением меньше 32, являются непечатными (управляющие символы). Если хочешь любоваться стрелкой, - найди в таблице символов подходящий шрифт и код.

Ну значит возьму символ '>' а потом подумаю.

@Avazart · 29.04.2013, 18:30

Ну а зачем оно вообще надо ?

Если имитировать проводник, то нужно лепить из ToolBar и ComboBox

LK · 29.04.2013, 18:51

C++

1	"C:\\Program Files\\Borland\\CBuilder6"+char(26)

@Avazart · 29.04.2013, 19:35

Можно так:

C++

 const int ImageIndex=0;
 
 ToolBar1->AllowTextButtons= true;
 ToolBar1->Images= ImageList1;
 ToolBar1->AutoSize= true;
 
 String Text = "C:\\Program Files\\Borland\\CBuilder6\\";
 TStringList* SL= new TStringList;
 try{
     SL->Text= StringReplace(Text,"\\","\r\n",TReplaceFlags()<<rfReplaceAll);
 
     for(int i=SL->Count-1; i>=0; --i)
       {
         TToolButton * TBtn2= new  TToolButton(ToolBar1);
         TBtn2->Parent= ToolBar1;
         TBtn2->AutoSize=true;
 
         TBtn2->ImageIndex= ImageIndex; // Иконка
         // Или
         //TBtn2->Style=tbsTextButton;
         //TBtn2->Caption= L"\u25ba";
 
         TToolButton * TBtn1= new  TToolButton(ToolBar1);
         TBtn1->Parent= ToolBar1;
 
         TBtn1->Style= tbsTextButton;
         TBtn1->Caption= SL->Strings[i];
         TBtn1->AutoSize= true;
       }
    }
 __finally{ delete SL; }

Вместо символа- иконка, загружаемая тул-кнопку из ImageList.

Остается впилить тулбар в комбобок и предусмотреть обработку нажатия кнопок и выпадающих меню

@Tarik20 · 29.04.2013, 20:06 **[ТС]**

Сообщение от LK

C++

1	"C:\\Program Files\\Borland\\CBuilder6"+char(26)

Этот символ едит не отображает правильно!

Добавлено через 21 минуту

Сообщение от Avazart

Можно так:

Вложение 262102

C++

 const int ImageIndex=0;
 
 ToolBar1->AllowTextButtons= true;
 ToolBar1->Images= ImageList1;
 ToolBar1->AutoSize= true;
 
 String Text = "C:\\Program Files\\Borland\\CBuilder6\\";
 TStringList* SL= new TStringList;
 try{
     SL->Text= StringReplace(Text,"\\","\r\n",TReplaceFlags()<<rfReplaceAll);
 
     for(int i=SL->Count-1; i>=0; --i)
       {
         TToolButton * TBtn2= new  TToolButton(ToolBar1);
         TBtn2->Parent= ToolBar1;
         TBtn2->AutoSize=true;
 
         TBtn2->ImageIndex= ImageIndex; // Иконка
         // Или
         //TBtn2->Style=tbsTextButton;
         //TBtn2->Caption= L"\u25ba";
 
         TToolButton * TBtn1= new  TToolButton(ToolBar1);
         TBtn1->Parent= ToolBar1;
 
         TBtn1->Style= tbsTextButton;
         TBtn1->Caption= SL->Strings[i];
         TBtn1->AutoSize= true;
       }
    }
 __finally{ delete SL; }

Вместо символа- иконка, загружаемая тул-кнопку из ImageList.

Остается впилить тулбар в комбобок и предусмотреть обработку нажатия кнопок и выпадающих меню

У меня borland C++ Builder 6 и выводит ошибку:

C++

1	[C++ Error] Unit1.cpp(39): E2451 Undefined symbol 'tbsTextButton'

@Avazart · 29.04.2013, 21:28

Сообщение от Tarasichok

[C++ Error] Unit1.cpp(39): E2451 Undefined symbol 'tbsTextButton'

Ну ищите аналогичную опцию ...

Либо сносите 6-ку, сколько можно на ней сидеть?

Добавлено через 1 час 19 минут

Вот добавил Edit и панель :

Код:

C++

const int ImageIndex=0;
String Path=  "C:\\Program Files\\Borland\\CBuilder6\\";
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
  Edit1->Visible=false;
 
 ToolBar1->AllowTextButtons= true;
 ToolBar1->Images= ImageList1;
 ToolBar1->AutoSize= true;
}
//---------------------------------------------------------------------------
void __fastcall GetBtns(String Path,TToolBar* ToolBar)
{
 TStringList* SL= new TStringList;
 try{
     SL->Text= StringReplace(Path,"\\","\n",TReplaceFlags()<<rfReplaceAll);
 
     for(int i=SL->Count-1; i>=0; --i)
       {
         TToolButton * TBtn2= new  TToolButton(ToolBar);
         TBtn2->Parent= ToolBar;
         TBtn2->AutoSize=true;
 
         TBtn2->ImageIndex= ImageIndex; // Иконка
 
         TToolButton * TBtn1= new  TToolButton(ToolBar);
         TBtn1->Parent= ToolBar;
 
         TBtn1->Style= tbsTextButton;
         TBtn1->Caption= SL->Strings[i];
         TBtn1->AutoSize= true;
       }
    }
 __finally{ delete SL; }
}
//--------------------------------------------------------------------------
void __fastcall ClearToolBar(TToolBar* ToolBar)
{
 for(int i=0; i<ToolBar->ControlCount;)
    if( ToolBar->Controls[i]->ClassNameIs("TToolButton") )
        delete ToolBar->Controls[i];
    else ++i;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  GetBtns(Path,ToolBar1);
  Edit1->Text= Path;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ToolBar1Click(TObject *Sender)
{
 Edit1->Visible= true;
 ToolBar1->Visible= false;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClick(TObject *Sender)
{
   if(Path!= Edit1->Text)
    {
      Path= Edit1->Text;
      ClearToolBar(ToolBar1);
      GetBtns(Path,ToolBar1);
    }
 
   Edit1->Visible= false;
   ToolBar1->Visible= true;
}
//---------------------------------------------------------------------------

@Ramoncheg · 29.04.2013, 21:39

Не по теме:

Avazart, что вы использовали для записи видео с экрана ? какую программу ?

@Avazart · 29.04.2013, 21:40

Сообщение от Ramoncheg

Avazart, что вы использовали для записи видео с экрана ? какую программу ?

SnagIt

@Tarik20 · 30.04.2013, 16:19 **[ТС]**

Спасибо!Больше не надо.

@Avazart 8482 / 6149 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	29.04.2013, 21:40	15
	Сообщение от Ramoncheg Avazart, что вы использовали для записи видео с экрана ? какую программу ? SnagIt 1

@Tarik20 21 / 22 / 5 Регистрация: 14.02.2013 Сообщений: 243
		1
	Edit с стрелками 29.04.2013, 17:41. Показов 1954. Ответов 15 Метки нет (Все метки) Нужно edit который будет показывать путь к файлу не так "C:\Program Files\Borland\CBuilder6\", а вместо "\" стрелка так как в стандартном проводнике. 0

@Avazart 8482 / 6149 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	29.04.2013, 17:46	2
	Пиши свой компонент, или ищи среди сторонних 0

@Tarik20 21 / 22 / 5 Регистрация: 14.02.2013 Сообщений: 243
	29.04.2013, 17:52 [ТС]	3
	Сообщение от Avazart Пиши свой компонент, или ищи среди сторонних Мне нужно просто 26-той символ в едит засунуть. 0

@Avazart 8482 / 6149 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	29.04.2013, 17:53	4
	И что дальше ? Он то не будет срабатывать на нажатие как в проводнике ... 0

@nick42 Практикантроп 4838 / 2724 / 532 Регистрация: 23.09.2011 Сообщений: 5,789
	29.04.2013, 18:11	7
	Символы, значением меньше 32, являются непечатными (управляющие символы). Если хочешь любоваться стрелкой, - найди в таблице символов подходящий шрифт и код. 0

@Tarik20 21 / 22 / 5 Регистрация: 14.02.2013 Сообщений: 243
	29.04.2013, 18:27 [ТС]	8
	Сообщение от nick42 Символы, значением меньше 32, являются непечатными (управляющие символы). Если хочешь любоваться стрелкой, - найди в таблице символов подходящий шрифт и код. Ну значит возьму символ '>' а потом подумаю. 0

@Avazart 8482 / 6149 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	29.04.2013, 18:30	9
	Ну а зачем оно вообще надо ? Если имитировать проводник, то нужно лепить из ToolBar и ComboBox 0

@Ramoncheg
	29.04.2013, 21:39 #14
	Не по теме: Avazart, что вы использовали для записи видео с экрана ? какую программу ? 0

@Tarik20 21 / 22 / 5 Регистрация: 14.02.2013 Сообщений: 243
	30.04.2013, 16:19 [ТС]	16
	Спасибо!Больше не надо. 0