![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Почему не работает енаблед? [D6, Win95/98, WinXP]
Korona © (2002-09-22 15:35:00)Мастера! Подскажите, пожалуйста, почему свойство формы enabled не изменяется на true? Точнее не видно этого изменения? Код такой:
procedure TForm1.CreateClientWindow(const Name: String);
begin
{Create client window}
LockWindowUpdate(Handle);
try
Form2 := TForm2.Create(Application);
Form2.Caption := Name;
finally
LockWindowUpdate(0);
end;
Form2.Enabled := True;
end;
Пояснение:
этим кодом создается немерцающее MDIChild окно. Но для этого нужно чтобы инсекторе объектов Enabled было False. В дальнейшем требуется Enabled := True, но в выше приведенном коде этого не происходит. Помогите!
Алексей Ким (2002-09-22 16:04:00) [1]изменяешь цвет формы сам и смотришь showmessage(booltostr(form1.enabled)) если -1 то true