성인e 2019-10-16 AM 6:20:11 |
|
|
|
// 선택 문자 추출
실수: 시작, 길이;
시작 := 에디트0.선택문자위치;
길이 := 에디트0.선택문자길이;
문자: 문, 선택문자;
문 := 에디트0.문자;
선택문자 := 문자복사(문, 시작+1, 길이);
// 아무것도 선택 안 했으면 나감
만일 (길이 = 0) 나가;
// 괄호 덮어졌는지 아닌지 판별
진리: 커버;
문자: 임시, 임시2;
임시 := 문자복사(문, 시작, 1);
임시2 := 문자복사(문, 시작+길이+1, 1);
커버 := 임시 = "(" 그리고 임시2 = ")";
// 바꿈
만일 (커버)
에디트0.문자 := 문자복사(문, 1, 시작-1) + 선택문자 + 문자복사(문, 시작+길이+2, 문자길이(문));
아니면
에디트0.문자 := 문자복사(문, 1, 시작) + "(" + 선택문자 + ")" + 문자복사(문, 시작+길이+1, 문자길이(문)); |
|