![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 01.09.2010
Сообщений: 26
|
![]()
Подскажите, пожалуйста, как определить номер активного дочернего окна MDI?
|
![]() |
![]() |
![]() |
#2 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
![]()
Зачем номер? Используй свойство ActiveMDIChild у главной формы.
I'm learning to live...
|
![]() |
![]() |
![]() |
#3 |
Пользователь
Регистрация: 01.09.2010
Сообщений: 26
|
![]()
Новым окнам присваивается значение caption := 'окно'+inttostr(MDIChildCount), а при сохранении, если у окна имя окно1 или окно2..., вызывается диалог (т.е. файл новый, ранее не сохранённый) в противном случае в caption записан savedialog1.filename и файл без лишних вопросов сохраняется в то же место.
Кстати, такой вариант не работает file_name:= TFdoc(ActiveMDIChild).Caption; // TFdoc класс дочерних форм for i:=MDIChildCount downto 0 do //file_name переменная типа string if MDIChildren[i]=TFdoc(ActiveMDIChild) then k:=i; if file_name='окно+ inttostr(k) then |
![]() |
![]() |
![]() |
#4 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
![]() Цитата:
Давай ка опиши свою задачу как можно подробнее, я уверен что решается она гораздо по другому.
I'm learning to live...
|
|
![]() |
![]() |
![]() |
#5 |
Пользователь
Регистрация: 01.09.2010
Сообщений: 26
|
![]()
Создаётся текстовый редактор: родительское окно - пустая форма с main menu, дочерние - richedit с панелью инструментов. Должен действовать как Word. Собственно, caption := 'окно'+inttostr(MDIChildCount) выводить не обязательно, но как-то называть вновь открытые окна нужно, если в пустом дочернем окне открывается существующий файл, то его имя помещается в caption. Заморочка с сохранением описана выше: т.е. программа должна понимать где редактируется существующий (сохранённый ранее) файл, а где новый (ранее не сохранённый).
p.s. Виталий, спасибо, что откликнулись. |
![]() |
![]() |
![]() |
#6 | |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,543
|
![]() Цитата:
Путь и имя файла можно и нужно хранить в private переменной MDI формы.
программа — запись алгоритма на языке понятном транслятору
|
|
![]() |
![]() |
![]() |
#7 | ||
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
![]() Цитата:
Или в принципе можно свое свойство прикрутить Цитата:
Каждая форма должна работать только со своим файлом. Нечего все действия сажать на главную форму.
I'm learning to live...
|
||
![]() |
![]() |
![]() |
#8 |
Пользователь
Регистрация: 01.09.2010
Сообщений: 26
|
![]()
Вы как всегда правы
![]() |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Получения текста из ListBox дочернего окна / Delphi | itsme | Помощь студентам | 1 | 13.01.2010 14:14 |
главное MDI без заголовка дочернего | vlad_ | Общие вопросы Delphi | 3 | 27.11.2009 01:51 |
Confirm при закрытии активного окна | Jensi | JavaScript, Ajax | 4 | 17.08.2009 19:06 |
Поиск активного окна | Arigato | Win Api | 5 | 22.11.2008 18:32 |
Как сделать чтобы дочерние окна в MDI-приложениях были вне главного окна??? | dimonchuk | Общие вопросы Delphi | 1 | 11.08.2007 12:13 |