length of string in delphi

var
  MyString: string;
  LengthOfString: Integer;
begin
  MyString := 'Hello, World!';
  LengthOfString := Length(MyString);
  // LengthOfString now contains the length of MyString
end;