Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];




Вниз

Как правильно создать fsMDIChild ФОРМУ 


IronHawk   (2002-01-29 16:44) [0]

О Уважвемые Мастера Делфи !
Не будите ли вы стольлюбезны описать эту ситуацию !
MDI Application Wizard откланяеться!
Нужна ситуация с сущестующими фомами !!!



Johnmen   (2002-01-29 16:51) [1]

Если в design-time то ставишь FormStyle=fsMDIChild...
Если вопрос глубже - на поконкретнее...



IronHawk   (2002-01-29 17:07) [2]

>>> Johnmen ©
>Если в design-time то ставишь FormStyle=fsMDIChild...
это я поставил
>Если вопрос глубже - на поконкретнее...
У меня есть проект к нему надо подключить две формы одну сделать fsMDIChild а вторую fsMDIForm чтоб основной формой проекта стала 2-я подключенная и дочерней стала 1-я подключенная, а старая основная тоже стала fsMDIChild !

Я всё это реализовал !
Но во время выполнения пректа, когда я вызиваю СТАРУЮ форму (которую сделал fsMDIChild даёт "ACCESS VIOLATION at adress ...).

как лечить ?
... Заранее благодарен !



Johnmen   (2002-01-29 17:23) [3]

Вообще то говоря, главной формой проекта м.б. одна форма,
поэтому, я думаю, что помимо делания старой главной формы
MDIChild надо сделать текущую MDIForm главной...
(но это фантазии на тему...конкретно не скажу - не приходилось...)



Юрий Зотов   (2002-01-29 17:30) [4]

Меню Project | Options, закладка Forms. Там назначьте правильную главную форму.



IronHawk   (2002-01-29 17:35) [5]

>>> Юрий Зотов ©
Я ЭТО И СДЕЛАЛ !
Та что MDIForm в АВтоКреате,
а те что MDIChild в АваилаблеФормс !!

Всё роде сделал! Что знаю!
... а глючит !
... кто ещё чего подскажет ???



Юрий Зотов   (2002-01-29 17:41) [6]

Значит, ошибка в коде. Поставьте BreakPoint на вызов формы и пройдите дебаггером.



IronHawk   (2002-01-29 17:57) [7]

>>> Юрий Зотов ©
НУ даёт он мне адреса ОнКлика НУ И ТОЛКУ !
Я ж не специалист в этом :-(((



Юрий Зотов   (2002-01-29 18:09) [8]

Дебаггером надо ТОЧНО определить то место, где возникает Exception. Там и ищите ошибку.



IronHawk   (2002-01-29 18:15) [9]

>>> Юрий Зотов ©

ТОЧНО ! я увидел но устронить её как ???



Юрий Зотов   (2002-01-29 18:19) [10]

Мы и дальше будем гадать на кофейной гуще, или дадите код, на котором вылетает программа?



IronHawk   (2002-01-29 18:35) [11]

могу скриншот прислать !
КУДА ?
Могу ваще апликуху прислать !



Юрий Зотов   (2002-01-29 18:42) [12]

1. Скриншот - это ценно. Но код ценнее.
2. Прислать - сюда. Но не весь код, а ту строку, на которой возникает ошибка плюс 10 строк ПЕРЕД ней. И еще нужны значения всех переменных в этой строке НЕПОСРЕДСТВЕННО перед возникновением ошибки (то есть, в тот момент, когда дебаггер стоит на этой строке).



IronHawk   (2002-01-29 18:51) [13]

procedure TMainForm.CreateMDIFrm(const Name: string);
var
AMAIN: TAMAIN;
begin
AMAIN := TAMAIN.Create(Application);
end;

procedure TMainForm.FileNew(Sender: TObject);
begin
CreateMDIFrm("!");
end;



IronHawk   (2002-01-29 18:55) [14]

[4F8:7AA0] StartServiceCtrlDispatcher being called.
[4F8:B53A] StartServiceCtrlDispatcher failed.
[4F8:B53A] StartServiceCtrlDispatcher being called.
[4F8:B53A] StartServiceCtrlDispatcher failed.
[4F8:B53A] StartServiceCtrlDispatcher being called.
[4F8:B53A] StartServiceCtrlDispatcher failed.

[3E0:8879] StartServiceCtrlDispatcher being called.
[3E0:C313] StartServiceCtrlDispatcher failed.
[3E0:C313] StartServiceCtrlDispatcher being called.
[3E0:C313] StartServiceCtrlDispatcher failed.
[3E0:C313] StartServiceCtrlDispatcher being called.
[3E0:C313] StartServiceCtrlDispatcher failed.

ТАК ПОЙДЁТ ?



IronHawk   (2002-01-31 10:15) [15]

>>> Юрий Зотов ©
Оба кода подходят ?




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.74 MB
Время: 0.019 c
14-42854          Nikolay               2001-12-24 15:33  2002.02.14  
О темах......


1-42738           MetroGnome            2002-01-30 23:04  2002.02.14  
Как программно посмотреть - находиться ли курсор на компоненте, скажем на Label`е?


1-42770           HDD                   2002-01-30 05:54  2002.02.14  
Помогите пожалуйста!


6-42827           Lamok                 2001-11-22 00:20  2002.02.14  
TServerSocket


3-42701           Yakudza               2002-01-22 21:39  2002.02.14  
Подскажите, очень срочно надо !!