Помогите, не знаю в чем дело

← →
Ярослав (2006-04-18 09:56) [0]

На дочерней форме mdichild
Разместил несколько RadioButton и хочу отключить или включить их
RadioButton_a_ok_vi.Enabled:=False ;
Выскакивет ошибка
Access violation at address 0069FB44 in module "AUDIT.exe". Read of address 00000320.

Что характерно разместил (RadioButton_a_ok_vi.Enabled:=False ;
) в обработчик события onclick кнопки работает ..

запихиваю в процедуру нет .
procedure closed ;

begin
Pr_zapr_Form.RadioButton_a_ok_vi.Enabled:=true ;
Pr_zapr_Form.RadioButton_a_ok_rv.Enabled:=true ;

Pr_zapr_Form.GroupBox_Auditor.Enabled:=false ;
pr_zapr_form.GroupBox_Predpr.Enabled:=false ;
pr_zapr_form.GroupBox_Standart.Enabled:=false ;
pr_zapr_form.GroupBox_ta.Enabled:=false ;
pr_zapr_form.GroupBox_data.Enabled:=false ;
pr_zapr_form.Edit_a_error.Enabled:=false ;
end ;

Кто знает что тут может быть ..

← →
Плохиш © (2006-04-18 10:12) [1]

Pr_zapr_Form не создано.

← →
Ярослав (2006-04-18 10:22) [2]

Почему же вызываю стандартно ..
{----------------------------} procedure CreatePr_zapr_Form; var Child: TPr_zapr_Form ; begin LockWindowUpdate(child.ClientHandle); Child := TPr_zapr_Form.Create(Application); Child.Left:=10; Child.Top:=10; Child.Width:=804; Child.Height:=495; child.Constraints.MaxHeight:=483; child.Constraints.MaxWidth:=804 ; child.Constraints.MinHeight:= 483; child.Constraints.MinWidth:= 804 ; LockWindowUpdate(0); end; {----------------------------}
Или вы имеете в веду что нужно в процедуре еще создавать Pr_zapr_Form

← →
Плохиш © (2006-04-18 10:35) [3]

> begin
> LockWindowUpdate(child.ClientHandle);
>
> Child := TPr_zapr_Form.Create(Application);

> begin
> Pr_zapr_Form.RadioButton_a_ok_vi.Enabled:=true ;

Найди одно отличие.

PS. Сделай свою procedure closed ; методом класса TPr_zapr_Form.

убери строчку
var pr_zapr_form: TPr_zapr_Form
в модуле формы и источник ошибок выявится ещё на этапе компиляции

← →
Ярослав (2006-04-19 12:06) [5]

я уже понял в чем косяк был

Помогите, не знаю в чем дело Найти похожие ветки