3-7 変数 (1) -変数としての Text プロパティ-

【練習問題】

	という画面で「入れ替え」ボタンを押すと
	上のエディットの Text プロパティ (攻撃) と下のエディットの Text プロパティ (守備) が入れ替わる、というプログラムを作りましょう。

入れ替えプログラムのレイアウトまず、次のようにフォームを作ってください。

コンポーネント	Name
左上のエディット	Edit1
左下のエディット	Edit2
右のボタン	ButtonSwap

下線部には何が入りますか?

procedure TForm1.ButtonSwapClick(Sender: TObject);
begin
  Edit2.Text :=                 ;
  Edit1.Text :=                 ;
end;

上下のエディットに適当な言葉を入れて実行してみましょう。うまく動きましたか?

実はこのままではうまく入れ替えができませんね。それは何がまずいのでしょうか?また、どうしたらいいでしょうか。

【基礎課題 3-6】

中継用エディットを付け加えたフォームうまく入れ替えを行うためには、Edit2.Text を取り敢えず保存しておく「エディット」が必要です。次のように、データの中継用のエディットを加えてください。(Temp は temporary = 一時的の略です。)

コンポーネント	Name
上のエディット	Edit1
中のエディット	Edit2
下のエディット	EditTemp
ボタン	ButtonSwap

以下の空欄を埋めてプログラムを完成させ、動作を確かめてください。

procedure TForm1.ButtonSwapClick(Sender: TObject);
begin
                               
                               
                               
end;

このままでもプログラムは正しく動きますが、中継用エディットが画面に表示されるのは格好悪いですね。次の問に対して予想を立ててから、実行して確かめてみましょう。

【練習問題】

予想 EditTemp の Width を 8 にしても正しく動くでしょうか?

エラーが出て実行できない
エラーは出ないが、目的通りの動作はしない
エラーは出ず、目的通りの動作をする

あなたの予想は

【練習問題】

予想 EditTemp の Visible プロパティを False にしても正しく動くでしょうか?

エラーが出て実行できない
エラーは出ないが、目的通りの動作はしない
エラーは出ず、目的通りの動作をする

あなたの予想は