delphi label перенос строки

Я хочу создать строку, которая охватывает несколько строк, чтобы присвоить свойство Caption Ярлыка. Как это делается в Delphi?

В System.pas (который автоматически используется) следующее определяется:

Это из Delphi 2009 (обратите внимание на использование AnsiChar и AnsiString). (Line обертка добавленные мной.)

Так что если вы хотите сделать свой TLabel обертку, убедитесь Авторазмер установлен в истинное, а затем использовать следующий код:

Работает во всех версиях Delphi, так как sLineBreak был введен, который я считаю, был Delphi 6.

Вот еще короче подход:

my_string := ‘Hello,’ + #13#10 + ‘world!’;

#13#10 является CR / LF символов в десятичной системе

Или вы можете использовать ^ M + ^ J ярлык также. Все зависит от предпочтений. коды «CTRL-CHAR» переводится компилятором.

Вы можете взять + расстояние между ^ М и ^ J, но тогда вы получите предупреждение компилятора (но он все равно будет компилироваться).

На стороне, трюк , который может быть полезен:
Если вы держите несколько строк в TStrings, вы просто должны использовать Text свойство TStrings как в следующем примере.

И вы получите свой лейбл многострочных .

Написать ( ‘Hello’ + sLineBreak + ‘Мир!’);

Я не имею копию Delphi в руки, но я абсолютно уверен , если установить свойство WordWrap к истинному и авторазмеру свойство ложно оно должно обернуть любой текст , который вы поместите его в размере вы делаете ярлык. Если вы хотите , чтобы разрыв строки в определенном месте , то это могло бы работать , если вы установите вышеуказанные параметры и вставить из текстового редактора .

Надеюсь это поможет.

Иногда я не хочу загромождать мой код пространство, особенно для статической наклейки. Для того, чтобы просто иметь это определиться с формой, введите текст метки на форме, а затем щелкните правой кнопкой мыши в любом месте на одной и той же форме. Выберите «Просмотр в виде текста». Теперь вы будете видеть все объекты, как дизайн, но, как только текст. Прокрутка вниз или выполнить поиск текста. Когда вы найдете его, изменить заголовок, так это выглядит примерно так:

Подпись = ‘Line 1’ # 13’Line 2 ‘# 13’Line 3’

# 13 означает порядковый номер 13, или для ASCII возврата каретки. Chr (13) та же идея, CHR () изменяет число к порядковому типу.

Обратите внимание, что нет запятой в этой конкретной грани Delphi, и «=» используется вместо «: =». Текст для каждой строки заключен в одиночных кавычках.

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

Я также использую «Просмотреть как текст» для нескольких изменений, когда я просто хочу, чтобы прокрутить и делать замены и т.д. Quick.

На этом шаге мы рассмотрим компонент TLabel

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

Рассмотрим свойства компонента TLabel .

Метка Label может отображать длинную текстовую строку своего свойства Caption в виде нескольких строк: для этого установите в AutoSize значение False , задайте достаточно большие размеры метки и поместите в Wordwrap значение True . Для отображения действительно многострочного текста используйте компоненты TMemo и TRichEdit .

Попробуйте реализовать это сами. Если не сможете, то текст этого примера можно взять здесь.

На следующем шаге мы рассмотрим компонент TEdit

Оцените статью