🚀 go-pugleaf

I have been asked to design a project to determine whether a word is a
palindrome or not (btw a plaindrome is a word that is the same backwards ie
noon).

I have been able to run the program successfully with some words but it
doesn't seem to like the word 'deer'  and other words with the same middle
letters.  It thinks that it is a palindrome which is not true.

Could somebody help please.

Thanks for your time . . .



#include <condefs.h>
#include "Project1io.h"
#pragma hdrstop


//--------------------------------------------------------------------------
-
USELIB("Project1io.LIB");
//--------------------------------------------------------------------------
-
#pragma argsused
int main(int argc, char **argv)
{
  int Front;
  int Back;
  char Palindrome;
  AnsiString InputString;
    InputString = ReadStringPr("Enter your non-empty string for testing");
    Front = 1;
    Back = Length(InputString);
    while (Front < Back)
      {
        if (InputString[Front] == InputString[Back])
          Palindrome = true;
        else
        Palindrome = false;
        Front = Front + 1;
        Back = Back - 1;
      }
    if (Palindrome == true)
      WriteString("Yes, it is a palindrome");
    else
      WriteString("No it is not a palindrome");

    getchar();
    return 0;
}