문자열 'Button1' 과 'button1' 은 서로 다른 값입니다.

문자열에 대해서 대소문자구별을 합니다. 따라서 Uppercase 또는 Lowercase 함수를

이용해서 처리해야합니다. 즉

Uppercase('Button1') = Uppercase('button1') 처럼.

단지 델파이가 대소문자 구분을 안한다는것은 변수명 처리에서입니다.

즉

var

Button1: TButton;

과 같이 선언후 코딩에서 button1 := TButton.Create(Self) 처럼 변수명, 클래스명 등등

에서는 대소문자구분을 하지 않는것이죠.





델피언77 wrote:

> procedure TForm1.Button1Click(Sender: TObject);

> begin

> if (sender is TButton) then begin

> if Tbutton(sender).Name = 'button1' then

> showmessage('버튼1');

>

> end;{end of if}

> end;

>

> 이런식으로 해서 프로그램을 실행 시킨다음 이벤트를 생성 시키면.. showmessage('버튼1) 이 실행 되지 않습니다.. 하지만..

>

> procedure TForm1.Button1Click(Sender: TObject);

> begin

> if (sender is TButton) then begin

> if Tbutton(sender).Name = 'Button1' then

> showmessage('버튼1');

>

> end;{end of if}

> end;

>

> 이렇게 실행 시키면.. showmessage(버튼1') 이 동작 하네요...

> 달라진 점은.. 단지...

>

> if Tbutton(sender).Name = 'button1' then 가...

>

> if Tbutton(sender).Name = 'Button1' then

>

> 달라진점은.. button1 ===> Button1 밖에 없습니다...

>

> 에공.. 왜 그런지 모르겠네요...

>

>

>