[Dagmanor]

Всем доброго времени суток. Прошу помощи по вот такому вопросу:
Решил сделать небольшой календарик, на форму положил StringGrid и в ячейках вывожу числа. На фоне чисел в каждой ячейке хотел сделать круг

OnDrawCell делаю так:

Код:

with Calendar.Canvas do
 begin
       R:=Rect;
        R.Top:=R.Top+5;
        R.Left:=R.Left+5;
        R.Bottom:=r.Bottom-5;
        R.Right:=r.Right-5;
        Pen.Color:=clHotLight;
        Brush.Color:=clHotLight;
        Ellipse(R);
 
 
   
  end;

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

Для написания использую Delphi 7.

[M.A.D.M.A.N.]

Самый наипростейший вариант - цифры картинками с уже заданным сглаживанием сделать, поместить в ImageList и выводить из него.

[Dagmanor]

Согласен, картинки в ImageList-е могут помочь, но все равно тема интересная. Хочется сделать именно сглаживанием.

Для наглядности покажу как получается

[M.A.D.M.A.N.]

Не открывается картинка, залей на fastpic.

[Dagmanor]

http://i60.fastpic.ru/big/2013/1022/...070a0bf70f.jpg

[M.A.D.M.A.N.]

Посмотри здесь:
http://delphiworld.narod.ru/base/gau...ls_shadow.html

[Dagmanor]

Спасибо за помощь. Буду наверное использовать Гауссовское размытие.

[M.A.D.M.A.N.]

Вечером поищу более простой вариант размытия.

[dr. F.I.N.]

Если устроит такое качество - выложу код. http://zalil.ru/34788775

[Dagmanor]

Сообщение от dr. F.I.N.

Если устроит такое качество - выложу код. http://zalil.ru/34788775

Да, качество хорошее, буду благодарен за помощь.

[NumLock]

имхо, лучше чтобы еще края были полупрозрачными, чтобы на любом цвете фона было красиво.

[dr. F.I.N.]

Алгоритм простой:
1. Исходная картинка увеличивается в N раз (мне хватило 3, выше результат не сильно заметен).
2. На увеличенной картинке рисуем что надо с увеличением в N раз.
3. Уменьшаем полученную картинку в N раз, беря среднее значение цвета пикселей каждого квадрата NxN.
Код попозже вытяну из программы (много лишнего в процедуре). Но тут на DS есть исходник реализующий данный алгоритм.

[Dagmanor]

Спасибо большое за ответы. Приятно когда людям не "в лом" помочь, но разобрался уже сам. Реализовал с помощью GDI+.