Меню Рубрики

Как в делфи текст написать

Как в делфи текст написать

Школа программирования Delphi

Портал DelphiSchool является бесплатным проектом, обеспечивающим пользователям быстрый и легкий доступ к урокам программирования на Delphi. Сайт позволяет научиться программировать на Делфи любому, кто хочеть писать свои программы, игры, Android приложения, программы для MAC OC или IOS. Кроме уроков Delphi и статей Delphi, на сайте доступны также и видеоуроки. Практически к каждому уроку, пользователю доступен исходник, изучив который, он сможет наглядно посмотреть как работает та или иная программа, написанная на Делфи. Кроме того мы постараемся прилагать к каждому материалу (статье, уроку, видеоуроку) файлы Delphi, которые будут помогать изучить предоставленный материал.

Каждый кто решил написать свою программу, создать свое приложение, научиться программировать и т.д., найдет на DelphiSchool статьи Delphi, уроки Delphi, видеоуроки Delphi, исходники Delphi, файлы Delphi, изучит компоненты Delphi, посмотрит Delphi примеры и многое другое абсолютно бесплатно. Все о Delphi программировании теперь собрано на одном сайте.
DelphiSchool

Компонент Delphi TLabel служит для вывода надписей. Это простейший компонент, используя который мы будем выводить на нашей форме информацию. Чаще всего мы будем использовать свойство Caption этого компонента.
Давайте создадим новый проект и поместим на форму компонент TLabel и TButton. Теперь давайте изменим свойство Caption у компонента TLabel на «Hello Delphi Label» (сейчас у нас там написано Label1), а у компонента TButton изменим Caption на «Изменить надпись».

Теперь давайте создадим обработчик события OnClick для кнопки и напишем следующий код:

После того как мы запустим нашу программу, перед нами появится форма с кнопкой и надписью «Hello Delphi Label». Если мы нажмем на кнопку, то надпись изменится на «Пример работы с TLabel в Delphi».

Давайте еще увеличим шрифт нашей надписи. Для этого переходим в свойства компонента TLabel и дважды щелкаем по свойству Font. Изменяем размер на 14, а цвет на желтый. Установим свойствам Left и Top значение 16 (так мы установим левую и верхнюю позицию нашей надписи). Теперь добавим еще один компонент TLabel. Выделив Label1 и нажав Edit | Copy, или Ctrl+C мы копируем в буфер обмена наш первый компонент, а затем нажав Edit | Paste или Ctrl+V мы вставляем копию этого компонент из буфера обмена. У компонента Label2 меняем цвет на синий а Left и Top устанавливаем значение 18. В довершение всего изменяем свойство Transparent (прозрачность) на true. Так наша надпись станет более красивой и будет выглядеть как будто у надписи есть тень.

Чтобы закрепить этот урок немного изменим приведенный выше пример кода, который изменял нашу запись (Label1). Если мы нажмем на кнопку, то запись Label1 изменится, а вторая (Label2) нет, поэтому нужно и для второй надписи сделать изменение:

К уроку (статье) Delphi и TLabel. Выводим надписи на форме прилагается исходник, посмотрев который, вы можете ознакомиться с полным исходным кодом программы и посмотреть как работает созданная программа. Исходный код сопровождается комментариями, благодаря чему вы сможете легко в нем разобраться. Но я настоятельно рекомендую делать все самостоятельно. Так вы лучше и быстрее усвоите то, о чем говорилось в этом уроке

Для того чтобы получить возможность скачать исходник Delphi к этому уроку, необходимо посетить сайт рекламодателя. После этого, появится ссылка на исходник Delphi к уроку Delphi и TLabel. Выводим надписи на форме
Нажмите на эту ссылку Ссылка

Источник статьи: http://delphischool.3dn.ru/load/osnovy_delphi/komponenty_delphi_nachinaem_pisat_svoi_pervye_prilozhenija_na_delphi/delphi_i_tlabel_vyvodim_nadpisi_na_forme/9-1-0-26

Добавить текст в Word из делфи

