Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Увеличение на единицу! [D7, XP]

Страницы: < 1 2
Kuvalda © (2007-12-25 22:34:00)
var
a: integer;
begin
a:=0;
inc(a);
label1.Tag :=a;
label1.Caption :=inttostr(a);

Что неправильно делаю? Надо значение label1 увеличивать на 1 с каждым нажатием кнопки button.

Плохиш (2007-12-26 02:11:00) [21]

> Один раз при втором нажатии на button неработает.

Ну нажимай фторой раз...

homm (2007-12-25 23:38:00) [22]
> [7] kuvalda © (25.12.07 23:09)
> Удалено модератором

Ну вот, а я даже не прочел слова благодарности :(

kuvalda (2007-12-25 23:09:00) [23]
Удалено модератором

homm (2007-12-25 23:05:00) [24]
Удалено модератором

kuvalda (2007-12-25 23:04:00) [25]
> [2] kuvalda © (25.12.07 22:45)
> Да вот не работает у меня почему то этот код?

Ну а догадатся заменить на эвивалент, никак?

идёт увеличение на 1. Один раз при втором нажатии на button неработает.

homm (2007-12-25 23:02:00) [26]
> [2] kuvalda © (25.12.07 22:45)
> Да вот не работает у меня почему то этот код?

Ну а догадатся заменить на эвивалент, никак?

guav (2007-12-25 22:47:00) [27]
> inc(label1.Tag);

Нельзя так, использовать свойство как var параметр, в справке написано, что, в отличии от полей, свойства не могут быть переданы как var параметры, хоть это и работает :)

kuvalda (2007-12-25 22:45:00) [28]

> Ну вот ты и делаешь, присваиваешь а=0, а потом увеличиваеш
> на единицу… При каждом нажатии :)
>
> inc(label1.Tag);
> label1.Caption :=inttostr(label1.Tag);

Да вот не работает у меня почему то этот код?
Пробовал я так?

homm (2007-12-25 22:40:00) [29]
> Надо значение label1 увеличивать на 1 с каждым нажатием
> кнопки button.

Ну вот ты и делаешь, присваиваешь а=0, а потом увеличиваеш на единицу… При каждом нажатии :)

inc(label1.Tag); label1.Caption :=inttostr(label1.Tag);

Страницы: < 1 2

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »