FreePascal.ru

Lazarus 2.0 (который релиз), rxlib c m (6831 как я понимаю). При компиляции :
Компиляция пакета rxnew 3.3.1.220: Код завершения 1, ошибок: 3
rxdbgrid.pas(1146,33) Error: No property found to override
rxdbgrid.pas(1146,33) Error: This kind of property cannot be published
rxdbgrid.pas(1146,33) Fatal ...

по ShowInfoLabel. Если в DisignTime установить в False, при запуске все равно будет показывать InfoLabel. т.к. в процедуре TRxMDICloseButton.DoPositionLabel устанавливается FInfoLabel.Visible := Visible. (215 стр.). Если ее закомментировать, тогда работает. м.б. так FInfoLabel.Visible := Visible and ...

оперативно
1. Не хочет работать ShowInfoLabel. Всегда видно. м.б. потому, что в процедуре TRxMDICloseButton.DoPositionLabel FInfoLabel.Visible := Visible?
2.OnChangeCurrentChild не срабатывает когда закрывается последний Child. Он ведь становится совсем не Current.
может в конце TRxMDIPanel ...

Пожелания/хотелки по RxMDI:
1. Убрать или сделать опциональной отображение Caption у RxMDICloseButton (FCloseButton.FInfoLabel.Caption). (ChildWindow.Caption и так отображается на вкладке в RxMDITasks);
2. Сделать закрытие чайлдов щелчком средней кнопки мыши по вкладке (RxMDIButton). Как во многих ...

Подскажите, до 1,8 кажется такого не было. При первой компиляции, после открытия проекта, вначале происходит компиляция FCL,LazUtils,LCLBase,CodeTools,LCL и т.д. и после этого только сам проект. При повторной и далее - только сам проект. Стоит открыть другой проект и опять эти FCL,LazUtils,LCLBase ...

FormStyle:=fsSystemStayOnTop не помогает?

Простите за небольшой оффтоп.Если проблема решена в svn, как я понимаю надо закрыть тему на багтрекере, но я кнопки close, либо чего-то подобного не вижу. Или не я закрываю?

Мучительно долго собирал из svn Lazarus 1.5 (оказалось на самом деле все просто). Да, баг с PopupParent ушел и костыль уважаемого Padre_Mortius так-же работает . К сожалению даже на последней svn сборке исходная проблема с FormStyle=fsStayOnTop осталась. (Form2 редко, но все же остается над чужими ...

Нет, да и думаю и не должно было. Это не остатки Form2 на канве Form1, это почти полноценная форма без возможности закрытия. Form2 после манипуляций описаных 3 постами выше получает некий странный статус. Как будто ее некий приватный FVisible устанавливается в false и Hide, close и пр. не действуют ...

То что Form2 наполовину прорисована, это я просто ситуацию обрисовал, репаинт ей не нужен. Я вообще ее в п.3 закрыл, ее не должно быть вообще. Пустая Form2 без компонентов то-же появляется из небытия. Принудительное Hide, close, visible:=false на эту фантомную форму не действуют.

Добавлено спустя ...

Пробовал дома воспроизвести (Win 7):
Открыл Word, развернул на весь экран, запустил проект с пресловутыми Form1, Form2.
Щелкал в панели задач Документ1-project1-Документ1-project1... рука устала все корректно.
Щелкнул в панели задач project1 а затем по экрану с Word и ... вот она неактивная вверху ...

Оставаться наверху перед чужим приложением должна форма с FormStyle=fs System StayOnTop.
Проблема заключается в том, что форма с FormStyle=fsStayOnTop иногда случайным образом ведет себя как FormStyle=fsSystemStayOnTop.
Вот еще нашел:
Lazarus_0.9.30_release_notes:
TCustomForm.FormStyle added ...

У меня при вызове Application.MessageBox('...','....', MB_OK+MB_ICONERROR) на машине с win XP отсутствует звук ошибки (выбрана стандартная звуковая схема), а на машинах с win 7 все нормально.
Проверьте пожалуйста.
Lazarus 1.2.6 fpc 2.6.4

Постараюсь поподробнее :
Простой проект:
-Главная форма Form1 на ней Button1.
-Еще одна форма Form2 c FormStyle=fsStayOnTop для наглядности с меньшим размером
-
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Show;
end;

При запуске после нажатия Button1 видим Form1 и Form2
Сейчас ...

При переключении между приложениями периодически (довольно часто) Формы с FormStyle=fsStayOnTop остаются сверху другого активного приложения а не исчезают вместе с главной формой.
Lazarus 1.2.6 Windows 7 и Win XP