Здравствуйте, мне нужно добавить в самом начале документа заголовок. Но при нажатии на соответствующую кнопку формы появляется ошибка, что не удалось прочитать документ, возможно он поврежден и т.д.
Конкретно ошибка связана с условием «if Checkbox1.Checked=. «. Подскажите пожалуйста, в чем проблема.

Как текст с формулами добавить в делфи
:wall:Как текст с формулами добавить в делфи. В мемо не отображаються формулы.

Добавить в Word текст из Label/TextBox
Есть текст в TextBox или Label, не важно. Большой текст на пол страницы. И необходимо создать.

Как из Delphi сохранить текст в Word (добавить к имеющемуся)?
Добрый день! У меня есть файл.doc. Как в этот файл сохранить текст из Form1.Memo1? .

Word.Application. Взаимодействие с word. Добавить общие шаблоны *.dot в папку appdata и в word
Добрый день! Подскажите, пожалуйста, возможно ли средствами делфи активировать кнопку «Добавить».

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Как открыть doc в делфи? Или как можно написать огромный текст в делфи?
Думаю поймете. Я решил сделать сборник книг. И в Delphi добавил список книг (в виде кнопок) и при.

Из Excel в Word, как добавить или сохранить закладку в Word
Добрый день, уважаемые форумчане, надеюсь на вашу помощь. Переношу данные из Excel в шаблон.

Из Excel в Word, как добавить/сохранить закладку в Word
Добрый день, уважаемые форумчане. Работаю над файлом по переносу данных из Excel в Word и по пути.

Текст задан строкой. Напечатать все заглавные русские согласные глухие буквы, не входящие в текст (делфи 7)
Помогите решить задачку по делфи 7 Текст задан строкой. Напечатать все заглавные русские согласные.

Источник статьи: http://www.cyberforum.ru/delphi-beginners/thread1324731.html

Создание и работа с текстовыми файлами в Delphi

Когда речь идет о работе программы с текстовым файлом, подразумеваются процедуры ввода данных из файла в программу или, наоборот, запись этих данных в файл программой. Для текстового файла допустима простая работа с файлом без особых дополнительных механизмов, которые применяются для работы со специализированными файлами, такими как при загрузке данных из Excel или работе программы с базой данных. Разумеется, Delphi располагает возможностями работать с файлами с использованием компонентов. Но в данной статье рассматривается механизм прямой работы с текстовым файлом без использования дополнительных компонентов.

Итак, в общем виде, работа с файлом заключается в следующих этапах:

1. подключение к файлу – связь с внешним файлом, указание режима подключения;

2. выполнение операций записи в файл или чтения из файла;

3. завершение работы с файлом.

Подключение к файлу

Для связи программы с файлом используется специальная переменная – «Файловая переменная». Объявляется она так же как и любая переменная в Delphi. Тип это переменной может быть File для типизированных (хранящих данные определенного типа) файлов, а можно указать TextFile, что будет означать тип обычного текстового файла. Объявление переменной:

В исполняемом коде программы выполняется подключение к внешнему файлу:

Команда AssignFile, выполняет связь файловой переменной с внешним файлом. Вторым параметром указывается адрес файла. Он может быть задан относительным или абсолютным. Если указать только имя файла, то программа будет пытаться обнаружить его в той же директории, где она сама и находится. Абсолютный путь указывается от корневого диска:

Использование относительной директории дает возможность не привязываться к конкретным дискам и адресам. Например:

После того как выполнено подключение, выполняется процедура, устанавливающая режим работы с файлом. В основном это режим чтения или записи. Эти режимы назначаются процедурами Reset() ( для чтения) и rewrite() (для записи):

* Для команды Rewrite() следует учитывать, что при ее выполнении, она либо создает файл, указанный в файловой переменной, либо если он уже есть перезаписывает файл заново, удаляя старый без какого-то предупреждения.

Любую из указанных команд можно использовать без команды AssignFile(). Для этого достаточно вторым параметром указать путь к файлу. Таким образом, она сразу выполнит привязку файла к файловой переменной и назначит режим работы с этим файлом:

Операции с файлами

