Работа с динамически созданными обьектами

@Arnike · Регистрация: 26.12.2008

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

Конкретно нужно создать один обьект(TCppWebBrowser) и указать его родителем другой обьект который был так же создан динамически например вкладка в TRzPageControl (Raize компонент) динамически была создана именно вкладка создается обьект таким образом

C++
1
2
3
  TCppWebBrowser *Browser = new TCppWebBrowser(TabSheet);
  Browser->Name = "Browser" + IntToStr(i);
  Browser->Parent = TabSheet;

получаем такие ошибки

[BCC32 Error] Unit2.cpp(42): E2247 'TCppWebBrowser::Name' is not accessible
[BCC32 Error] Unit2.cpp(43): E2034 Cannot convert 'TRzTabSheet *' to '_di_IDispatch'

вот создание вкладки на случай всякий

C++
1
2
3
4
5
  TRzTabSheet *TabSheet = new TRzTabSheet(RzPageControl1);
  TabSheet->Parent = RzPageControl1;
  TabSheet->Name = "TabSheet" + IntToStr(i);
  TabSheet->Caption = "Вкладка " + IntToStr(i);
  TabSheet->PageControl = RzPageControl1;

так же думаю будет в тему вопрос каким обазом можно сделать динамически обновляющийся список TTreeView выложу свою идею)требуется чтобы при запуске программы она сканировала оределенную папку на наличие подпапок эти папки она будет использвать для составления списка первого уровня второй уровень тем же путем и третий уже по названию содержащихся там файлов...вообще каким образом это возможно сделать?нужно хотябы направление)

Добавлено через 3 часа 41 минуту
С ошибками так ничего и не понял...в чем проблема

@Arnike · 30.10.2010, 12:03 **[ТС]**

спасибо огромное)работаю я в CodeGear 2007-м он я так понимю не входит в разряд старых?я попробовал этот способ и не смог скомпилировать программу...получил ошибку получения метода

@Arnike · 01.11.2010, 19:47 **[ТС]**

Купил 7е издание Архангельского...такой наплыв информации но почему то так нужному мне TSearchRec практически ничего...господин Архангельский сказал мне лишь то что это используется для поиска...а как непонятно прочитал кучу тем где обсуждались проблемы этого самого TSearchRec да можно что то собрать из этого но я хочу понять как это работает с чем это едят и что же можно с этим приготовить)

@Arnike · 13.11.2010, 22:43 **[ТС]**

С поиском разобрался...возникла проблема открытия html страницы в CppWebBrowser локально я подумал может быт это из за обратного слэша?что с этим можно сделать? вот код
Тут я по двойному клику на лист листбоксе создаю новую вкладку на RzPageControl'e и CppWebBrowser

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
void __fastcall TForm2::ListBox1DblClick(TObject *Sender)
{
for(int k=0;k<=100;k++)
{
 if(k == ListBox1->ItemIndex)
 {
 
  
  i++;
  TRzTabSheet *TabSheet = new TRzTabSheet(RzPageControl1);
  TabSheet->Parent = RzPageControl1;
  TabSheet->Name = "TabSheet" + IntToStr(i);
  TabSheet->Caption = "Вкладка " + IntToStr(i);
  TabSheet->PageControl = RzPageControl1;
  RzPageControl1->ActivePage = TabSheet;
  
  TWebBrowser *Browser = new TWebBrowser(this);
  Browser->Navigate(WideString("file:\\\\localhost\\" + ProgPath + "\\" + ListBoxIndex[k]));
  Browser->TOleControl::Parent = TabSheet;
  Browser->TOleControl::Name = "Browser" + IntToStr(i);
  Browser->TOleControl::Align = alClient;
 
 }
 
}
 
}

Вот так нахожу путь к программе

C++
1
2
3
void __fastcall TForm2::FormCreate(TObject *Sender){
ProgPath = ExtractFileDir(Application->ExeName);
}

может стоит попробовать открыть файл выдернуть все содержимое и потом уже отправить его в CppWebBrowser не используя Navigate??

@MikeSoft · 13.11.2010, 22:56

Arnike, в Navigate используйте обычный путь к файлу.

@Arnike · 13.11.2010, 23:07 **[ТС]**

MikeSoft, Если вы имели в виду это

C++
1
  Browser->Navigate(WideString(ProgPath + "\\" + ListBoxIndex[k]));

то уже пробовал не получается выводил сообщение с путем файла все в порядке...не понимаю тогда в чем может быть ошибка да кстати ListBoxIndex[k]содержит в себе и ".html"

