Баг в MCK?

← →
Shanker (2005-02-28 23:28) [0]

При создании формы задаю свойство Caption. После нажатия Enter свойство снова возращается в изначальное "Form1". Положение исправляет ручная модификация этого свойства в Unit1.dfm
Похожая проблема и с KOLToolbar, когда создаю кнопку там: никак не поменять положение кнопки (свойства Left и Top). Но в этом случае ручная модификация Unit1.dfm уже не спасает...

← →
Solik (2005-03-01 07:12) [1]

дык свойства то менять надо у kolform а не у form
Читайте FAQ, уроки, таам все это есть!!

← →
Shanker (2005-03-01 09:13) [2]

Я как раз там и меняю, но не получается, как я писал выше.

← →
mdw © (2005-03-01 11:01) [3]

Нет. Раньше нужно было менять у KOLForm, а некоторое время назад (версию не помню) стало у Form"ы.
А у Toolbar так и должно быть.

← →
dimaxx © (2005-03-01 22:30) [4]

Не помогает ни у Form, ни у KOLForm. Приходится извращаться и в OnCreate задавать заголовок.

← →
Vladimyr © (2005-03-02 19:34) [5]

У меня всё нормально. KOL 2.05

← →
Shanker (2005-03-03 01:24) [6]

dimaxx
Не мучайся с OnCreate: просто вручную отредактируй Unit1.dfm как я.

Vladimyr
У меня Delphi6 + KOL 2.05 и ничего ненормально

← →
<Falcon> (2005-03-03 10:23) [7]

У меня тоже ненормально. Как помоему - это баг и его убирать нужно. Можно и dfm править и в теле программы кэпшн задавать, но раз это свойство в инспекторе доступно для редактирования, то неплохо бы чтоб его изменение эфект имело...

← →
Vladimyr © (2005-03-03 11:19) [8]

Кэпшин у КОЛ-формы автоматически берёт значение из кэпшина Дельфи-формы.
Меняешь его (в свойстве редактора) - и у КОЛ-формы он сам меняется.
Ну вот прямо щас проверил - всё ОК.

Правда, может не работать, если в свойствах проекта отключён автобилд.
Тогда надо включить его, или пробилдить проект вручную (установить свойство "BUILD" в true).

Мне кажется я нашел в чем дело (надо еще все проверить).
В mirror.pas надо поправить сл. функцию (исправления я выделил
жирным шрифтом):

procedure TKOLForm.SetFormCaption(const Value: String); begin ... if not FLocked then begin inherited Caption := Value; if (Owner <> nil) and (Owner is TForm) then (Owner as TForm).Caption := Value; end; ...

После исправления пересоберите основной пакет MCK.
У меня Delphi6+2.05 - все стало ОК - меняется заголовок
в обоих местах - и на форме Делфи и KOLForm

Проверьте у себя плз.

З.Ы. Кстати теже "яйца" были и с KOLForm.Cursor...
Неужели никто не натыкался? :)
Поэтому в mirror.pas правим еще и следующее:

procedure TKOLForm.SetCursor(const Value: String); begin ... if not FLocked then //!ecm begin FCursor := UpperCase( Value ); Change( Self ); end; ...

Я менял курсор. Но через АПИ. Так что было пофиг :-)

Баг в MCK? Найти похожие ветки