Сейчас
мы поговорим с Вами о том как можно средствами Дельфи вращать какой-нибудь
текст. На первый взгляд задача не из простых, ведь даже Windows не умеет
вращать изображения (ну и текст соответственно тоже), но мы же не Windows :))
Нам
понадобится переменная-запись типа TLogFont, которая будет содержать
характеристики шрифта, такие как: размер, стиль, шрифт, угол поворота. А также
переменные типа hFont и TFont.
Теперь,
чтобы не мучить Вас ожиданием привожу код примера (обработчик события OnClick
для командной кнопки):
procedure
TForm1.Button1Click(Sender: TObject);
var
Font : hFont;
LogFont : TLogFont;
F : TFont;
begin
FillChar(LogFont,
SizeOf(LogFont), 0);
With LogFont do
Begin
lfHeight := 12;//высота
шрифта
lfOrientation := 150;//угол
поворота желательно, чтобы совпадал со
lfEscapement :=
150;//значением этой переменной. В данном случае это 15'
lfWeight := FW_REGULAR; //к
примеру жирный - FW_BOLD;
lfCharSet :=
RUSSIAN_CHARSET;//тут я думаю понятно
StrCopy(lfFaceName,
'Arial');//здесь - имя шрифта
End;
Font :=
CreateFontIndirect(LogFont);
F := TFont.Create;//создаем
экземпляр объекта
F.Handle := Font;
Canvas.Font := F;
Canvas.Brush.Color :=
Color;
Canvas.TextOut(300,
100, 'Font Demo'); //
рисуем
на
формк
F. Free;//
DeleteObject(Font);//
освобождаем
память
,
удаляя
объект
...
end;
Ну
вот собственно и все, на основе этого можно к примеру компонент написать, может
я конечно и сам скоро его напишу, но тем не менее презентую Вам эту идею.
Список литературы
Михаил
Христосенко. О том, как вращать текст с помощью Delphi
Для
подготовки данной работы были использованы материалы с сайта delphid.dax.
Другие работы по теме:
работа
Кинематографы создают удивительные спецэффекты или полностью анимированные фильмы. В последние годы широкое распространение получили также компьютерные игры, максимально использующие трехмерную графику для создания виртуальных миров
Вычисление значения функции y(x)
Особенности применения компьютерных программ Pascal, Excel, MathCAD и Delphi для вычисления значения функции y(x) с заданным промежутком и шагом. Виды результатов вычислений, их сравнение и вывод. Изображение блок-схемы алгоритма решения задания.
Визуальное программирование
Визуализация - это процесс графического отображения сложных процессов (в данном случае построения) на экране компьютера в виде графических примитивов (графических фигур).
Анимация без лишних усилий
Отличные результаты можно получить используя только функции WinAPI или возможности Delphi. Я рассмотрю несколько таких необычных возможностей, причем самый большой пример будет состоять из менее чем 10 (!) строк кода.
Описание файлов, создаваемых Дельфи
Вы когда ни будь задумывались о том, что создает Дельфи в папке с исходниками проекта? Да и нужен ли весь этот абсолютно бесполезный, для рядового программиста, "мусор"? Пора призадуматься. В этой мини-статье я расскажу о назначении таких файлов.
Лабораторная работа №1 по Delphi
Министерство общего и профессионального образования Владимирский Государственный Университет Кафедра УИТЭС Лабораторная работа №1 «Исследование характеристик феррорезонансного стабилизатора напряжения»
Установка компонентов в Дельфи
Если после установки компонента на форму возникли проблемы с компиляцией проекта, то это значит, что Delphi не может найти .pas файл компонента.
Реестр: записьчтение
Работа с системным реестром в Delphi достаточно простая. Использование реестра имеет некоторые преимущества перед INI-файлами. Они заключаются в том, что реестр - более стабильный, и у него нет ограничения на размер.
Разработка программы-советчика
ФЕДЕРАЛЬНОЕ АГЕНТСТВО ПО ОБРАЗОВАНИЮ ГОУ «ЧЕРЕПОВЕЦКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ» Институт информационных технологий Кафедра Автоматизации и систем управления
Математична модель вимірювальної системи в середовищі Delphi
Курсова робота Математична модель вимірювальної системи в середовищі Delphi АНОТАЦІЯ Опис програми містить загальний опис алгоритмів головної програми та допоміжних на рівні блок-схем, а також більш детальний опис розробленої програми на рівні програмного коду.
Створення таблиць за допомогою SQL-запитів в середовищі DELPHI
Створення таблиць за допомогою запитів в середовищі DELPHI Середовище Delphi широко використовується для програмування баз даних. Найчастіше, бази даних як певний підбір даних, організовані за допомогою таблиць. В реляційних базах даних таблиці представляють інформацію про об”єкти одного типу.
Обработка файлов в среде Delphi
Лабораторная работа На тему: «Обработка файлов в среде Delphi» Задание 1: Создайте приложение, которое создает текстовый файл text1.txt и записывает в него текст, введенный пользователем в окно Edit, после чего закрывает файл.
Программа на Delphi
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) private { Private declarations } public { Public declarations }
Середовище програмування DELPHI 2 0
СЕРЕДОВИЩЕ ПРОГРАМУВАННЯ DELPHI 2.0 Зміст Основні елементи середовища 1. Головне вікно 2. Вікно форми 3. Вікно коду 4. Інспектор об’єктів Управління файлами проекту Delphi
Середовище програмування DELPHI 20
СЕРЕДОВИЩЕ ПРОГРАМУВАННЯ DELPHI 2.0 Зміст 5.Основні елементи середовища 2 a.1. Головне вікно 2 a.2. Вікно форми 2 a.3. Вікно коду 3 a.4. Інспектор об’єктів 3
Визуальное программирование в Delphi
Изучение методов визуального программирования в Delphi. Задание: Построить графики функций ; ; Текст программы: unit Graph; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Delphi программирование для всех
Пять лет назад известная компания Borland выпустила первую версию своего средства визуального программирования Delphi. К разочарованию приверженцев фигурных скобок (в связи со спецификой языка именно так называют программистов, использующих С или С++) программы в Delphi надо было писать на языке Pascal, имеющем дурную репутацию "студенческого".
Создание приложения Клавиатурный тренажер
Министерство образования и науки Украины Луганский национальный университет имени Тараса Шевченко Ровеньковский факультет Кафедра информационных технологий и систем
Oedipus Free Will Essay Research Paper The
Oedipus Free Will Essay, Research Paper The characters in the story are free to make their own choices in life. Laios, upon being told that his son will kill him and marry his wife, chooses to have him killed. If Laios had not been told this
Oedipus Essay Research Paper The Excruciating Truth
Oedipus Essay, Research Paper The Excruciating Truth of Oedipus Oedipus is a man of integrity and passion whose goal in life was to seek the raw truth. Throughout the story, he constantly tried to obtain that
Interpretations Of Socrates
’s Definition Of Wisdom Essay, Research Paper . he went to Delphi at one time and ventured to ask the oracle he asked if any man was wiser than I, and the Pythian replied that no one was wiser 21b
Oedipus The King And His Fate Essay
, Research Paper Oedipus The King, by Sophocles, is a play about how Oedipus lives up his fate that he will kill his father and marry his mother, both of which are extremely bad in the Greek society, even though he thinks he is getting away from it. Despite the Greek notions of supreme power of the gods and fate, Oedipus’ downfall is primarily the result of King Laius? and his own actions and attempts to defy the gods, consequently Sophocles says that prophecies from the gods of someone?s fate should not be ignored.
Oedipus Rex Essay Research Paper In Sophocles 2
Oedipus Rex Essay, Research Paper In Sophocles? Oedipus Rex, dramatic irony is often present in Oedipus? long speeches. Oedipus constantly sees things incorrectly, and is in denial that he
Oedipus The King Essay Research Paper Even
Oedipus The King Essay, Research Paper Even though Oedipus the King didn?t detail all of Oedipus? adventures, I thought it was a good book. I think it was smart of Sophocles to pick out the most
Apollo 2 Essay Research Paper ApolloTable of
Apollo 2 Essay, Research Paper Apollo Table of Contents 1. Title Page 2. Table of Content 3. Apollo Report 4. Apollo Report 5. Story of apollo 6. Temple of Apollo ( Didyma, Turkey )