Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.91/11: Рейтинг темы: голосов - 11, средняя оценка - 4.91
1 / 1 / 0
Регистрация: 16.12.2011
Сообщений: 38
1

Увеличение и уменьшение размера шрифта метки

05.04.2012, 22:09. Показов 2197. Ответов 1
Метки нет (Все метки)

Найдите пожалуйста ошибку. Программа не работает.
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Menus;
 
type
  TForm1 = class(TForm)
    MainMenu1: TMainMenu;
    File1: TMenuItem;
    Size1: TMenuItem;
    Open1: TMenuItem;
    Save1: TMenuItem;
    Saveas1: TMenuItem;
    Increase1: TMenuItem;
    Reduce1: TMenuItem;
    procedure Increase1Click(Sender: TObject);
    procedure Reduce1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.Increase1Click(Sender: TObject);
begin
Label1.Font.Height:=Label1.Font.Height+1;
end;
 
procedure TForm1.Reduce1Click(Sender: TObject);
begin
Label1.Font.Height:=Label1.Font.Height-1;
end;
 
end.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.04.2012, 22:09
Ответы с готовыми решениями:

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

Увеличение или уменьшение шрифта горячими клавишами в самой среде
Когда я работаю в builder мне нужно увеличить или уменьшить размер кода как это сделает "горячими...

Увеличение и уменьшение размера кнопки
При нажатии на кнопку она должна увеличиваться, а когда она достигает определенного размера, она...

Увеличение , уменьшение размера формы
Код должен работать таким образом: При нажатии ПКМ+ЛКМ форма увеличивается, SHIFT+ПКМ+ЛКМ...

1
4295 / 1417 / 463
Регистрация: 16.12.2010
Сообщений: 2,939
Записей в блоге: 3
06.04.2012, 00:04 2
Можно так:
Увеличить:
Delphi
1
label1.Font.Size:=label1.Font.Size+1;
Уменьшить:
Delphi
1
label1.Font.Size:=label1.Font.Size-1;
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.04.2012, 00:04

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Увеличение/уменьшение размера текста
Здравствуйте, помогите пожалуйста! Такая задача: Сделать чтоб одна кнопка увеличивала размер...

Увеличение и уменьшение размера <div>'a
Такое дело: тело страницы делится на 2 части по длине, в первой части есть меню. Нажимаем на синюю...

Уменьшение/увеличение размера текста в бегущей строке
Помогите, пожалуйста решить задачу. использовать javascipt На форму поместите бегущую строку и 2...

Пропорциональное уменьшение/увеличение фона в зависимости от размера блока
Добрый день! Посоветуйте пожалуйста, как пропорционально уменьшать backround: url(image); И как...

Увеличение размера шрифта
Хочу написать свой текстовый редактор только начал по этому все пусто. Есть выпадающий список с...

Увеличение размера шрифта
Доброго времени суток. Подскажите пожалуйста, как увеличить шрифт на Flash сайте?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.