멋진이 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))));
키다운이벤트안에 넣어보세요....
물론 공백이나 다른 숫자아닌 문자가 들어가는 에러처리는 님이 함 생각해보시고요^^