[step]

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

Код:

var
  ax : Integer;
...................
  ax := Abs(dx) shl 1;

dx по видимому какой-то параметр функции или переменнная.

Спасиб ! А то я не знал как сделать сдвиг в дельфи, недавно тока начал на нем писать..