Q&A

  • 특수문자제외 문자비교


문자비교를 할수 있는 함수가 있습니다.

예를 들어 StrComp ...등과 같이...



헌데 문자비교시 특수문자등을 제외하고 알파벳만

비교하는 함수가 있는지요?



없다면 변수에서 특수문자나 숫자등을 제외시키는

함수 또는 방법을 알려주시면 감사하겠습니다...

1  COMMENTS
  • Profile
    신인재 1999.06.24 20:16
    그런 함수를 함 만들어 보았습니다.....



    function AlphaReturn(Scr_Text: String) : String;

    type

    TAlpha = set of Char;

    var

    Alpha: TAlpha;

    i : Integer;

    Dest_Text : String;

    begin

    Alpha := ['a'..'z', 'A'..'Z'];

    Dest_Text := '';

    for i := 1 to Length(Scr_Text) do

    begin

    if Scr_Text[i] in Alpha then

    Dest_Text := Dest_Text + Scr_Text[i];

    end;

    Result := Dest_Text;

    end;



    디제이 께서 말씀하시기를...

    >

    > 문자비교를 할수 있는 함수가 있습니다.

    > 예를 들어 StrComp ...등과 같이...

    >

    > 헌데 문자비교시 특수문자등을 제외하고 알파벳만

    > 비교하는 함수가 있는지요?

    >

    > 없다면 변수에서 특수문자나 숫자등을 제외시키는

    > 함수 또는 방법을 알려주시면 감사하겠습니다...