본문 바로가기
Delphi/프로시저-함수

델파이 문자열 관련 함수

by MonoSoft 2021. 7. 13.
728x90
반응형

델파이 문자열 관련 함수

 

AnsiCompareText SysUtils Unit

문법

function AnsiCompareStr(const S1,S2:string):Integer;

두 개의 문자열 S1과 S2를 비교하되

대소문자를 구분하지 않고 비교한다.

 

S1과 S2문자열이 같으면 0을 리턴하며

S1<s2>이>면 음수의 값을 리턴하며

S1>S2이면 양수를 리턴한다.

 

문자열끼리의 비교는 문자열을

이루는 각 문자의 문자 코드를 비교하여 수행된다.

 

 

AnsiLowerCase SysUtils Unit

문법

function AnsiLowerCase(const S: string): string;

문자열 내부의 대문자를 모두 소문자로 바꾼다.

영문자 이외의 글자는 영향을 받지 않는다.

문자 변환은 현재 설치된 언어 드라이버의 영향을 받는다.

 

 

AnsiUpperCase SysUtils Unit

문법

function AnsiUpperCase(const S: string): string;

문자열 내부의 소문자를 모두 대문자로 바꾼다.

영문자 이외의 글자는 영향을 받지 않는다.

문자 변환은 현재 설치된 언어 드라이버의 영향을 받는다.

 

 

AppendStr SysUtils Unit

문법

procedure AppendStr(var Dest: string; const S: string);

두 개의 문자열을 결합한다.

Dest 문자열 뒷부분에 Src 문자열이 추가된다.

Dest:=Dest+S와 문법적으로 동일한 기능을 한다.

 

Src:='Apple';

Dest:='Orange';

AppendStr(Dest,Src);

Dest 문자열은 OrangeApple가 된다.

 

 

CompareStr system Unit

문법

function CompareStr(const S1, S2: string): Integer;

두 개의 문자열 S1과 S2를 비교하되

대소문자를 구분하여 비교한다.

 

S1과 S2 문자열이 같으면 0을 리턴하며

S1<s2>이면>음수의 값을 리턴하며

S1>S2이면 양수를 리턴한다.

 

문자열끼리의 비교는 문자열을 이루는

각 문자의 문자 코드를 비교하여 수행되며

현재 설치된 언어 드라이버에는 영향을 받지않는다.

 

 

CompareText system Unit

문법

function CompareText(const S1, S2: string): Integer;

두 개의 문자열 S1과 S2를 비교하되

대소문자를 구분하지 않고 비교한다.

 

S1과 S2 문자열이 같으면 0을 리턴하며

S1<s2>이면 음수의 값을 리턴하며

S1>S2이면 양수를 리턴한다.

 

문자열끼리의 비교는 문자열을 이루는

각 문자의 문자 코드를 비교하여 수행된다.

 

"Apple"와 "APPLE"를 CompareText 함수로 비교하면

결과는 0이며 두 문자열이 같은 것으로 비교되지만

CompareStr 함수로 비교하면 결과는

두 문자열이 서로 다른 것으로 비교된다.

 

 

Copy system Unit

문법

procedure Copy(S:String; Index, Count:Integer):String;

한 문자열의 부분 문자열을 추출해 낸다.

 

S 문자열의 Index 위치에서부터

Count 문자분의 부분 문자열이 추출된다.

 

Index가 문자열의 전체 길이보다

길 경우 빈 문자열을 리턴하며

Count가 문자열의 남은 부분보다

클 경우 문자열의 끝까지 추출해 낸다.

 

Dest 문자열이 'Orange'일 경우 Copy(Dest,2,3)은

Dest 문자열의 두 번째 문자에서부터

3문자분의 부분 문자열인 'ran'을 추출해낸다.

 

 

DayOfWeek system Unit

문법

function DayOfWeek(Date: TDateTime): Integer;

특정 날짜의 요일을 계산한다.

리턴되는 값은 1~7까지의 정수이며

1이 일요일, 7이 토요일이다.

리턴되는 값이 정수형이므로

월, 화, 수, 목 등의 실제 요일 이름으로

바꾸어 주어야 한다.

다음 예는 요일 이름을 레이블로 출력한다.

다음 예는 오늘이 무슨 요일인지 조사해서 

요일 이름을 레이블로 출력해준다.

 

var

YO:string;

ONUL:TDateTime;

begin

ONUL:=Now;

case DayOfWeek(ONUL) of

1:YO:='일';

2:YO:='월';

3:YO:='화';

4:YO:='수';

5:YO:='목';

6:YO:='금';

7:YO:='토';

end;

label1.caption:='오늘은 '+YO+'요일입니다.';

end;

 

 

