Скачать: CL | DM;

Локальные типизированные константы   Найти похожие ветки 

← →
злобная танька   (2005-09-23 18:33) [0]

procedure TForm1.Button1Click(Sender: TObject);
const
 a: integer = 0;
begin
 Edit1.Text := inttostr(a);
 inc(a);
end;

почему это работает в D4, а в D7 - не работает? (значение a можно изменять и оно сохраняется между вызовами)
зачем убрали такую прикольную фишку? или у меня делфя кривая?

---

← →
jack128 ©   (2005-09-23 18:45) [1]

Нет, просто борланд сделал типизированные константы КОНСТАНТАМИ, а не фиг знает чем. Впрочем нужный те функционал можно вернуть назад, см директиву $J

---

← →
palva ©   (2005-09-23 18:48) [2]

Или в свойствах проекта на вкладке compiler поставить флаг Assignable typed constatnts

---

← →
злобная танька   (2005-09-23 19:32) [3]

спасибо!
я их очень люблю.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c