Для чтения из файла, необходимо назначить режим чтения и использовать команду Readln(), которая будет вводить в строковую переменную по одной строке из файла. Затем с этой переменой можно выполнить необходимые действия.

Обычно для загрузки всех строк из файла используется оператор цикла. Для того, чтобы определить, что файл закончился используется функция EOF() (End Of File). Таким образом получается цикл, в котором последовательно в строковую переменную вводятся все строки файла и завершающийся после окончания фала:

Для записи, назначение режим записи в файл и командой Writeln() производится запись по строкам.

Закрытие файла

По завершении работы с файлами, особенно в случае записи в них данных, необходимо корректно завершить работу с файловой переменной. Это делается для того, чтобы сохранить все внесенные в файл изменения.

Примеры работы с текстовыми файлами в Delphi

Чтение в переменную одного значения из файла:

Загрузить все строки файла в компонент Memo:

Следует отметить, что для этой задачи проще воспользоваться командой самого компонента Memo LoadFromFile().

Записать в текстовый файл все строки из компонента Memo:

Как и для чтения из файла в Memo, так и здесь, имеется специальная команда:

Источник статьи: http://space-base.ru/library/delphi/sozdanie-i-rabota-s-tekstovyimi-fajlami-v-delphi

Как написать текст поверх изображения ?

Delphi Xe3, SpeedButton текст поверх изображения. Как?
Всем привет. Как текст из Caption вывести поверх изображения из Glyph? LayOut позволяет только.

Как написать текст поверх изображения?
Как написать текст поверх изображения?Изображения находятся в grid.

Как реализовать отзывчивый текст поверх отзывчивого изображения
Здравствуйте, изображение я сделал отзывчивым. Но при увеличении или уменьшении окна браузера.

Как написать текст поверх картинки
Добрый вечер! Подскажите пожалуйста как написать текст по верх картинки размещенной в таблице.

Доброе утро, уважаемый. Не паникуйте

А тут наверное подразумевалось TImage?

Вообще-то я не балуюсь оккультизмом, но если всё-таки угадал, то просто выделите Label (текст), щёлкните правой кнопкой по нему и в пункте Control выберите BringToFront.

Если не угадал, значит я не экстрасенс . Очень жаль, но Вам придётся научиться корректно составлять свои вопросы

Доброе утро, уважаемый. Не паникуйте

А тут наверное подразумевалось TImage?

Вообще-то я не балуюсь оккультизмом, но если всё-таки угадал, то просто выделите Label (текст), щёлкните правой кнопкой по нему и в пункте Control выберите BringToFront.

Если не угадал, значит я не экстрасенс . Очень жаль, но Вам придётся научиться корректно составлять свои вопросы

John_Pa9JIbHuK, может я чего-то не понял, но у меня на форме TLabel поверх TImage нормально прорисовывается.

Pahuis, значит всё-таки не телепат )).
Вам в сторону отрисовки текста на канве

А Label.Transparent = True не решает поставленную задачу? У меня прозрачный текст виден поверх изображения

Омг, кинь новый TImage и затем поверх, новый TLabel =\

Добавлено через 8 минут
А всё, походу понял в чем проблема,

обратите внимание что фон у текста устанавливает параметр Color в Object Inspector, как его сделать прозрачным?

Источник статьи: http://www.cyberforum.ru/delphi-beginners/thread185631.html

DelphiComponent.ru — бесплатно видеоуроки по Delphi, статьи, исходники

Графические возможности Delphi: Текст, линия, окружность

Вывод текста

  • объект — имя объекта, на поверхность которого выводится текст;
  • х, у — координаты точки графической поверхности, от которой выполняется вывод текста (рис. 10.3);
  • Текст — переменная или константа символьного типа, значение которой определяет выводимый методом текст.

Шрифт, который используется для вывода текста, определяется значением свойства Font соответствующего объекта Canvas. Свойство Font представляет собой объект типа TFont. В табл. 10.7 перечислены свойства объекта TFont, позволяющие задать характеристики шрифта, используемого методами Textout и TextRect для вывода текста.

Таблица 10.7. Свойства объекта TFont

Область вывода текста закрашивается текущим цветом кисти. Поэтому перед выводом текста свойству Brush.Color нужно присвоить значение bsciear или задать цвет кисти, совпадающий с цветом поверхности, на которую выводится текст.

Следующий фрагмент программы демонстрирует использование функции TextQut для вывода текста на поверхность формы:

После вывода текста методом Textout указатель вывода (карандаш) перемещается в правый верхний угол области вывода текста.

Иногда требуется вывести какой-либо текст после сообщения, длина которого во время разработки программы неизвестна. Например, это может быть слово «руб.» после значения числа, записанного прописью. В этом случае необходимо знать координаты правой границы уже выведенного текста. Координаты правой границы текста, выведенного методом Textout, можно получить, обратившись к свойству EenPos.

Следующий фрагмент программы демонстрирует возможность вывода строки текста при помощи двух инструкций Textout.

Линия

Вычерчивание прямой линии осуществляет метод LineTo, инструкция вызова которого в общем виде выглядит следующим образом:

Метод LineTo вычерчивает прямую линию от текущей позиции карандаша в точку с координатами, указанными при вызове метода.

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

Вид линии (цвет, толщина и стиль) определяется значениями свойств объекта Реп графической поверхности, на которой вычерчивается линия.

Довольно часто результаты расчетов удобно представить в виде графика. Для большей информативности и наглядности графики изображают на фоне координатных осей и оцифрованной сетки. В листинге 10.2 приведен текст программы, которая на поверхность формы выводит координатные оси и оцифрованную сетку (рис. 10.4).

Рис. 10.4, Форма приложения Координатная сетка

Листинг 10.2. Оси координат и оцифрованная сетка

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

Ломаная линия

Метод Polyline вычерчивает ломаную линию. В качестве параметра метод получает массив типа Tpoint. Каждый элемент массива представляет собой запись, поля х и у которой содержат координаты точки перегиба ломаной. Метод Polyline вычерчивает ломаную линию, последовательно соединяя прямыми точки, координаты которых находятся в массиве: первую со второй, вторую с третьей, третью с четвертой и т. д.

В качестве примера использования метода Polyline в листинге Ю.З приведена процедура, которая выводит график изменения некоторой величины. Предполагается, что исходные данные находятся в доступном процедуре Массиве Data (ТИП Integer).

Листинг 10.3. График функции (использование метода Polyline)

Метод Polyline можно использовать для вычерчивания замкнутых контуров.

Для этого надо, чтобы первый и последний элементы массива содержали координаты одной и той же точки. В качестве примера использования метода PoiyLine для вычерчивания замкнутого контура в листинге 10.4 приведена программа, которая на поверхности диалогового окна, в точке нажатия кнопки мыши, вычерчивает контур пятиконечной звезды (рис. 10.5). Цвет, которым вычерчивается звезда, зависит от того, какая из кнопок мыши была нажата. Процедура обработки нажатия кнопки мыши (событие MouseDown).

вызывает процедуру рисования звезды starLine и передает ей в качестве параметра координаты точки, в которой была нажата кнопка. Звезду вычерчивает процедура starLine, которая в качестве параметров получает координаты центра звезды и холст, на котором звезда должна быть выведена. Сначала вычисляются координаты концов и впадин звезды, которые записываются в массив р. Затем этот массив передается в качестве параметра методу Polyline. При вычислении координат лучей и впадин звезды используются функции sin и cos. Так как аргумент этих функций должен быть выражен в радианах, то значение угла в градусах домножается на величину pi/180, где pi — это стандартная именованная константа равная числу пи.

Листинг 10,4. Вычерчивание замкнутого контура (звезды) в точке нажатия кнопки мыши

Источник статьи: http://delphicomponent.ru/175-graficheskie-vozmozhnosti-delphi-tekst-liniya-okruzhnost.html


0 0 голоса
Article Rating
Подписаться
Уведомить о
guest

0 Комментарий
Старые
Новые Популярные
Межтекстовые Отзывы
Посмотреть все комментарии