Q&A

  • 문자열에서 숫자만 뽑아오는 법좀...
'2002-12-12 13:11:13' 이런식의 날짜모양으로 표현된 스트링 값이 있습니다..
여기에서 숫자만을 뽑아서 저장할라고 하는데요..
'20021212131113' 이렇게요..
검색해 봤더니. 일일히 하나하나 비교하는 것밖에 못찾았는데..
그 방법밖에 없는지요...
3  COMMENTS
  • Profile
    델파이탐크루즈 2002.12.25 01:07
    이렇게 한번 해보세요...

    밑의 Function 써보세요... 잘돌아갑니다...

    var
      S_DAT, S_Result : String;
    begin

      S_DAT <-===  '2002-12-12 13:11:13'

      S_Result := StrTonumber(S_DAT);

    End;

    Function StrTonumber(cStr : String):string;
    var nPos : integer;
        cResult : String;
    Begin
      cResult := '';
      For nPos := 1  To Length(cStr) do
       begin
        if (cStr[nPos] >= '0') and (cStr[nPos] <= '9') then
           cResult := cResult + cStr[nPos];
       end;
      Result := cResult;
    End;

    그럼 즐프하세요....


  • Profile
    도니 2002.12.25 01:21
    함수를 만들어주신게 되어버렸네요..^^
    감사합니다..
    말씀데로 잘 돌아가고요..잘 사용하겠습니다.>^^

  • Profile
    델파이탐크루즈 2002.12.25 01:47