[x128]

Пишет [Error] Unit1.pas(30): Incompatible types: 'String' and 'Integer'

Правильно пишет, свойства Left, Right, Top и Bottom всегда были Integer и строку туда впихнуть не выйдет...

Код:

shape1.left:=shape1.left+1;