[aha]

SetWindowLong(ik1.Handle, GWL_STYLE, GetWindowLong(ik1.Handle, GWL_STYLE) or WS_DISABLED);//блокируется окно для ввода
где ik1:Tedit. А как можно после разблокировать в процессе выполнения программы ?

[Bargest]

Ты этот код хоть читал? Если бы читал, ответ бы стал ясен сам собой.
Если для блокировки надо поставить флаг, то что надо для разблокировки?

[aha]

не профессионал

[Bargest]

Если не понял, значит надо прочитать еще раз. А потом еще. Еще, еще, еще и еще. Потом можно еще и еще. Гуглить, разбираться, экспериментировать. Иначе никуда не уедешь.
Гуглить, что такое SetWindowLong, GetWindowLong, WS_DISABLED. Разобраться, что эти две функции с этим флагом делают. И придумать, как сделать обратное.
Просто копипастить куски кода и сшивать из них франкенштейна - это не программирование.

[aha]

интуитивно типа ws Enable ? но такого же флага нет..

[Bargest]

Что такое флаг WS_DISABLED? И что делает операция битовый OR?

[angvelem]

А сразу ответить не судьба?

Код:

  SetWindowLong(ik1.Handle, GWL_STYLE, GetWindowLong(ik1.Handle, GWL_STYLE) or not WS_DISABLED);

[Bargest]

Во-первых, тогда уж не or, а and.
А во-вторых, толку от такого ответа - завтра полезет на новый форум спрашивать ответа на очередной элементарный вопрос.

[aha]

оперативно улучшить код ..

[angvelem]

Во-первых, тогда уж не or, а and.

Молодец заметил, только не нужно было умничать и флуд разводить, а сразу ответить и, при желании, объяснить ТС почему именно так.