Question

Hello i am writing some values to a stringlist. And would like to delete a value from the string list.

Currently I write to the string list like this.

   FGamePlay.Locations.strings[0] := ('NumberOfLocations='+inttostr(NOL+1));   //add one to total
   FGameplay.Locations.Add(inttostr(Position.x)+inttostr(Position.Y)+'=pos');  //add the location to list

This will return me a list like so

INDEX    VALUE
[0]       NumberOfLocations=4
[1]       23=pos
[2]       34=pos
[3]       24=pos
[4]       52=pos

Now i try to delete it like this

FGamePlay.Locations.Delete(FGamePlay.Locations.IndexOf(inttostr(ePosition.x)+inttostr(ePosition.Y)));

were ePosition.x + ePosition.Y will equal 23, 34,24,or 52. Thus it should delete the that line but instead when i add this delete line i get index out of bounds -1. I did stop the code just before this line and looked at Locations() and it had all these numbers in there. Also looked at epostion and the X,Y values were 34, thus correct too. Any idea?
thanks
Glen

Answer 1

When you uses the IndexOf function you must pass the exact string to find, in this case since you are adding the strings in this way

FGameplay.Locations.Add(inttostr(Position.x)+inttostr(Position.Y)+'=pos'); 

You must add the =pos to the string to search, something like

LIndex:=FGamePlay.Locations.IndexOf(inttostr(ePosition.x)+inttostr(ePosition.Y)+'=pos');
If LIndex>=0 then
 FGamePlay.Locations.Delete(LIndex);