Форум программистов, компьютерный форум, киберфорум
C++ Builder
Форум программистов и сисадминов Киберфорум > Форум программистов > C/C++ > C++ > C++ Builder
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.80/15: Рейтинг темы: голосов - 15, средняя оценка - 4.80
0 / 0 / 0
Регистрация: 30.08.2011
Сообщений: 21
1

RichEdit : создании новой вкладки

02.11.2011, 16:52. Показов 2936. Ответов 7
Метки нет (Все метки)
Author24 — интернет-сервис помощи студентам
Привет всем! Решил сделать программу, это что то типа текстового редактора. И там должны присутствовать вкладки(например как в notepad++). И так, у меня есть RichEdit, есть диалоги сохранения и открытия файлов. В начале программы у меня создается 1 вкладка. И вот в чем проблема, как сделать, так чтоб при создании новой вкладки, в ней создавался чистый RichEdit, при этом чтобы текст в первой вкладке остался неизменным, и чтобы можно было сохранить текст из каждой вкладки. Если, проще то мне нужно сделать так, как сделано c вкладками в notepad++ . Натолкните меня на мысль плиз, а то ни одна идея в голову не приходит.
0
Лучшие ответы (1)
Сообщение: #2129962
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 02.11.2011, 16:52
Ответы с готовыми решениями:

Ошибка при создании новой компоненты (External exception eefface + code 87)
Никогда не создавал компоненты. Но вот пришлось, и не удачно... Видимо, из-за неправильного...

Из RichEdit в RichEdit без потери форматирования
Есть RichEdit1 с форматированным текстом(цвет, стиль и тп.) нужно передать этот текст в переменную...

Создаю вкладку TabPage. При динамическом создании новой вкладки, стирается все кнопки на других вкладках
Здравствуйте. Подскажите, пожалуйста. Вот мой код, что много слов не писать. private:...

создание новой вкладки
при создании браузера возникла проблема при создании вкладок надо чтобы вместе с вкладкой...

7
1066 / 583 / 87
Регистрация: 03.12.2009
Сообщений: 1,255
02.11.2011, 17:19 2
Лучший ответ Сообщение было отмечено как решение

Решение

когда то пытался делать что то наподобии интернет браузера со вкладками!

вкладки делал так и помещал туда CppWebBrowser, ну а по аналогии RichEdit думаю разберешься

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

void __fastcall TForm1::CreateATabClick(TObject *Sender) // Файл -> Открыть вкладку
{
newtab = new TTabSheet(this); //создаем вкладку в памяти
newtab->PageControl = PageControl1;  //указываем, где она будет жить
newtab->Name = AnsiString("TabSheet")+IntToStr(PageControl1->PageCount+1); //дадим системное имя
newtab->Caption = "Новая вкладка"; //дадим имя которое будет писатся на вкладке
 
newbrowser[num] = new TCppWebBrowser(PageControl1); //выделяем память и объясняем куда хотим вставить новый компонент
 
 
newbrowser[num]->TOleControl::Parent = newtab; //поясняем, куда конкретно вставить
newbrowser[num]->TOleControl::Name = AnsiString("CppWebBrowser")+IntToStr(PageControl1->PageCount+1); //даем системное имя
newbrowser[num]->TOleControl::Align = alClient; //расширяем на всю область
num++;
}
вот весь код

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163

//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include "Unit2.h"
#include "Unit3.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "SHDocVw_OCX"
#pragma resource "*.dfm"
TForm1 *Form1;
TTabSheet* newtab; //выделяем память под вкладку
TCppWebBrowser* newbrowser[50];
int num=0;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
newtab = new TTabSheet(this); //создаем вкладку в памяти
newtab->PageControl = PageControl1;  //указываем, где она будет жить
newtab->Name = AnsiString("TabSheet")+IntToStr(PageControl1->PageCount+1); //дадим системное имя
newtab->Caption = "www.yandex.ru"; //дадим имя которое будет писатся на вкладке
 
newbrowser[num] = new TCppWebBrowser(PageControl1); //выделяем память и объясняем куда хотим вставить новый компонент
newbrowser[num]->TOleControl::Parent = newtab; //поясняем, куда конкретно вставить
newbrowser[num]->TOleControl::Name = AnsiString("CppWebBrowser")+IntToStr(PageControl1->PageCount+1); //даем системное имя
newbrowser[num]->TOleControl::Align = alClient; //расширяем на всю область
num++;
ComboBox1->Text = "www.yandex.ru";
Home->Click();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ComboBox1KeyDown(TObject *Sender, WORD &Key, TShiftState Shift)
 
