Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 19.07.2010, 18:06
windaws windaws вне форума
Начинающий
 
Регистрация: 28.08.2009
Сообщения: 116
Репутация: 10
По умолчанию Открыть фрейм в отдельном окне

Всем доброго дня, подскажите как можно реализовать следующее: у меня есть на форме компонент treeview, вообще когда выбираешь соответствующий пункт в главном окне меняются фреймы, а хочу сделать так чтобы в дереве можно было нажать правой кнопкой мыши и по нажатию "открыть в новом окне" выбранный фрейм открывался соответственно в новом отдельном окне
Ответить с цитированием
  #2  
Старый 20.07.2010, 09:29
Black Raider Black Raider вне форума
Местный
 
Регистрация: 31.05.2010
Адрес: Москва
Сообщения: 466
Версия Delphi: 7
Репутация: 40
По умолчанию

Например так:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var fr:TForm3;
    rf:TFrame2;
begin
  fr:=TForm3.Create(self);
  rf:=TFrame2.Create(fr);
  rf.Left:=21;
  rf.top:= 20;
  rf.Parent:=fr;
  fr.ShowModal;
end;
__________________
Новый вирус - "БОМЖ"! Он просто роется в Корзине...и спит под ярлычком "Сетевое окружение"
Ответить с цитированием
  #3  
Старый 20.07.2010, 14:06
windaws windaws вне форума
Начинающий
 
Регистрация: 28.08.2009
Сообщения: 116
Репутация: 10
По умолчанию

Код:
procedure TForm4.Button1Click(Sender: TObject);
var fr:TForm12;
    rf:TMain_Frame;
begin
fr:=TForm12.Create(self);
rf:=Tmain_frame.Create(form12);
rf.Left:=21;
rf.top:= 20;
rf.Parent:=fr;
fr.ShowModal;
end;

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

Последний раз редактировалось windaws, 20.07.2010 в 14:22.
Ответить с цитированием
  #4  
Старый 20.07.2010, 15:37
Black Raider Black Raider вне форума
Местный
 
Регистрация: 31.05.2010
Адрес: Москва
Сообщения: 466
Версия Delphi: 7
Репутация: 40
По умолчанию

Цитата:
Сообщение от windaws
Код:
procedure TForm4.Button1Click(Sender: TObject);
var fr:TForm12;
    rf:TMain_Frame;
begin
fr:=TForm12.Create(self);
rf:=Tmain_frame.Create(form12);
rf.Left:=21;
rf.top:= 20;
rf.Parent:=fr;
fr.ShowModal;
end;

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

хмм... странно как то.
как вариант пропиши в uses новой формы модуль фрейма.
__________________
Новый вирус - "БОМЖ"! Он просто роется в Корзине...и спит под ярлычком "Сетевое окружение"
Ответить с цитированием
  #5  
Старый 20.07.2010, 17:39
windaws windaws вне форума
Начинающий
 
Регистрация: 28.08.2009
Сообщения: 116
Репутация: 10
По умолчанию

Все разобрался, у меня она просто по умолчанию визибл-фалс стоит

Последний раз редактировалось windaws, 20.07.2010 в 17:43.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 17:47.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter