[Feg16]

8.02 / d7 / xp

Теперь на NextGrid меню скинированное, а на SynEdit нет. Лечится добавлением SynEdit в 3rd party. Но тогда само собой вся расцветка идет лесом, что неприемлимо. Добейте уже, чтобы на SynEdit / SynMemo контексное меню скинировалось

[Feg16]

И еще, может титлбару отрисовывать стандартные кнопочки, взять за основу фон к прмиеру средней кнопки, а не лепить какую-то каку 🙂

далее – если форма не активна, стандартные кнопки титлбара все равно яркие

[Feg16]

AS 8.02 – глюк ушел :a3:форма теперь стоит на месте и никуда не дергается

[Feg16]

И еще, если глиф от TitleButtons сохранить в файл не задавая расширение – то он сохранится как .png, хотя на самом деле там будет битмап

[Feg16]

И еще, на датамодуль титлбар не ложится =(

[Feg16]

'Support' wrote:

Привет!

После выхода компонента TsTitleBar свойство TitleButtons морально устарело, поэтому из демки было убрано, а в будущем, видимо, будет убрано и из пакета. Пока что оно оставлено для совместимости. Но я скоро посмотрю это моргание, спасибо.

Бааалин. 1.5 часа убил пытаясь запустить ТитлБар на бете 8.01 – а там оказывается скинпровайдер ее еще не поддерживает. Надеюсь в 8.02 не найдется весомых ошибок 🙂

[Feg16]

'SeaMan75' wrote:

не сработало – каждую форму открыл вне проекта и Save As…

При открытии формы выскакивает сообщение – мол такое то свойство у компонента не существует?

[Feg16]

Открой последовательно все формы и принудительно сохрани каждую. Общий рецепт без мозгоклюйства.

[Feg16]

'Rewalon' wrote:

в своих проектах ни разу не замечал подобного.

Можно чуть подробнее: версия библиотеки, скин, версия делфи?

Такой эффект наблюдал когда использовались скин-файлы от более ранних версий, так что проблема скорее всего корней не имеет 🙂

[Feg16]

'Support' wrote:

У вас проблема наблюдается в приложеной демке?

Пока что я не могу увидеть многократную перерисовку (смотрел под Win7x64 и WinXP)

Скорее всего он неверно выразился. Я наблюдаю в демке только как несколько раз “моргают” extended borders. На видео попытался записать, но оно прозрачность слабо ловит 🙁

[Feg16]

'Support' wrote:

7.21 это последняя используемая версия перед 7.65?

Нет. После 7.21 не смотрел скинируются или нет, так как проблема была решена.

[Feg16]

'duhar' wrote:

После их последовательного удаления все пошло

Чувствуется что не по тому пути ты пошел.. Ну да ладно, главное работает

[Feg16]

Я написал для примера, у меня на вкладках создаются формы, поэтому у вас скорее всего работать не будет. А фактический весь смысл примерно такой:

Code:

// Функция закрытия текущей вкладки, можно передать номер вкладки для закрытия той или иной вкладки
procedure TDataMain.ClosePageAuto();
var
CanClose: boolean;
Action: TacCloseAction;
begin
// Вызов заранее созданного эвента на пйджконтроле
// Pager – имя пейдж контрола, вместо активной страницы как уже писал выше можно передать номер вкладки
PageRCloseBtnClick(Self, Pager.ActivePageIndex, CanClose, Action);
// Уничтожаем текущую вкладку
Pager.ActivePage.Free;
end;

// Эвент от пейдж контрола
procedure TDataMain.PageRCloseBtnClick(Sender: TComponent; TabIndex: Integer;
var CanClose: Boolean; var Action: TacCloseAction);
begin
// Если убрать все мои прибамбасы – останется только параметр на разрешение закрыть вкладку
CanClose := True;
end;

[Feg16]

Та же фигня, топик с дфм и описанием был ранее. В аттаче рисунок – в 2 из 20 случаев при создании формы кнопка отрисована не будет. Даже при изменении размеров формы и прочих мейджик действиях, которые обычно помогают вернуть контролы для альфаскинов. Просто к примеру что уже 65 версий тянется паровоз что какие-то контролы иногда пропадают, если расположены на вытянутых панелях + групбоксах

[Feg16]

'ivanov34' wrote:

При востановлении формы из развёрнутого состояния, форма перерисовывается несколько раз, получается какое то мерцание, но на демке такого эффекта не наблюдается, как избавится от этого эффекта?

Сначала отрисовывается из кэша, потом по сообщению? Эта тема еще с 200* лохматого года вроде как висит 🙄

[Feg16]

'Support' wrote:

В какой предыдущей версии это работало?

Quote:

Версия 7.21 – Алелуйа!!! Попап меню стало отрисовываться ну просто замечательно :a3:

[Feg16]

'Rewalon' wrote:

Повторил баг на демке AC7.66

Добавлю, эффект присутствует как при использовании скинов, так и без них.

XPSP3 / D7 / 7.65 подтверждаю, стандартный PageControl ведет себя хорошо, TsPageControl – плохо, в независимости включены скины или нет

[Feg16]

Если посмотреть внимательней – при нажатии Ctrl+Tab – в поле ввода пишется #9 – то есть сам таб. Прикольный глюк 🙄

XPSP3 / D7 / 7.65

[Feg16]

После нескольких топиков пару лет назад, пришел к выводу, что только так:

Code:

procedure TDataMain.ClosePageAuto();
var
CanClose: boolean;
Action: TacCloseAction;
begin
PageRCloseBtnClick(Self, Pager.ActivePageIndex, CanClose, Action);
Pager.ActivePage.Free;
end;

procedure TDataMain.PageRCloseBtnClick(Sender: TComponent; TabIndex: Integer;
var CanClose: Boolean; var Action: TacCloseAction);
begin
if (Pager.ActivePage.ControlCount <= 0) then Exit;

with TForm(Pager.Pages[TabIndex].Controls[0]) do begin
Close;
Release;
CanClose := True;
end;
end;

Больше экспериментировать не стал, так как в том или ином случае зачастую появлялся AV с корнями хз откуда

[Feg16]

7.65 – проблема вернулась назад, на большей части форм меню прикрипленное к NextGrid то скинируется, то не скинируется вообще. На SynEdit (сначала без thirdparty, потом добавил) – не скинируется вообще. PopupMenu – мои, расположены на главном DataModule

[Author]

Posts