Добавлено через 5 минут
Извиняюсь за свою тупость...но я совсем забыл что у меня имеется ComboBox который содержит подпапку в которой находятся мои страницы...должно было быть так

C++
1
 Browser->Navigate(WideString(ProgPath + "\\" + RzComboBox1->Text + "\\" + ListBoxIndex[k]));

столько времени провозиться и в итоге ошибка в какой то мелочи!)

@MikeSoft · 13.11.2010, 23:12

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

столько времени провозиться и в итоге ошибка в какой то мелочи!)

Бывает...

Если в чём-то сомневаетесь - используйте пошаговую отладку.
Там можно отследить, какой из параметров записан неправильно.

@Arnike · 13.11.2010, 23:20 **[ТС]**

спасибо)буду пробовать...небольшой вопрос в ListBox'e да вообще впринципе можно спрятать определенные символы?но не стирать хотя если нельзя то можно и стереть...я почему то думал что если можно добавить по средствам + то почему бы нельзя удалить -...а вот почему то нельзя)

@MikeSoft · 13.11.2010, 23:25

Arnike, удалить можно любой элемент. Достаточно всего лишь передать необходимый индекс:

C++
1
ListBox1->Items->Delete(i);

По поводу сокрытия элементов я писал здесь: Скрытие или деактивация пункта компонента ComboBox.
Методика описана для TComboBox, но логика - одинаковая.

@Arnike · 13.11.2010, 23:27 **[ТС]**

MikeSoft, нет вы не поняли я имел в виду только часть строки а не весь элемент мне нужно в лист боксе удалить\спрятать разрешение файлов...выглядит это некрасиво)

@MikeSoft · 13.11.2010, 23:40

Arnike, это ещё проще... в чём проблема?
Элементы представляют собой набор строк (TStrings *), поэтому для каждой строки применимы любые методы обработки.

Например, первый элемент записан как "FirstHTMLPage.htm".
Нам необходимо удалить последние четыре символа. Сделаем это так:

C++
1
2
int Length = ListBox1->Items->Strings[0].Length();
ListBox1->Items->Strings[0] = ListBox1->Items->Strings[0].Delete(Length-3,4);

@Arnike · 13.11.2010, 23:44 **[ТС]**

Даже так...спасибо я даже не подумал смотреть на это с такой стороны...))

Новые блоги и статьи Все статьи Все блоги /
Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .	Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .	мат медиц модель 30. презентация проекта anaschu 27.08.2026 хоп хоп хоп хидахоп, а я кладую))	Как у меня протекала болезнь zorxor 27.08.2026 Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .

@Arnike 23 / 23 / 4 Регистрация: 26.12.2008 Сообщений: 142
	30.10.2010, 12:03 [ТС]
	спасибо огромное)работаю я в CodeGear 2007-м он я так понимю не входит в разряд старых?я попробовал этот способ и не смог скомпилировать программу...получил ошибку получения метода 0

@Arnike 23 / 23 / 4 Регистрация: 26.12.2008 Сообщений: 142
	01.11.2010, 19:47 [ТС]
	Купил 7е издание Архангельского...такой наплыв информации но почему то так нужному мне TSearchRec практически ничего...господин Архангельский сказал мне лишь то что это используется для поиска...а как непонятно прочитал кучу тем где обсуждались проблемы этого самого TSearchRec да можно что то собрать из этого но я хочу понять как это работает с чем это едят и что же можно с этим приготовить) 0

@MikeSoft 3957 / 1812 / 184 Регистрация: 21.11.2009 Сообщений: 2,540
	13.11.2010, 22:56
	Arnike, в Navigate используйте обычный путь к файлу. 1

@Arnike 23 / 23 / 4 Регистрация: 26.12.2008 Сообщений: 142
	13.11.2010, 23:20 [ТС]
	спасибо)буду пробовать...небольшой вопрос в ListBox'e да вообще впринципе можно спрятать определенные символы?но не стирать хотя если нельзя то можно и стереть...я почему то думал что если можно добавить по средствам + то почему бы нельзя удалить -...а вот почему то нельзя) 0

@Arnike 23 / 23 / 4 Регистрация: 26.12.2008 Сообщений: 142
	13.11.2010, 23:27 [ТС]
	MikeSoft, нет вы не поняли я имел в виду только часть строки а не весь элемент мне нужно в лист боксе удалить\спрятать разрешение файлов...выглядит это некрасиво) 0

@Arnike 23 / 23 / 4 Регистрация: 26.12.2008 Сообщений: 142
	13.11.2010, 23:44 [ТС]
	Даже так...спасибо я даже не подумал смотреть на это с такой стороны...)) 0