Q&A

  • Re: 스트링형 계산식......
멋진이 wrote:

> 두개의 Text박스를 놓구 한곳에는 계산식, 한곳에는 계산식에 해당하는 결과를 나오게 하려구 합니다.

>

> EDit1.Text 에는 2+2 라구 치면 EDit2.Text 에는 4라구 나오게요...

>

> 계산식이 타입 스트링으로 되어 있어서 잘 안되네요..

>

> 도와주세요....



if Key = vk_return then

Edit2.Text := IntToStr(StrToInt(Copy(Edit1.Text,1,Pos('+',Edit1.Text)-1))

+StrToInt(Copy(Edit1.Text,Pos('+',Edit1.Text),Length(Edit1.Text))));

키다운이벤트안에 넣어보세요....

물론 공백이나 다른 숫자아닌 문자가 들어가는 에러처리는 님이 함 생각해보시고요^^

0  COMMENTS