練習問題1 文字列の表示

練習問題1

  1. ボタンをクリックしたら、メッセージを表示する
  2. プログラムを実行する
  3. プロジェクトファイルとユニットファイルを保存する(名前を付ける)
  4. フォーム名とボタン名を変更する(キャプションも)
  5. フォームのタイトルとボタンのキャプションとアプリケーションのタイトルを表示する

一番最初って、こんなところから始めるのではないでしょうか。
いざ出発!

Delphiを起動し、「ツールパレット」の「Standard」から、「Tbutton」コンポーネントをフォームに貼り付けました。

kiso5

「Button1」をダブルクリックし、表れたコードエディタに、次のように入力しました。(beginとendの間)

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage('初めてのプログラミングです');
end;

実行ボタンをクリックし「Button1」ボタンをクリックしました。
ここまで、2番までやっつけましたぞ。威張るほどのものでもないか(^^;
kiso6

名前を付けて保存するには、「ファイル」→「名前を付けて保存」をクリックします。
プロジェクトとユニット別々に名前を付けます。

ren1

キャプションと名前は、オブジェクトインスペクタのプロパティで設定します。

ren2

アプリケーションタイトルは「プロジェクト」-「オプション」で設定します。

ren4

ボタンのイベントプロシージャを次のように書き換えます。

procedure TfrmMain.btnJikkouClick(Sender: TObject);
begin
  ShowMessage(frmMain.Caption);
  ShowMessage(btnJikkou.Caption);
  ShowMessage(Application.Title);
end;

実行結果

「OK」をクリックすると、次のメッセージが表示されます。
この命令では1個ずつです。
簡単なプログラムでも、最初からきちんとやったほうがいいわね。
達成感があります。エラそうに(^^;

ren3

コメントを残す

メールアドレスが公開されることはありません。 が付いている欄は必須項目です