Edit1の中での計算


ヒロユキ  2003-10-22 06:50:10  No: 5331

はじめましてヒロユキともうします。
procedure TForm1.Button1Click(Sender: TObject);
var
  x1,x2:Integer;
begin
  x1:=StrToInt(Edit1.Text);
  x2:=StrToInt(Edit2.Text);
  Edit3.Text:=IntToStr(x1+x2);
end;
end.
Edit1に 10+20-5 と記入したしたいのですがこのような事が出来るのでしょうか?
教えてください


シュークリーム  2003-10-22 17:45:13  No: 5332

できません...

StrToIntでは+、−などは認識しません。


Halbow  2003-10-22 19:14:38  No: 5333

Halbow です。

そのような文字列の「式」を計算するには、文字列を解析する必要があり、
簡単ではありませんが可能です。同様な質問には何回か回答を書いたこと
があります。たとえば、

「文字列内の演算」
http://www.sakaki.keiaikai.or.jp/cgi-bin/ConvRoom/webconv.dll/alltree?No=18313

参考にしてください。


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加