Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Версия 1.67


Kladov ©   (2003-02-11 21:02:00) 

Готово. Выкладываю.


Kladov   (2003-02-16 09:05:00) [1]

Принято.


Alexander   (2003-02-16 03:10:00) [2]

Извиняюсь за задержку. С предложенным исправлением заработало под NT


Bartov   (2003-02-16 01:25:00) [3]

2Kladov
>А то уже 1.68 выкладывать пора.
Давно пора ;-)


Kladov   (2003-02-16 00:17:00) [4]

Ну кто-нибудь, попробуйте, у кого NT. А то уже 1.68 выкладывать пора.


Kladov   (2003-02-15 11:32:00) [5]

function MenuStructSize: Integer;
begin
Result := 44;
if not( WinVer in [wv31, wv95, wvNT] ) then
( TMenuItemInfo)

function MenuStructSize: Integer;
begin
Result := 44;
if not( WinVer in [wv31, wv95, wvNT] ) then
Result := {48=} Sizeof( TMenuItemInfo );
end;


Вот. Попробуйте под NT такое исправление.


Kladov   (2003-02-15 11:03:00) [6]

и чего это я понял, что проблемы с TBButtonChecked, когда о меню шло. Все-таки лучше, когда ветка касаема не версии, а конкретного бага, и тогда тема обсуждения конкретная. Буду смотреть. У меня все версии от 0.73 живы.

В Autowar пока поиграйте. Кстати, советую испытать на детях 10-14 лет. У кого есть такие. Собственно, в 95г. для целей обучения детей программированию и придумывал.


Alexander   (2003-02-14 16:24:00) [7]

Может не ясно написал, извините.
Меню: с версии 1.63 и далее
ListView: с версии 1.60 и далее (может и с более ранней)

Всё для NT.

И ещё у меня когда стояла 1.66, то ToolBar нормально в Design Time отображал иконки, а 1.67 не отображает, точнее отображает, но не те, какие надо, а какие-то стандартные из списка.


Kladov   (2003-02-14 15:47:00) [8]

Так в какой версии KOL/MCK это наблюдается? В 1.67?


Alexander   (2003-02-14 08:15:00) [9]

Я всегда прежде чем что-то слать сюда ставлю последнюю версию. Обнаружив там проблему, которой до этого не было я пытаюсь откатом назад найти место её появления. Что и было проделано для нахождения проблемы с меню.


Bartov   (2003-02-13 15:37:00) [10]

2Alexander и всем.
Поймите, что многие проблемы решаются установлением последний версии KOL!!!
И если в последней версии(в данном случае 1.67) есть ошибки, то надо подымать вопрос о ликвидации их.


Alexander   (2003-02-13 14:01:00) [11]

По поводу ListView - с заголоаками в 1.60 и под 2000 проблема - затирается текст при изменении их ширины. Потом, не выяснил с какое версии, для 2000 такой глюк пропал.


Alexander   (2003-02-13 13:57:00) [12]

Так, после нескольких проб я обнаружил, что этот глюк с меню закрался при переходе с 1.62 на 1.63. То есть в 1.62 меню работает как нужно, а в 1.63 и позже уже нет (под NT).

Ещё, уже в 1.60 (более ранние версии не сохранились) под NT не отрисовываются заголовки столбцов для ListView. Они есть, обрабатываются нажатия, но они не нарисованы.


Kladov   (2003-02-12 20:18:00) [13]

Нет, не то. Лучше замените вот на такой код и скажите, какая ошибка:


procedure TControl.TBSetBtnStt(BtnID: Integer; const Index: Integer; const Value: Boolean);
begin
BtnID := GetTBBtnGoodID( @Self, BtnID );
if Perform( Index, BtnID, Integer( Value ) ) = 0 then
( "*** " + SysErrorMessage( GetLastError)

Нет, не то. Лучше замените вот на такой код и скажите, какая ошибка:


procedure TControl.TBSetBtnStt(BtnID: Integer; const Index: Integer; const Value: Boolean);
begin
BtnID := GetTBBtnGoodID( @Self, BtnID );
if Perform( Index, BtnID, Integer( Value ) ) = 0 then
ShowMessage( "*** " + SysErrorMessage( GetLastError ) );
end;


Kladov   (2003-02-12 19:30:00) [14]

Но у меня нет NT, и поставить не представляется возможным.

Посмотрите, при таком изменении кода что получается:


procedure TControl.TBSetBtnStt(BtnID: Integer; const Index: Integer; const Value: Boolean);
begin
BtnID := GetTBBtnGoodID( @Self, BtnID );
Perform( Index, BtnID, Integer( Value ) shl 16);
end;


В 2000 по крайней мере ничего не изменилось.


Alexander   (2003-02-12 17:00:00) [15]

Нет не пытаюсь - я одновременно проверяю на NT и 2000, на NT не работает! Ещё сеёчас обнаружил - не работает установка свойства Enabled := False - всё время все пункты меню активные. Опять же всё проверяю сразу под NT/2000/XP (VMWare)


Kladov   (2003-02-12 16:57:00) [16]

А раньше как было?
А вы случайно не пытаетесь программно поменять Checked на not Checked в событии OnClick?


Alexander   (2003-02-12 15:27:00) [17]

Под NT меню глючит с Checked - галочка не затирается, хотя атрибут меняется. Визуально получается, что постоянно Checked := True.


SPeller   (2003-02-11 21:35:00) [18]

Всё, разослал, дело за серваком когда он срастит и разошлёт письма.

> Ничего страшного, будешь спать по 2-3 часа в сутки как В.И.
> Ленин, но новости будешь рассылать вовремя!!! ;-)))
Ну уж нет! :-)) Эт сёдня я так засиделся. Вчера (10-го) было день рожденья и за день я успел выспаться пока отходняки были.


> Большая просьба не захламлять эту ветку!!!
> Сделайте себе закладку и пишите только о найденых вами БАГАХ
> в KOL 1.67!!!
Ну вот, нахламил я тут уже... ) Ну всё, всё... Не бейте сильно....
Ушёл спать.
:-))


Bartov   (2003-02-11 21:28:00) [19]

2Kladov
Пишите всегда в форуме о выходе новой версии!

2SPeller
>Вот, Бартов тут жаловался что на сутки новости опаздывают.... Сейчас на сутки раньше выйдут :-)) У вас там ещё 11-е, а у меня уже 12-е и скоро вставать в универ :-))))
Ничего страшного, будешь спать по 2-3 часа в сутки как В.И. Ленин, но новости будешь рассылать вовремя!!! ;-)))

Всем, всем!
Большая просьба не захламлять эту ветку!!!
Сделайте себе закладку и пишите только о найденых вами БАГАХ в KOL 1.67!!!


SPeller   (2003-02-11 21:12:00) [20]

Вот, Бартов тут жаловался что на сутки новости опаздывают.... Сейчас на сутки раньше выйдут :-)) У вас там ещё 11-е, а у меня уже 12-е и скоро вставать в универ :-))))


Наверх

Титульная страница Поиск, карта сайта Написать письмо