안녕하세요? 누리빛입니다.

1) 에디트 박스의 Text 프라퍼티의 길이를 계산해 보면 되겠네요~
   Length(editbox1.text)
   한글일 경우는 위에서 얻어진 길이의 반이 글자수가 되겠죠?

2) 숫자인지 알아내는 함수를 하나 구현하면 되겠죠...
   저는 이런식으로 함수를 하나 만들어 사용하는데요..
function _IsNumber(const S : string) : Boolean;
var
  i : integer;
  S1 : string;
begin
  S1 := Trim( S );
  Result := False;
  if _IsEmpty( S1 ) then Exit;
  for i := 1 to Length( S1 ) do begin
    if (i = 1) and (S1[i] = '-') then Continue;
    if not (((S1[i] >= '0') and (S1[i] <= '9')) or (S1[i] = '.') ) then begin
      Result := False;
      Exit;
    end;
  end;
  Result := True;
end;
  여기서는 음수나 소수까지도 숫자로 판별해 낼 수 있답니다.

3) 콤마가 없는 문자열로 변환한 후에 StrToInt를 취하면 되겠죠...
   스트링을 하나씩 보면서 콤마가 나오면 그 부분을 없애버리면 되겠죠...

4) ###,###,### 이런 식으로 쓰면 될 것 같은데...
   그러고 보니 마스크를 사용하면 3)번의 문제는 해결되겠네요~

그럼 도움 되시길 바라면서...