28.05.2018, 12:35 [+3 UTC]
в нашей команде: 2 795 чел. | участники онлайн: 5 (рекорд: 21)

:: РЕГИСТРАЦИЯ

:: задать вопрос

:: все разделы

:: правила

:: новости

:: участники

:: доска почёта

:: форум

:: блоги

:: поиск

:: статистика

:: наш журнал

:: наши встречи

:: наша галерея

:: отзывы о нас

:: поддержка

:: руководство

Версия системы:
7.47 (16.04.2018)

Общие новости:
13.04.2018, 10:33

Форум:
15.05.2018, 18:49

Последний вопрос:
28.05.2018, 12:03

Последний ответ:
28.05.2018, 08:55

Последняя рассылка:
28.05.2018, 12:15

Писем в очереди:
0

Мы в соцсетях:

Наша кнопка:

RFpro.ru - здесь вам помогут!

Отзывы о нас:
21.09.2009, 00:27 »
Егоров Ярослав Владимирович
Огромное спасибо! Вы правы: теперь действительно понятно. [вопрос № 172367, ответ № 254428]
17.06.2010, 20:15 »
Петров Юрий Иванович
Прога работает, спасибо) [вопрос № 179128, ответ № 262147]
07.12.2010, 16:33 »
Kozyr76
Отлично, хороший ответ [вопрос № 181122, ответ № 264546]

РАЗДЕЛ • Pascal / Delphi / Lazarus

Создание программ на языках Pascal, Delphi и Lazarus.

[администратор рассылки: Зенченко Константин Николаевич (Модератор)]

Лучшие эксперты в этом разделе

Зенченко Константин Николаевич
Статус: Модератор
Рейтинг: 256
Асмик Гаряка
Статус: Советник
Рейтинг: 38
Орловский Дмитрий
Статус: Мастер-Эксперт
Рейтинг: 4

Перейти к консультации №:
 

Консультация онлайн # 66768
Раздел: • Pascal / Delphi / Lazarus
Автор вопроса: Prowler
Отправлена: 13.12.2006, 07:27
Поступило ответов: 3

Доброго времени суток!
О вопросе № 66465.
Меня не интересовали дополнительные компоненты, моё приложение не будет находится в трее. И вообще из трея показываются не Balloon Tips, а Balloon Hints.
Думаю о двух способах:
1. Отрисовка прямо на экране, в области System Tray.
2. Создание нестондартной формы всё в той же области.

По первому способу возникло сразу несколько вопросов:
1. Размер текстового сообщения заранее не известен, как его можно вычеслить, чтобы размер фона не оказался меньше или больше текста.
2. Как сделать постепенное появление сообщения, то есть прозрачность.
3. Ну нарисовал, вывел текст, а как его оттуда обрать?

По второму вопросу пока только один вопрос: Как сделать полупрозрачную форму?

Заранее благодарю?

Состояние: Консультация закрыта

Ответ # 131349 от PaVeL_Ekt

Здравствуйте, Prowler!

По второму вопросу: в делфе 6 у формы есть свойство
AlphaBlend вкл/выкл прозрачности
и AlphaBlendValue от 0 до 255 уровень прозрачности формы, которые собственно и задают прозрачность


Консультировал: PaVeL_Ekt
Дата отправки: 13.12.2006, 07:40

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Ответ # 131401 от Сухомлин Кирилл Владимирович

Здравствуйте, Prowler!
Размер сообщения получается легко. Берете любой объект (пусть это будет SomeObject) с канвой, устанавливаете нужные параметры SomeObject.Canvas.Font, И применяете методы:
s := MyEditWithText.Text;
w := SomeObject.Canvas.TextWidth(s);
h := SomeObject.Canvas.TextHeight(s);
Ес-сно, учет переноса текста на новую строку и пр придется осуществлять самому.

Рисовать на десктопе можно с использованием контекста устройства:
hdc := GetDC(nil);
И далее см. любую справку по WinAPI
только я что-то никак не пойму, как перерисовывать на столе.


Консультировал: Сухомлин Кирилл Владимирович
Дата отправки: 13.12.2006, 12:30

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Ответ # 131575 от Rusland

Здравствуйте, Prowler!
Посмотрите код в приложении. Это способ вызова стандартных baloon-ов. Установка позиции - см. TTM_TRACKPOSITION.
В uses нужно подключить CommCtrl.

Приложение:


Консультировал: Rusland
Дата отправки: 14.12.2006, 11:26

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

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

Яндекс Rambler's Top100

главная страница | поддержка | задать вопрос

Время генерирования страницы: 0.18422 сек.

© 2001-2018, Портал RFPRO.RU, Россия
Калашников О.А.  |  Гладенюк А.Г.
Версия системы: 7.47 от 16.04.2018