Информация о пользователе

Логин: san-46
ФИО: 
E-mail: san-46@bk.ru
ICQ UIN: 
Сайт: http://san-46.narod.ru
Статус: пользователь

Закачанные исходники

graphicm.zip  (22123 байт)
Посмотреть содержимое

san-46 : 2007-11-15 11:49:42

Delphi - Компоненты

Компонент - альтернатива TChart, как более примитивный и от того простой
без наворотов компонент.
Выводит двумерные графики функций f(X,Y). Вид графиков - линейный.
Предназначен для тех, кого мало интересует внутренности реализации построения
графиков, а надо только быстренько отобразить кривые своих функций.

Работа с компонентом проста до безобразия.
После размещения компонента на форме через свойство "Curves" вызывается список
кривых, где надо их добавить столько сколько нужно.
При этом после добавления каждой кривой можно установить их цвет и толщину
линии, если установки по умолчанию не устраивают.
Собственно, на этом работу в design-time можно считать завершенной.

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

В run-time в цикле вызывается процедура добавления точек в кривую.
GraphMois1.Curves[0].AddPoint(X, Y);

Индекс "0" в примере указывает на первую кривую, "Х" и "Y" - значения точки.
Более подробный комментарий приведен в начале исходника компонента.

Что еще умеет делать компонент.
- Если во время формирования кривой передаваемые точки выходят за
диапазон минимальных или максимальных значений по осям, то график сам
масштабируется до необходимых значений (как в TChart).
- После вывода графика. По каждому щелчку левой кнопки мыши график увеличивает
масштаб, по правой кнопке уменьшает масштаб (величину изменения масштаба
можно устанавливать какую надо).
- При увеличенном масштабе движение мыши с прижатой левой кнопкой панорамирует
график - сдвигает его вправо-влево, вверх-вниз.
- Если свойство ShowHint включено (True), то при прохождении курсора мыши около
точки на кривой будет отображаться хинт со значениями точки.

Ограничение.
Точность графика до десятых долей значений, поэтому вывод кривых, где шаг
аргументов функций меньше 0.1 приведет к несуразному виду этих кривых.

Скачать

Комментарии (2) 2803 скачиваний

numeral.zip  (7012 байт)
Посмотреть содержимое

san-46 : 2007-10-16 16:36:14

Delphi - Модули

Опять зажеванная до непотребности функция "Сумма прописью", скажете.
Может быть, можеть быть, но что-то не встречал в море подобных функций таких, которые умеют согласовывать падежные окончания наименований единиц с числительными.
Предлагаемая функция это делать умеет. Поэтому преобразовать с ее помощью число во фразу:
"Расплатился ДВАДЦАТЬЮ ПЯТЬЮ рублями и ПЯТИДЕСЯТЬЮ ОДНОЙ копейкой" проще простого. Поддерживаются все современные падежи русского языка от именительного до предложного.
Наименования выводимых прописью единиц могут быть какими угодно.
Функция используется более десятка лет в коммерческих приложениях.
Последняя компиляция был выполнена на D7. Сторонних библиотек не требуется.
В исходнике есть подробный комментарий по ее использованию.

Скачать

Комментарии (0) 1813 скачиваний