![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Можно ли сделать многострочный Label а если можно то как? [D6]
maxim2 © (2002-09-03 14:20:00)Привет всем!
Вот собсно и всё
VICTOR_ (2002-09-03 14:38:00) [1]>McSimm © (03.09.02 14:33)
AutoSize := False;
:)
McSimm (2002-09-03 14:33:00) [2]WordWrap := True;
Alx2 (2002-09-03 14:26:00) [3]Чтобы жилось еще легче, можно попросить разбить твой текст функцию
function WrapText(const Line, BreakStr: string; nBreakChars: TSysCharSet; MaxCol: Integer):string; overload;
maxim2 (2002-09-03 14:26:00) [4]Спасибочки!
easy (2002-09-03 14:25:00) [5]
procedure TForm1.FormCreate(Sender: TObject);
begin
label1.Caption:="Это"+chr(10)+chr(13)+"многострочный"+chr(10)+chr(13)+"Лабель";
end;
Виктор Щербаков (2002-09-03 14:23:00) [6]Label1.Caption := "Многострочный"#13"label";