[KSS]

JM-DG, thank you so much for your corrections! I`ll use it in the next version of the package.

Intense flickering of the component on resize may be quickly resolved if you:

1. change the base class for aceCommon.pas > TacSkinedControl from TCustomPanel to TCustomControl;

2. set DoubleBuffered property of the component to true.

I will try to find a better solution in the next version.

And give the link to you player page. It is very interesting to look at your project 🙂

[KSS]

Yes, I see this problem. I`ll try to fix it.

[KSS]

Небольшое обновление пакета.

Изменения:

• Пакет адаптирован под последнею стабильную версию Alpha Controls;[*]Добавлена автоматическая вертикальная прокрутка при выделении рамкой

P.S. Новая версия в первом сообщении.

{Eng} Minor package update.

Changes:

• Package adapted for the latest stable version of Alpha Controls;[*]Added auto vertical scroll on selection by frame

P.S. New version in the first post

[KSS]

Увидел, спасибо! Буду разбираться

[KSS]

'mario' wrote:

И тут уже сделать нечего. С новыми скинами работать не будет.

Я в ближайшее время адаптирую пакет под новую версию AC, всё будет работать

[KSS]

Я думал обновить компонент когда будет стабильная версия AC 14. В новой версии изменился вызов некоторых функций по отрисовке скинов. Просьба к Support-у обновить соответствующие мини-демки, чтобы было ясно как использовать обновлённые функции

[KSS]

Привет! Да, такое предложение уже было

Сейчас не получается активно заниматься компонентами, но когда попадаются проекты с их использованием, я стараюсь добавить что-то новое. Другими словами, я постараюсь добавить такой функционал по возможности

[KSS]

Небольшое обновление пакета.

Изменения:

• Пакет адаптирован под последнею стабильную версию Alpha Controls;[*]Добавлена анимированная подсветка заданного элемента (см. первая кнопка в демо);[*]Исправлена анимация заголовка ListView при перетаскивании колонок;[*]Исправлены найденные ошибки.

P.S. Новая версия в первом сообщении.

{Eng} Minor package update.

Changes:

• Package adapted for the latest stable version of Alpha Controls;[*]Added animated highlight of list item (first button in demo app);[*]Improved animation of ListView header during columns reordering;[*]Fixed errors.

P.S. New version in the first post

[KSS]

Спасибо! В моём случае, вариант с UpdateScrolls подойдёт.

[KSS]

Да, забыл добавить, вот всё что нужно.

[attachment=8086:ACScrollBag.zip]

В принципе, вся суть проблемы видна в первой функции из Main.pas

Code:

var
ScrollInfo: TScrollInfo;
Begin
ScrollInfo.cbSize := SizeOf(TScrollInfo);
ScrollInfo.fMask := SIF_POS;
ScrollInfo.nPos := 100;

SetScrollInfo(lv1.Handle, SB_VERT, ScrollInfo, True);
End;

После этого, вертикальный скролл должен сразу обновиться, а на деле он обновляется только при наведении на него мышкой или перерисовке компонента

[KSS]

Наткнулся на ещё одну ошибку в поведении скроллов. Если изменить состояние скроллов, то они визуально не изменятся, пока не наведешь на них мышкой или не перерисуешь принудительно компонент. С отключенными скинами это работает нормально.

Сделал похожую демку. Взял свой компонент и sListView – на обоих отрабатывает одинаково. Нужно нажать кнопку Change scroll, после чего прокрутка по вертикали должна сместиться к 100 у обоих компонент.

Экзешник [attachment=8076:ACScrollBag.zip]

Исходник [attachment=8077:ACScrollBag.zip]

[KSS]

Вам нужно редактировать раздел “Ext borders” на вкладке “General skin options”. Не уверен, что в скине MACOS/2 эта секция используется. Посмотрите скины, у которых рамка окна нестандартных размеров, например Beijing Ext.

[KSS]

Hi DelphiX!

Unfortunately, I see that I do not have enough time to test the components now. So I post components as is now. Try to use this version. Later, when I'll free, I will post the revised components.

[KSS]

Hi DelphiX!

Thank you for the feedback! I'll publish small update for component during the next week.

[KSS]

Спасибо! Так действительно работает правильно. Помню, раньше в одной из тем форума был выложен небольшой мануал по таким полезным функциям AC. Есть ли сейчас новая версия такого справочника?

[KSS]

Hello!

You should use a SelectedItem method in this case.

Code:

procedure TFormSamosChat.KssListViewLoginClick(Sender: TObject);
begin
if Assigned(KssListViewLogin.SelectedItem) then
ShowMessage(KssListViewLogin.SelectedItem.SubItems[0]);
end;

[KSS]

Тут было бы универсальнее сделать диапазон дат, которые будут доступны пользователю для выбора. Во всяком случае, в календарях для Веб именно так делают.

[KSS]

Спасибо Исходники есть, но уже старой версии, поэтому подожду когда обновится пакет.

[KSS]

похоже на то, что у Вас сбились значения свойства DataPresentation. У каждой колонки, это свойство отвечает за то, как будут отображаться данные в колонке. У колонки с флажками (Passed) это свойство должно равняться dpCheck, у колонки с иконками – dpImageFromList, у колонки с прогрессами – dpProgress

[KSS]

Ошибка при клике на заголовке столбца возникает в новых версиях Delphi. Я её исправил,но пока не выкладывал обновление. Замените код функции GetItemsArray и эта проблема исчезнет:

Code:

function TacListView.GetItemsArray: PPointerList;
var
i: Integer;
begin
new(Result);
SetLength(Result^, Items.Count * SizeOf(Pointer));
for i := 0 to Items.Count – 1 do
Result^ := Items;
end;

Про иконки и прогрессбары пока ничего не могу сказать. С такой проблемой ни разу не сталкивался. Потестируйте, может у Вас получится разобраться в чем проблема.

[Author]

Posts