var

[Черничный]

var i:integer = 300

Что не верно!? Да же в help'е так написано!

[Баламут]

Ну и что неверно? Где переменную так объявляешь?

[Air]

var  // здесь будет правильно
  Form1: TForm1;
  i:integer = 10;
  j:integer = 33;
  r:string = 'abc'; 

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
var // здесь будет не правильно
 a:integer = 11;
 s:integer = 31;
 dr:string = 'abd';  
begin
 //
end;

[GenAcid]

Сообщение от Air

procedure TForm1.FormCreate(Sender: TObject);
var // здесь будет не правильно 
 a:integer = 11;
 s:integer = 31;
 dr:string = 'abd';  
begin
 //
end;

???
Тоже правильно, просто область видимости другая.

[Баламут]

Сообщение от GenAcid

???
Тоже правильно, просто область видимости другая.

Нет, не правильно. Инициализировать можно только глобальные переменные.

[Serge_Bliznykov]

а вот так можно писать где угодно. в том числе и в TurboPascal'е
(типизированные константы. сразу скажу, менять значение - МОЖНО! :-))

const
 a:integer = 11;
 s:integer = 31;
 dr:string = 'abd';

[alexBlack]

Только нужно помнить, что объявленные таким образом локальные константы являются статическими и инициализируются один раз.

Например:

function doIt:integer;
const V:integer = 1;
begin
    result := V;
    inc(V);
    ...
end;

При втором вызове инициализации не будет.
...
Да и при первом то-же. Компилятор просто размещает эту переменую в области глобальных сразу с указанным значением. Поэтому как такового кода V:=1 нигде нет.

[GenAcid]

Сообщение от Баламут

Нет, не правильно. Инициализировать можно только глобальные переменные.

Извиняюсь, запамятовал.

[Черничный]

так а мне то как поступить? надо один раз назначить переменную и что бы таймер больше не возращался к ней, в последующих срабатываниях таймера уже идет вычитаение

[Air]

Делай глобальную переменную