안녕하세요.



Var

L1, L2 : STRING;

Begin

EDIT1.TEXT:='ABC';



L1:=EDIT1.TEXT[0]; // L1:='A';

L2:=EDIT1.TEXT[1]; // L2:='B';

End;



대강 이렇게 됩니다.



delpo wrote:

> 책에 나온 예제문을 보던 중 다음과 같은 의문이 생겼습니다.

> 예문 :

> procedure TForm1.Button1Click(Sender: TObject);

> type

> TVowels= set of Char;

> var

> Vowels : tvowels;

> begin

> vowels := ['a', 'e', 'i','o','u'];

> if Edit1.Text[1] in vowels then <- 요 부분 입니다.

> Label1.caption :='정답입니다.'

> ELSE

> Label1.Caption :='모음이 아닙니다.';

> end;

>

> edit1.text[1]에서 text[1]은 무엇입니까? edit box에서도 listbox 처럼

> text[1] 이런 것을 씁니까? 쓴 다면 무슨 용도로 사용하는 것일까요?

> 고수님들의 답변 부탁 드립니다.??

>