Вниз
Скачать: CL | DM;

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

 
Ярослав   (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.


 
ЮЮ ©   (2006-04-18 11:19) [4]

убери строчку
var
  pr_zapr_form: TPr_zapr_Form

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


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

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.061 c
9-1128980051
Ricks
2005-10-11 01:34
2006.05.07
Элементарный ИИ в стратегиях


15-1144955727
Yozh_Programmer
2006-04-13 23:15
2006.05.07
Проблема с телевизором Toshiba


8-1131123964
serko
2005-11-04 20:06
2006.05.07
Звук и видео!


2-1145343083
MZUser
2006-04-18 10:51
2006.05.07
Как передать управление...


2-1145105032
Keks
2006-04-15 16:43
2006.05.07
Создание всплывающего сообщения




   Наверх