[delphicoding]

Здравствуйте!
Столкнулся с тупейшей проблемой не могу решить уже два дня -есть главное окно программы MDIForm, из него по нажатию батона создаётся новое окно MDIChild:

Код:

begin
//   Fx:=Formx.Create(self);
   Fx:=Formx.Create(Application);
   Fx.Varx:=1;
   Fx.Show;
end;

В создаваемом окне есть переменная

Код:

public
    Varx: Integer; // variant, boolean

на событие OnCreate/OnShow стоит код настройки отображения окна в соответствии с Varx вида:

Код:

if Varx=1 then begin 
 ..... настройки формы
end;

Проблема в том, что если стоит проверка "if..." нихрена форма не настраивается!!, если же строку с проверкой "if..." закомментить - сразу всё работает нормально!! То есть переменная почему-то не была определена!

Ещё в этой форме в некоторых случаях вылетает ошибка:

:7c812afb kernel32.RaiseException + 0x52
:00406d68 NotifyNonDelphiException + $1C
:7c90327a ntdll.RtlConvertUlongToLargeInteger + 0x3c
:7c90e48a ntdll.KiUserExceptionDispatcher + 0xe
:00544e33 TCustomForm.DoCreate + $37
:00544a77 TCustomForm.AfterConstruction + $17
:00544a46 TCustomForm.Create + $1A6

Посмотрел CallStack и CPU - ничего явно указывающего на ошибку нет.

Что за баг и как его исправить??? Пишите все предположения - проверю!

[M.A.D.M.A.N.]

Событие OnCreate выполняется до того, как ты передашь переменную. Можно конструктор класса формы свой написать, в него передавать и значение твоей переменной.

[delphicoding]

OnShow тоже пробовал - баг одинаковый.
Звучит стрёмно.

[NIch]

А почему не сделать VarX глобальной? Как вариант.
Или зачем ее инициализировать в событии OnCreate? Может только в OnShow?

[delphicoding]

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

[NIch]

Есть еще события формы...
http://www.delphisources.ru/pages/fa...rm_events.html
OnCreate
OnShow
OnPaint
OnActivate
OnResize
OnPaint
OnCloseQuery
OnClose
OnDeactivate
OnHide
OnDestroy

[Viajero]

Код:

GlobalVarx:=1;
   Fx:=Formx.Create(Application);
   Fx.Varx:=1;
.........................
TFormx.FormCreate(Sender: TObject);
begin
Varx:=GlobalVarx;
.........................

[delphicoding]

Есть еще события формы...
OnCreate
OnShow
OnPaint
OnActivate

Пробовал все очищать.

Viajero

?

[M.A.D.M.A.N.]

Говорю, передай как аргумент конструктора. Внутрях конструктора присвоишь значение какой-нибудь приватной переменной, а ее в свою очередь запользуешь на своем ФормКриэйт.

[Viajero]

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

Глобальной нельзя, тк таких окон может быть создано много и каждое со своим параметром VarX - поэтому расположить переменную можно только в самой форме.

Что мешает сделать и параметр, и глобальную переменную и через неё присваивать параметр (см мой пост выше). Этот способ я применял в своих программах, хотя способ, указанный M.A.D.M.A.N. теоретически более правильный.
Способов туева ... , не понимаю в чём проблема?

[M.A.D.M.A.N.]

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

... не понимаю в чём проблема?

Ответ кроется в названии темы.

[WinDriver]

Код:

...
Tformx = class(TForm)
...
private
...
  FVarX: Integer;
...
public
...
  constructor Create(Owner: TComponent; Varx: Integer);
...
end;

implementation

constructor TFormx.Create;
begin
  FVarx:= varx;
  inherited Create(Owner);
end;

и после этого юзать Fvarx в своём классе.

[delphicoding]

Что мешает сделать и параметр, и глобальную переменную и через неё присваивать параметр (см мой пост выше). Этот способ я применял в своих программах, хотя способ, указанный M.A.D.M.A.N. теоретически более правильный.
Способов туева ... , не понимаю в чём проблема?

Ответ настолько прост, что даже неудобного вам, профи, его объяснять... а именно: согласно правилам Delphi - всё должно работать и просто с переменной.

[sorockinalex]

Ребята, делфи пользуюсь давно, но как продвинутый пользователь. Недавно столкнулся с задачей сделать MDI DLL, программа была написана без модулей.. Скачал в интернете пример MDI DLL окна, прочитал данную тему, но ничего толком не понял в каком месте объявлять переменные, чтобы они были доступны двусторонне.. Стоит задача передать переменные из главной формы, чтобы изменить их и уже при закрытии MDI формы изменённые значения использовать в главной форме, помогите пожалуйста! Чувствую, моиз знаний недостаточно для этого, нервничать уже начал (
Если кому не сложно - измените пример по ссылке, пожалуйста! Нужно передать и принять в главной форме несколько переменных. Огромное спасибо заранее тому, кто поможет! Вот здесь скачал пример MDI DLL

[ChinYan]

Вы на дату сообщений смотрели? Новую тему создавайте