Почему не работает енаблед?

← →
Korona © (2002-09-22 15:35) [0]

Мастера! Подскажите, пожалуйста, почему свойство формы 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) [1]

изменяешь цвет формы сам и смотришь showmessage(booltostr(form1.enabled)) если -1 то true

Почему не работает енаблед? Найти похожие ветки