今度は、スピンエディットに替えて足し算をさせてみましょう。フォーム上に3つのスピンエディットを次のように配置してください。
コンポーネント | Name |
---|---|
左上のスピンエディット | SpinEdit1 |
左中のスピンエディット | SpinEdit2 |
左下のスピンエディット | SpinEditResult |
右のボタン | ButtonAdd |
ボタンを押したときの動作はどのようにプログラミングするとよいでしょうか。
procedure TForm1.ButtonAddClick(Sender: TObject); begin := + ; end;
出来上がったら、適当な数値を入れて「足す」ボタンを押し、プログラムの動作を確かめましょう。
今度はうまく足し算ができたはずです。
どうやら「エディット」コンポーネントと「スピンエディット」コンポーネントには何らかの“違い”があるようです。その種明かしは次節で行いましょう。