DecodeDate system Unit

문법

procedure DecodeDate(Date: TDateTime; var Year, Month, Day: Word);

날짜를 담는 TDateTime형의 변수에서

년, 월, 일의 값을 분리 시킨다.

분리된 값들은 각각 Year, Month, Day 등의

정수형 변수에 대입된다.

날짜값은 DateToStr 함수로, 문자열로

바꾼 후 한꺼번에 출력할 수 있지만

개별적인 요소를 가공한 후 출력하고자

할 경우는 이 함수를 사용한다.

이 함수의 반대 함수는 EncodeDate 함수이다.

다음 예는 오늘 날짜와 현재 시간을 조사한 후

문자열 조립을 통해 말로 시간과 날짜를 알려 준다.

 

var

부록 3 함수 레퍼런스 923

var

Present: TDateTime;

Year, Month, Day, Hour, Min, Sec, MSec: Word;

begin

Present:= Now;

DecodeDate(Present, Year, Month, Day);

Label1.Caption := '오늘은' + IntToStr(Year) + '년'+ IntToStr(Month) + '

월' + IntToStr(Day)+'일입니다.';

DecodeTime(Present, Hour, Min, Sec, MSec);

Label2.Caption := '지금은' + IntToStr(Hour) + '시'+ IntToStr(Min)+'분입니다.';

end;

 

 

Delete system Unit

문법

procedure Delete (var S:String; Index, Count:Integer);

한 문자열에서 부분 문자열을 삭제한다.

S 문자열의 Index 위치에서부터

Count 문자분의 부분 문자열이 삭제된다.

Index가문자열의 전체 길이보다

길 경우 삭제는 이루어지지 않으며

Count가 문자열의 남은 부분보다 클 경우

문자열이 끝까지 삭제한다.

Dest 문자열이 'Orange'일 경우 Delete(Dest,2,3)은

Dest 문자열의 두 번째 문자에서부터

3문자분의 부분 문자열인 'ran'을 삭제하며

Dest 문자열은 'Oge'가 된다.

 

 

Insert system Unit

문법

procedure Insert(Source:String;var S:String;Index:Integer);

한 문자열의 중간에 다른 문자열을 삽입한다.

삽입되는 위치는 Index 인수가 지정하는 위치이다.

문자열을 삽입한 후의문자열 길이가

255자를 넘을 경우 255문자 이후의 문자는 잘려진다.

Dest 문자열이 'Orange'이고 Src 문자열이 'Apple'인 경우

Insert(Src,Dest,3);는 Dest 문자열의 3번째

문자인 a위치에 Src 문자열을 삽입하며

Dest 문자열은 'OrAppleange'가 된다.

 

var

S: String;

begin

S := 'abcdefghijkl';

Insert(' hotdog ', S, 5);

label1.caption:=S;

end;

 

이 예를 실행시키면 레이블로

abcd hotdog efghijkl 문자열이출력된다.

 

 

Length system Unit

문법

function Length(S:String):Integer;

주어진 문자열의 길이를 구한다. Length('Kora')는 5의 값을 리턴한다.

 

 

Pos system Unit

문법

function Pos(Substr:String; S:String);Byte;

문자열 내의 부분 문자열을 검색한다.

부분 문자열이 검색된위치를 리턴해준다.

만약 부분 문자열이 발견되지 않으면 리턴값은 0이다.

 

 

StrComp SysUtils Unit

문법

function StrIComp(Str1, Str2:PChar): Integer;

두 개의 문자열을 비교한다.

S1과 S2 문자열이 같으면 0을 리턴하며

S1<s2>이면 음수의="" 값을="" 리턴하며="" s1="">S2이면

양수를리턴한다.

문자열끼리의 비교는 문자열을

이루는 각 문자의 문자 코드를

비교하여 수행된다.

 

 

StrIComp SysUtils Unit

문법

function StrLComp(Str1, Str2: PChar; MaxLen: Word):Integer;
두 개의 문자열을 비교하되 대문자와

소문자를 구분하지 않는다.

S1과 S2 문자열이 같으면 0을 리턴하며

S1<s2>이면 음="">수의 값을 리턴하며

S1>S2이면 양수를 리턴한다.

문자열끼리의 비교는 문자열을 이루는

각 문자의 문자 코드를 비교하여 수행된다.

728x90
반응형

'Delphi > 프로시저-함수' 카테고리의 다른 글

델파이 기본함수  (0) 2021.07.15
델파이 GetLastError() 함수  (0) 2021.07.14
델파이 Delphi FileExists  (0) 2021.07.11
델파이 Delphi Fillchar  (0) 2021.07.09
델파이 유용한 함수정리 7탄  (0) 2021.07.08

댓글