{
if(Key==VK_RETURN)
{
newbrowser[PageControl1->ActivePageIndex]->Navigate(StringToOleStr(ComboBox1->Text)); //Загружаем страницы
ComboBox1->Items->Add(ComboBox1->Text);  //Добавляем использованные адреса
newtab->Caption = ComboBox1->Text; //присвоить вкладке имя интернет странички
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::make_tab()
{
newtab = new TTabSheet(this); //создаем вкладку в памяти
newtab->PageControl = PageControl1;  //указываем, где она будет жить
newtab->Name = AnsiString("TabSheet")+IntToStr(PageControl1->PageCount+1); //дадим системное имя
newtab->Caption = "Новая вкладка"; //дадим имя которое будет писатся на вкладке
 
newbrowser[num] = new TCppWebBrowser(PageControl1); //выделяем память и объясняем куда хотим вставить новый компонент
newbrowser[num]->TOleControl::Parent = newtab; //поясняем, куда конкретно вставить
newbrowser[num]->TOleControl::Name = AnsiString("CppWebBrowser")+IntToStr(PageControl1->PageCount+1); //даем системное имя
newbrowser[num]->TOleControl::Align = alClient; //расширяем на всю область
num++;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Form1->KeyPreview=true; //включаем режим, когда все нажатия проходят через форму
 
Back->Glyph->LoadFromFile("images/Navigation Left 2.bmp");
Next->Glyph->LoadFromFile("images/Navigation Right 2.bmp");
Refresh->Glyph->LoadFromFile("images/Reflesh.bmp");
Stop->Glyph->LoadFromFile("images/Navigation Stop 2.bmp");
Home->Glyph->LoadFromFile("images/Home.bmp");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormKeyDown(TObject *Sender, WORD &Key, TShiftState Shift)
{
if((Key=='T')&&(Shift==TShiftState() << ssCtrl)) //Ловим нажатие Ctrl+t
  make_tab();
 
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::BackClick(TObject *Sender)
{
newbrowser[PageControl1->ActivePageIndex]->GoBack();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::NextClick(TObject *Sender)
{
newbrowser[PageControl1->ActivePageIndex]->GoForward();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::RefreshClick(TObject *Sender)
{
newbrowser[PageControl1->ActivePageIndex]->Refresh();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::StopClick(TObject *Sender)
{
newbrowser[PageControl1->ActivePageIndex]->Stop();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::HomeClick(TObject *Sender)
{
newbrowser[PageControl1->ActivePageIndex]->GoHome();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormResize(TObject *Sender)
{
Form1->ComboBox1->Width = Form1->Width - 180;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::OpenClick(TObject *Sender)
{
if (OpenDialog1->Execute())          // открытие страницы
{
newbrowser[PageControl1->ActivePageIndex]->Navigate(StringToOleStr(ComboBox1->Text));
ComboBox1->Items->Add(ComboBox1->Text);
}
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SaveClick(TObject *Sender)
{
newbrowser[PageControl1->ActivePageIndex]->ExecWB(OLECMDID_SAVEAS, OLECMDEXECOPT_DODEFAULT); //Сохранить страницу
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::ExitClick(TObject *Sender)
{
Form1->Close();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::PrintClick(TObject *Sender)
{
newbrowser[PageControl1->ActivePageIndex]->ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_DODEFAULT); //печать страницы
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::AboutProgramClick(TObject *Sender)  // About -> О программе
{
Form2->ShowModal();   // Окно в Модальном режиме "О программе"
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::AboutTheAuthorClick(TObject *Sender) //  About -> Об авторе
{
Form3->ShowModal(); // Окно в Модальном режиме "Об авторе"
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::CreateATabClick(TObject *Sender) // Файл -> Открыть вкладку
{
newtab = new TTabSheet(this); //создаем вкладку в памяти
newtab->PageControl = PageControl1;  //указываем, где она будет жить
newtab->Name = AnsiString("TabSheet")+IntToStr(PageControl1->PageCount+1); //дадим системное имя
newtab->Caption = "Новая вкладка"; //дадим имя которое будет писатся на вкладке
 
newbrowser[num] = new TCppWebBrowser(PageControl1); //выделяем память и объясняем куда хотим вставить новый компонент
newbrowser[num]->TOleControl::Parent = newtab; //поясняем, куда конкретно вставить
newbrowser[num]->TOleControl::Name = AnsiString("CppWebBrowser")+IntToStr(PageControl1->PageCount+1); //даем системное имя
newbrowser[num]->TOleControl::Align = alClient; //расширяем на всю область
num++;
}
//---------------------------------------------------------------------------
ну думаю разберешься как нибудь!
4
0 / 0 / 0
Регистрация: 30.08.2011
Сообщений: 21
02.11.2011, 17:21  [ТС] 3
Спасибо, ща посмотрю.
0
0 / 0 / 0
Регистрация: 30.08.2011
Сообщений: 21
06.11.2011, 19:19  [ТС] 4
Еще не подскажите, как закрыть активную вкладку?
Никак ни получается
0
Практикантроп
4839 / 2724 / 533
Регистрация: 23.09.2011
Сообщений: 5,792
07.11.2011, 12:44 5
<как закрыть активную вкладку? > закрыть понимается "удалить"? Вот таким макаром:
C++
1

delete PageControl1->Pages[PageControl1->ActivePageIndex];
1
0 / 0 / 0
Регистрация: 30.08.2011
Сообщений: 21
07.11.2011, 14:12  [ТС] 6
Да, спасибо то что нужно.
Но думаю так будет лучше:
C++
1

delete PageControl1->ActivePage;
0
64 / 40 / 10
Регистрация: 12.11.2010
Сообщений: 841
15.12.2011, 11:12 7
А можете исходник скинуть? Чтобы на непосредственном примере посмотреть?
0
1 / 1 / 2
Регистрация: 11.11.2012
Сообщений: 93
15.11.2012, 21:44 8
AJIEKC, мог бы ты скинуть свои исходники, если у тебя все получилось с RichEdit'ом?
0
15.11.2012, 21:44
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
 15.11.2012, 21:44
Помогаю со студенческими работами здесь

Открытие новой вкладки
Помогите пожалуйста с кодом. Хочу сделать так, чтобы при нажатии на ссылку она открывалась в...

Открытие новой вкладки
Нужно чтобы при переходе открывалась не новое окно, а ВКЛАДКА, поле с vk.com &lt;html&gt; &lt;head&gt; ...

Открытие новой вкладки
Помогите пожалуйста с кодом. Хочу сделать так, чтобы при нажатии на ссылку она открывалась в...

Открытие новой вкладки
Здравствуйте, видел, что есть сайты где при клике на любое место перекидывает на другой сайт. Как...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru