Top204:

You first need to define a variable to store the item number. In your routine, create a variable defined as an olevariant. For example:


procedure TFMain.AssignName;
var ilevariant;
begin
FMap.Shapes.Item[i].Name := 'my name';
end;

That should do it.