AnsiCompareText SysUtils Unit
문법 : function AnsiCompareStr(const S1,S2:string):Integer;

두 개의 문자열 S1과 S2를 비교하되 대소문자를 구분하지 않고 비교한다. 
S1과 S2문자열이 같으면 0을 리턴하며 S1면 음수의 값을 리턴하며 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음수의 값을 리턴하며 S1>S2이면 양수를 리턴한다. 
문자열끼리의 비교는 문자열을 이루는 각 문자의 문자 코드를 비교하여 수행되며 
현재 설치된 언어 드라이버에는 영향을 받지않는다.

 

CompareText system Unit
문법 : function CompareText(const S1, S2: string): Integer;

두 개의 문자열 S1과 S2를 비교하되 대소문자를 구분하지 않고 비교한다. S1과 S2 문자열이 같으면 0을 리턴하며 S1이면 음수의 값을 리턴하며 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을 리턴하며 S1S2이면 양수를리턴한다. 문자열끼리의 비교는 문자열을 이루는 각 문자의 문자 코드를 비교하여 수행된다.

 

StrIComp SysUtils Unit
문법 : function StrLComp(Str1, Str2: PChar; MaxLen: Word):Integer;

두 개의 문자열을 비교하되 대문자와 소문자를 구분하지 않는다. S1과 S2 문자열이 같으면 0을 리턴하며 S1수의 값을 리턴하며 S1>S2이면 양수를 리턴한다. 문자열끼리의 비교는 문자열을 이루는 각 문자의 문자 코드를 비교하여 수행된다.



원본 출처 : http://redtears9.egloos.com/891882

'공부방 > Delphi' 카테고리의 다른 글

[델파이] Case 문법  (0) 2010.07.14
[델파이] 기본 컴포넌트  (0) 2010.07.14
[델파이] POS  (0) 2010.05.13
[델파이] FindFirst  (0) 2010.05.11
[델파이] 델파이7 Quick Report 설치하기 (TQRChart 도~)  (0) 2010.05.08

■ String객체(문자열 관련)

문자열.프로퍼티 또는
문자열.메서드
사용자 입력값을 체크하는 중요한 객체!!!

속성
length 문자열의 길이 (한글 한문자도 1로)
메서드
charAt(숫자)
숫자 위치에 해당하는 문자
indexOf(문자 또는 문자열) 문자 또는 문자열이 나오는 위치를 숫자로
* 왼쪽 부터
substring(숫자1,숫자2) * 소문자로 위치로 숫자1 에서 숫자2-1 사이 문자열
split(대상,"기준문자") 대상문자열을 기준문자로 분리=>배열로
* 기타 많지만 자주 사용하는 것만!  
<script language="javascript">
str = "안녕하세요! DRAGONEYE입니다~~"

document.write(str.length + "<br>")
document.write(str.charAt(5) + "<br>")
document.write(str.indexOf("!") + "<br>")
document.write(str.substring(7, 16)+ "<br>")

</script>

<script language="javascript">
str = "안녕하세요! DRAGONEYE입니다~~"

// 반복적으로 모든 문자를 하나씩 검사하여 "!" 포함 여부를 알아내기
for (k=0 ; k < str.length ; k++) {

if (str.charAt(k)=="!") {
document.write("! 가 있군요")
}

}
</script>
<script language="javascript">
str = "안녕하세요! DRAGONEYE입니다~~"

if (eval(str.indexOf("!"))>0) {
document.write("! 가 있군요")
}

// str.indexOf() 는 포함시 0보다 큰 숫자, 못 찾으면 -1을
</script>
<script language="javascript">
// 드라군님 제공 소스
var s = "1,2,3,4";
var buff = s.split(",");
for(i=0; i<buff.length; i++) {
document.write(buff[i] + "<BR>");
}
</script>

+ Recent posts