Вверх ↑
Ответов: 211
Рейтинг: 52
#1: 2012-09-29 17:25:51 ЛС | профиль | цитата
CriDos писал(а):
Если в схеме присутствует более 1 кнопки (Button ), программа уходит в цикл и постоянно грузит ЦП.

Для пользователя среды: Если в схеме присутствует более 1 кнопки, одна из них должна быть с установленным свойством DefaultBtn в true
Netspirit,
Для разработчика кодогенератора: необходимо исключить назначение свойства DefaultBtn := False, если оно явно не определено в True ( отличается от INI). Т.е. в CodeGen.dpr где-то в теле функции SetProp (завтра посмотрю), необходимо исключить установку значения для выше указанного свойства в False. Примерный фильтр (на память)
if ElIsDefProp(e,i) and (PropGetName(p)='DefaultBtn') and (ElGetClassIndex(e) = Cl_WinElement) then continue;
P.S. обсуждалось в этой ветке http://delphimaster.ru/cgi-bin/forum.pl?id=1292331932&n=10
карма: 1
слтв
0