Delphi Starter Edition でメモ帳クローンを作る (前編)

# begin { はじめに
これは [Delphi Advent Calendar 2017](https://qiita.com/advent-calendar/2017/delphi) 8 日目の記事です。初心者向けチュートリアルとして Delphi Starter Edition でメモ帳クローンを作ってみたいと思います。

## そもそも Delphi とは
ひょっとしてここから説明しなければ？本当に知らない人のためにざっくりと説明すると以下のようになります。

 - Pascal。
 - ...を魔改造した [Turbo Pascal が先祖](https://qiita.com/ht_deko/items/b41b0cd45181aec522d4)。
 - ...を Windows アプリケーション作成に対応させた IDE (統合開発環境) が Delphi。
 - Turbo Pascal for Windows なんてのもあったけど話が複雑になるので割愛
 - 言語そのものも Delphi と呼んだりする (言語は Object Pascal)。
 - 上位版ではマルチプラットフォーム対応 (Windows 64bit, macOS, Android, iOS, Linux)。
 - なんだかんだで今年で 22 周年！

![notepad_000.png](https://qiita-image-store.s3.amazonaws.com/0/21785/25c2dfd6-d3f6-a4c2-f3f2-8a98dabcc4d4.png)

歴史的な経緯については Wikipedia を参照してみてください。

 - [Delphi (Wikipedia)](https://ja.wikipedia.org/wiki/Delphi)

## Delphi Starter Edition とは
機能限定版の Delphi で Delphi XE (2011 年) にラインナップされました。当時は有償だったのですが、2016 年の Delphi 10.1 Berlin より無償化され、2017/12 現在の最新版は 10.2 Tokyo となっています。

何が機能限定なのかと言いますと、

 - ライブラリのソースコードが付属しない
 - DB 関連コンポーネントが使えない
 - 一部の IDE の機能が使えない
 - 32bit Windows アプリケーションのみ作成可能

大きくはこんなところです。

Delphi Starter Edition のインストール方法に関してはエンバカさんの記事がありますのでそちらをご覧ください。

 - [Starter Edition ユーザーのための Delphi / C++Builder 10.2 Tokyo Starter Edition (無償！) 入手ガイド [JAPAN]](https://community.embarcadero.com/blogs/entry/starter-edition-delphi-c-builder-10-2-tokyo-starter-edition-japan)

インストーラの途中でオプションを選択する画面がありますが、**Samples と Help は必ずチェックを入れてインストール**してください。

この記事では Delphi Starter Edition がインストールされているものとして話を進めます。

:::note
**追記 (2018/07/19)**
Delphi のフル機能が使える **Delphi Community Edition** がリリースされました。Windows 32bit に加え、Windows 64bit / macOS / iOS / Android の開発が行えます。

現在、Starter Edition は Community Edition で置き換えられていますが、記事は当時の状況のままにしておきたいので、お手数ですが記事中の `Starter Edition` を `Community Edition` に読み替えて頂けると幸いです。

 - [Delphi Community Edition (Embarcadero)](https://www.embarcadero.com/jp/products/delphi/starter)
 - [Delphi 10.4.2 Community Editionをインストール (Qiita: @CYonezawa)](https://qiita.com/CYonezawa/items/42f2bdc643c81e4735b9)
:::

# プロジェクトを作るよ！

まずは Delphi を起動します。起動直後の画面が以下のようになります。各部の詳細についてはおいおい紹介します。

![notepad_001.png](https://qiita-image-store.s3.amazonaws.com/0/21785/f95b7873-2c61-7cd2-1163-c62386acf2c2.png)

さて、Delphi には、２つのフレームワークがあります。

 - **VCL (Visual Component Library)**
 - **FMX (FireMonkey)**

前者は従来からある Windows に特化したフレームワークで、後者はマルチデバイスアプリケーション用のフレームワークです。

 - [VCL の概要 (DocWiki)](http://docwiki.embarcadero.com/RADStudio/ja/VCL_%E3%81%AE%E6%A6%82%E8%A6%81)
 - [FireMonkey の概要 (DocWiki)](http://docwiki.embarcadero.com/RADStudio/ja/FireMonkey)

今回はメモ帳のクローンを作るという目的ですから、[ファイル | 新規作成 | VCL フォームアプリケーション - Delphi] で Delphi アプリケーションを新規作成します。

![notepad_002.png](https://qiita-image-store.s3.amazonaws.com/0/21785/79897b5e-2cd9-bfc2-23f3-6d1cbb34c670.png)

私の環境には **C++Builder Starter Edition** も入っていますのでメニューがちょっと多いです。もちろん C++Builder Starter Edition も無償なので一緒にインストールしておくと便利ですよ [^1]。

プロジェクトを新規作成すると、ちょっと画面が変化しましたね。

![notepad_003.png](https://qiita-image-store.s3.amazonaws.com/0/21785/adb1af30-af66-4c82-3b8a-cd43e15cb6fe.png)

[ファイル | プロジェクトに名前を付けて保存] で一旦プロジェクトを保存します。

![notepad_004.png](https://qiita-image-store.s3.amazonaws.com/0/21785/0b254510-5dbf-f497-fe4a-09d1928c1271.png)

デフォルトの保存先は C:\Users\<アカウント名>\Documents\Embarcadero\Studio\Projects になります。どこでも構わないので、NOTEPAD_CLONE というサブフォルダを作成し、ここにプロジェクトを保存する事にします。

![notepad_005.png](https://qiita-image-store.s3.amazonaws.com/0/21785/84af1726-d98d-38fa-ce21-118a6a82aa14.png)

最初は **Unit1 に名前を付けて保存** というファイル保存ダイアログが出ていると思うので、**frmuMain.pas** という名前で保存します。これはメインのソースコードファイルになります。Pascal のファイルなので拡張子は *.pas となります。

![notepad_006.png](https://qiita-image-store.s3.amazonaws.com/0/21785/335cee31-ee10-4a7c-90b4-ef8d1b84233c.png)

次に **Project1 に名前を付けて保存** というファイル保存ダイアログが出るので、**notepad_clone.dproj** という名前で保存します。これは Delphi のプロジェクトファイルとなります。Delphi のプロジェクトファイルなので拡張子は *.dproj となります。このプロジェクト名が実行ファイルの名前になります。

![notepad_007.png](https://qiita-image-store.s3.amazonaws.com/0/21785/17e76134-bd27-38a4-aff3-2c47d11a5dfe.png)

保存が終わったら **プロジェクトマネージャ** を確認してみましょう。デフォルトでは IDE の右上にあるはずです。

![notepad_008.png](https://qiita-image-store.s3.amazonaws.com/0/21785/48e545f2-572c-35c0-ef0b-1c1db509d210.png)

 - [［プロジェクト マネージャ］(DocWiki)](http://docwiki.embarcadero.com/RADStudio/ja/%EF%BC%BB%E3%83%97%E3%83%AD%E3%82%B8%E3%82%A7%E3%82%AF%E3%83%88_%E3%83%9E%E3%83%8D%E3%83%BC%E3%82%B8%E3%83%A3%EF%BC%BD)

⊞ になっている箇所はマウスでクリックすると展開されます。デフォルトの状態では以下のような構成になっています。

 - プロジェクト名 (EXE 名)は **notepad_clone**
 - デバッグビルド (**Debug**)
 - Windows 32bit アプリケーション (**Win32**)
 - ファイルは frmuMain が一つ

何はともあれこの状態で **〔F9〕キー** またはツールバーにある **実行ボタン** を押してみましょう。 

![notepad_009.png](https://qiita-image-store.s3.amazonaws.com/0/21785/13a58535-eb33-3eaa-a7c1-83f49124668d.png)

コンパイルの進捗ダイアログが表示され...

![notepad_010.png](https://qiita-image-store.s3.amazonaws.com/0/21785/4d6fbac7-b7e6-2603-a061-a4c692e849cd.png)

何もないですが、**フォーム (ウィンドウ)** が表示されたと思います。この時、IDE は
 **デバッグ実行** 状態になっています。

![notepad_011.png](https://qiita-image-store.s3.amazonaws.com/0/21785/049cceed-f3bf-1c12-9a7c-7dad12f6e80c.png)

✖ を押してフォームを閉じるか [実行 | プログラムの終了] でプログラムを終了させると、デバッグ実行が終了します。デバッグ実行が終了したら、プロジェクトファイルのあるフォルダを覗いてみましょう。プロジャクトマネージャにあるプロジェクト名を右クリックすると **[エクスプローラーで表示]** がありますのでこれを選択し、プロジェクトの場所をエクスプローラーで開きます。

![notepad_012.png](https://qiita-image-store.s3.amazonaws.com/0/21785/f1284a42-6830-9d46-9f39-380338c65534.png)

このような構成になっていると思います。

![notepad_013.png](https://qiita-image-store.s3.amazonaws.com/0/21785/a9e51513-b768-602a-8edc-ed78cce470ce.png)


生成されているファイルの詳細は以下のドキュメントを確認してください。

 - [RAD Studio によって生成されるファイルの拡張子 (DocWiki)](http://docwiki.embarcadero.com/RADStudio/ja/RAD_Studio_%E3%81%AB%E3%82%88%E3%81%A3%E3%81%A6%E7%94%9F%E6%88%90%E3%81%95%E3%82%8C%E3%82%8B%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%81%AE%E6%8B%A1%E5%BC%B5%E5%AD%90)

さて、Win32 フォルダを開くと、debug フォルダがあり、その中には **notepad_clone.exe** ができています。プロジェクトマネージャで指定された通りですね。ではこれをダブルクリックして実行してみましょう。

![notepad_014.png](https://qiita-image-store.s3.amazonaws.com/0/21785/54342d3c-7af8-78c5-7421-18d3af680102.png)

ちゃんと実行ファイル (EXE) ができていますね！

![notepad_011.png](https://qiita-image-store.s3.amazonaws.com/0/21785/e47f7094-4a44-748f-6543-a89ce8b81575.png)

このように Windows アプリケーションを実に簡単に作る事ができるのが Delphi の特徴です。

# 外観を作るよ！
さて、何もない所から頼りなく始めます(？)。IDE の画面中央に表示されているのが**フォームデザイナ**です。ここに **コンポーネント** と呼ばれる部品を貼り付ける事ができます。エディットボックスやボタン等の **コントロール** もコンポーネントの一種です。

![notepad_015.png](https://qiita-image-store.s3.amazonaws.com/0/21785/9405a565-0a8f-d28f-136d-3a9b831cc967.png)

 - [フォームデザイナ (DocWiki)](http://docwiki.embarcadero.com/RADStudio/ja/%E3%83%95%E3%82%A9%E3%83%BC%E3%83%A0_%E3%83%87%E3%82%B6%E3%82%A4%E3%83%8A)

フォームデザイナの状態で **〔F12〕** を押すと、**コードエディタ**になります。

![image.png](https://qiita-image-store.s3.amazonaws.com/0/21785/c3f67a0b-d639-a71f-8ced-f0b483cd8201.png)

しばらくはフォームデザイナで作業を行いますので、間違ってコードエディタにしてしまった場合にはもう一度〔F12〕を押してフォームデザイナに戻してください。

![image.png](https://qiita-image-store.s3.amazonaws.com/0/21785/54e87905-4970-8139-645a-152c4a690d32.png)

プロジェクトマネージャからも切り替えられます。.pas をダブルクリックするとコードエディタ、.dfm をダブルクリックするとフォームデザイナになります。

## コンポーネントの配置

コンポーネントは右下にある **ツールパレット** から持ってくることができます。例えば [Standard] タブにはこのようなコンポーネントが用意されています。

![notepad_016.png](https://qiita-image-store.s3.amazonaws.com/0/21785/b1523c9a-503a-b30d-daf0-ad2e2cef423c.png)

 - [［ツール パレット］(DocWiki)](http://docwiki.embarcadero.com/RADStudio/ja/%EF%BC%BB%E3%83%84%E3%83%BC%E3%83%AB_%E3%83%91%E3%83%AC%E3%83%83%E3%83%88%EF%BC%BD)

”T～” という命名ですが、この接頭辞は **クラス** を表しています。例えば TEdit は Windows のエディットコントロールを Object Pascal 言語のクラスでラッピングしたコンポーネントです。

ここにある **TMemo** をフォームデザイナに貼り付けてみましょう。貼り付ける方法は 3 つあります。

 - ツールパレットにある TMemo をフォームデザイナの任意の場所へドラッグ＆ドロップ
 - ツールパレットにある TMemo をクリックしてからフォームデザイナの任意の場所をクリック
 - ツールパレットにある TMemo をダブルクリック

貼り付ける場所を指定しないでいいのならダブルクリックが最も簡単です。とにかく貼ってみます。

![notepad_017.png](https://qiita-image-store.s3.amazonaws.com/0/21785/f55b788d-66c5-7a4e-4b45-868071c4ff8d.png)

貼り付けられた TMemo は Memo1 という名前になっています。**オブジェクト (インスタンス)** の名前が Memo1 という事になります。これは IDE 左下の **オブジェクトインスペクタ** で確認できます。

![notepad_018.png](https://qiita-image-store.s3.amazonaws.com/0/21785/53a78647-192b-8418-875f-fa781785a28f.png)

 - [［オブジェクト インスペクタ］(DocWiki)](http://docwiki.embarcadero.com/RADStudio/ja/%EF%BC%BB%E3%82%AA%E3%83%96%E3%82%B8%E3%82%A7%E3%82%AF%E3%83%88_%E3%82%A4%E3%83%B3%E3%82%B9%E3%83%9A%E3%82%AF%E3%82%BF%EF%BC%BD%E3%81%AE%E6%A6%82%E8%A6%81)

**Name** というのがこの TMemo 型オブジェクトの Name **プロパティ** となります。プロパティとはオブジェクトの属性を表すものです。ここでオブジェクトの名前を変更する事ができますが、既に貼られているコンポーネントと同じ名前にする事はできません。

用語に混乱してきましたか？ちょっと整理しますね。

 - **コントロール:** その名の通り、制御するもの。GUI 部品など。
 - **コンポーネント:** Object Pascal で使える部品。コントロールのようにビジュアルなコンポーネントだけでなく、非ビジュアルなコンポーネントもある。
 - **クラス:** フィールドやメソッド、プロパティなどの構造を定義したもの。クラス型。
 - **プロパティ:** クラスの構成要素の一つ。属性。
 - **フィールド:** クラスの構成要素の一つ。定数や変数。メンバ変数とも。
 - **メソッド:** クラスの構成要素の一つ。関数や手続き。
 - **オブジェクト:** クラスの実体。インスタンス。

メモ (複数行エディット) は Windows の**コントロール**で、それを Object Pascal の**クラス**でラッピングしたものが TMemo。これは**コンポーネント**であり、フォームデザイナに貼る事ができます。フォームデザイナに貼られた TMemo 型の**オブジェクト**が Memo1 となります。オブジェクトの名前は Name **プロパティ**で変更可能です。

続けましょう。フォームに貼ったメモコントロールをマウスでクリックすると選択状態になり、コンポーネントの８方向に**青い点 (グラブハンドル)** が表示されます。

![notepad_019.png](https://qiita-image-store.s3.amazonaws.com/0/21785/cf5b6508-609c-6f02-df9c-58e063a897ff.png)

グラブハンドルでない部分をマウスでドラッグすればコンポーネントを移動でき、グラブハンドルを持ってドラッグすればコンポーネントの大きさを変更する事ができます。コンポーネントの移動とリサイズはフォームに表示されているグリッド (点) の単位で行われますが、〔Alt〕キーを押しながらドラッグすれば、1 ドット単位で移動/リサイズできます。その他の操作方法は以下のようになります。

|ショートカット|動作|
|:-----------------|:------------------|
| マウスで領域選択|複数のコンポーネントを選択します|
| 〔Ctrl〕+ マウスで領域選択|既に選択されている親コンポーネント内にある子コンポーネントを選択します。|
| 〔Ctrl〕+ マウスクリック|コントロールを追加で選択します (複数選択)。|
| 〔Ctrl〕+ カーソルキー|選択されたコントロールを 1 ドット単位で移動します。|
| 〔Ctrl〕+〔Shift〕+ カーソルキー|選択されたコントロールをグリッド単位で移動します。|
| 〔Shift〕+ カーソルキー|選択されたコントロールを 1 ドット単位でリサイズします。|
| 〔Tab〕|コンポーネント間を移動します (選択の切り替え)。|
| 〔Esc〕|既に選択されている子コンポーネントの親コンポーネントを選択します。|
| 〔Delete〕|選択されているコンポーネントを削除します。|
| 〔Ctrl〕+〔C〕|選択されているコンポーネントをクリップボードにコピー。|
| 〔Ctrl〕+〔V〕|クリップボードにコピーされたコンポーネントを貼り付け。|

ではこの Memo1 を画面いっぱいに広げてみてください。コンポーネントの移動/リサイズはオブジェクトインスペクタからも行えます。

![notepad_021.png](https://qiita-image-store.s3.amazonaws.com/0/21785/65efca70-3b8e-0160-91a6-1179ab704be0.png)

Left / Top プロパティでコンポーネントの位置を、Width / Height プロパティで幅と高さを変更する事ができます。

![notepad_020.png](https://qiita-image-store.s3.amazonaws.com/0/21785/4ae52f4a-8006-8cb4-bf75-956f6d4d3888.png)

ここまでできたら〔F9〕を押して実行してみてください。

![notepad_022.png](https://qiita-image-store.s3.amazonaws.com/0/21785/5182146c-8bdb-dd14-9b3d-4688c383a4cd.png)

メモ (複数行エディット) コントロールに文字を入力する事ができるようになりましたね。でもウィンドウの右下を引っ張ってリサイズすると...

![notepad_023.png](https://qiita-image-store.s3.amazonaws.com/0/21785/18630219-c79c-bda3-b146-bee79133233e.png)

んーうまくありませんね。ウィンドウのリサイズにコンポーネントのサイズが追従しないようです。メモコントロールはウィンドウ内で最大化して欲しいですね。このような場合には Align プロパティを変更します。

プロパティを変更する際はフォームを閉じてデバッグ状態を解除しておきます。

![notepad_024.png](https://qiita-image-store.s3.amazonaws.com/0/21785/3b73bc9e-3f42-23cd-9256-f2ce33a946e0.png)

alNone になっているのを **alClient** に変更します。文字を入力して変更してもいいのですが、右側に ▼ マークのボタンが出ていますね。このようなプロパティは値を選択できます。ボタンを押すか値をダブルクリックしてみてください。

![notepad_025.png](https://qiita-image-store.s3.amazonaws.com/0/21785/944bd4aa-abbd-464b-49ad-5a998e4c17e9.png)

何やら出てきましたね。このように一部のプロパティには**プロパティエディタ**が用意されている事があり、プロパティエディタによって直感的に値を変更できる事があります。今回の場合、真ん中の大きいボタンが alClient です。Align プロパティの詳細については以下のトピックを参考にしてください。

 - [Vcl.Controls.TControl.Align (DocWiki)](http://docwiki.embarcadero.com/Libraries/ja/Vcl.Controls.TControl.Align)

Memo1 の Align プロパティを alClient に変更したら〔F9〕を押して実行してみてください。

![notepad_026.png](https://qiita-image-store.s3.amazonaws.com/0/21785/e1ef29f0-2baf-4876-4665-d7ab9b1d7456.png)

今度はリサイズしても大丈夫なようです！

## メニューの追加
さて、とりあえず見た目はそれっぽいものができたので、メニューを追加します。本物のメモ帳 (notepad) を観察してみると上部にメニューがありますよね。これを実装します。

![notepad_027.png](https://qiita-image-store.s3.amazonaws.com/0/21785/ae0cdb0d-0868-a8fb-5a3f-7df4c0808af1.png)

メニューを追加するにはツールパレットから TMainMenu をフォームデザイナに追加します。TMainMenu は**非ビジュアルコンポーネント**なのでダブルクリックして追加するといいでしょう。

![notepad_028.png](https://qiita-image-store.s3.amazonaws.com/0/21785/8f6c77ae-58da-974d-b03c-4f484446804a.png)

TMainMenu を追加するとこんな感じになります。

![notepad_029.png](https://qiita-image-store.s3.amazonaws.com/0/21785/76bd5f77-6f0a-5f7e-3355-55f4d2f2669a.png)

TMainMenu は非ビジュアルコンポーネントなのでただの四角いアイコンです。このアイコンをダブルクリックすると TMainMenu の**コンポーネントエディタ**が起動してメニューを編集できるのですが、とりあえず今はこのままにしておきます。

フォームデザイナでフォームを選択します。「Memo1 が邪魔でフォームを選択できない」？そんな時は〔ESC〕キーを何度か押しましょう。どの選択状態であっても何度か〔ESC〕キーを押せばフォームを選択できます。

それ以外の方法として、左上の **[構造] ペイン**で Form1 を選択しても構いませんし、

![notepad_030.png](https://qiita-image-store.s3.amazonaws.com/0/21785/dbd91f10-706a-ca9c-292d-31622858c389.png)

 - [［構造］ビュー (DocWiki)](http://docwiki.embarcadero.com/RADStudio/ja/%EF%BC%BB%E6%A7%8B%E9%80%A0%EF%BC%BD%E3%83%93%E3%83%A5%E3%83%BC)

オブジェクトインスペクタの上部にあるコンボボックス (**インスタンスリスト**) で Form1 を選択しても構いません。

![notepad_031.png](https://qiita-image-store.s3.amazonaws.com/0/21785/43a50c95-2a9c-7e4a-8129-1e4bee0102ac.png)

そして、オブジェクトインスペクタで Menu プロパティをみてみると、MainMenu1 が関連付けられているのが分かりますね。

![notepad_032.png](https://qiita-image-store.s3.amazonaws.com/0/21785/a7b9577b-9761-38bc-173e-8eec58cab739.png)

続いてツールパレットから TActionList を追加します。これも非ビジュアルコンポーネントです。

![notepad_033.png](https://qiita-image-store.s3.amazonaws.com/0/21785/cb0497fe-520c-69af-74b2-c4f3ed940d5e.png)

この TActionList ですが、何をするものかと言うと機能を**アクション**という単位で実装して管理するリストです。アイコンをダブルクリックするとコンポーネントエディタが開きます。

![notepad_034.png](https://qiita-image-store.s3.amazonaws.com/0/21785/5481a36a-569f-383b-bb82-65840d8a00b2.png)

左上のアイコンを押すか、〔Ins〕キーを押してアクションを新規作成してみます。

![notepad_035.png](https://qiita-image-store.s3.amazonaws.com/0/21785/c93bc2a2-8f8d-63a4-6295-737859cf1f67.png)

Action1 が追加されましたね。コンポーネントエディタで Action1 を選択するとオブジェクトインスペクタでも Action1 が選択されます。各プロパティを以下のように変更しましょう。

|プロパティ|値|
|:-----------------|:------------------|
|Caption|新規(&N)|
|Category|File|
|Name|acNew|
|Shortcut|Ctrl+N|

![notepad_036.png](https://qiita-image-store.s3.amazonaws.com/0/21785/aba4f24d-1390-0ad0-03e2-fae1c83cdf89.png)

TActionList コンポーネントエディタのコンポーネントエディタも変化するはずです。
![notepad_038.png](https://qiita-image-store.s3.amazonaws.com/0/21785/b9e3faa3-50d8-015d-4e20-98fcb8c541ec.png)

同様にメモ帳の [ファイル(F)] メニューにある項目をすべて追加しましょう。

![notepad_037.png](https://qiita-image-store.s3.amazonaws.com/0/21785/eca4a900-86ef-4a96-a5e9-12c4992f74ea.png)

|Action (Name)|Caption|Category|ShortCut|
|:-----------------|:------------------|:------------------|:----------------------|
|acNew|新規(&N)|File|Ctrl+N|
|acOpen|開く(&O)...|File|Ctrl+O|
|acSave|上書き保存(&S)|File|Ctrl+S|
|acSaveAs|名前を付けて保存(&A)...|File||
|acPageSetup|ページ設定(&U)...|File||
|acPrint|印刷(&P)...|File|Ctrl+P|
|acExit|メモ帳の終了(&X)|File||

 - キャプションの () 内の文字は**アクセラレーターキー**と呼ばれるもので、アクセラレーターキーは **＆を付けて指定**します。英語だと &New のような記述になり、N の下にアンダーバーが付きます。日本語版 Windows ではメニューが翻訳されるとそのような記述ができないため、アクセラレーターキーは慣習的に () 内に記述する事になっています。
 - アクセラレーターキーはアンダーバーが付いたキーを押せばメニューが選択されるという意味で、例えばメモ帳ですと、〔Alt〕キーを単独で押した後に〔F〕、〔O〕と入力すると [開く(O)...] メニューが選択された事になり、ファイルオープンダイアログが開きます。
 - キャプションの ... は **次に何かのウィンドウがある** という意味です。"..." がないメニューの機能は即実行されます。これも慣習なのですが、海外のアプリケーションが翻訳された場合にはこの慣習が無視される事が多いです。
 - ショートカットはその名の通りショートカットです。〔Ctrl〕+〔S〕を押せばメニューを開かなくてもそのメニュー (機能) が実行されます。
 - (余談) 古い Windows のメモ帳は 64KB 以上のファイルを開けませんでした。
 - (余談) 古い Windows のメモ帳は〔Ctrl〕+〔F〕で検索できませんでした。

![notepad_039.png](https://qiita-image-store.s3.amazonaws.com/0/21785/909291b7-35ae-80f0-7930-37fea283db67.png)

今度はフォームデザイナ上の MainMenu をダブルクリックし、TMainMenu のコンポーネントエディタを起動します。

![notepad_040.png](https://qiita-image-store.s3.amazonaws.com/0/21785/33a93060-119d-c5a8-dd6b-b73717e9b7f9.png)

まだメニューが何もない状態ですね。オブジェクトインスペクタに移動し、この名前のないメニューを [ファイル (F)] にします。Caption にキャプションを指定すれば、Name プロパティは自動で設定されます (F1 等)。

![notepad_041.png](https://qiita-image-store.s3.amazonaws.com/0/21785/2aaa2b30-1ab7-0097-c04b-65196bc4fd25.png)

コンポーネントエディタもこのように変化したと思います。

![notepad_042.png](https://qiita-image-store.s3.amazonaws.com/0/21785/48a05260-a570-88fa-c0ce-adb64f941e39.png)

ではこの [ファイル(F)] メニューに機能を追加していきましょう。

![notepad_043.png](https://qiita-image-store.s3.amazonaws.com/0/21785/a56e78c7-eb1e-fa82-b4c0-0442192b4aca.png)

 [ファイル(F)] メニューの下の何もない所を選択し、オブジェクトインスペクタを開き、Action プロパティのドロップダウンリストから acNew を選択します。

![notepad_044.png](https://qiita-image-store.s3.amazonaws.com/0/21785/10c96676-fafe-0ae8-cb68-3da87cece616.png)

するとコンポーネントエディタにメニューが追加されます。

![notepad_045.png](https://qiita-image-store.s3.amazonaws.com/0/21785/ac3dc59f-8027-8e97-729c-49d609efafa4.png)

同様にすべてのアクションをメニューに割り当てていきましょう。

![notepad_046.png](https://qiita-image-store.s3.amazonaws.com/0/21785/a6fb0424-0a11-157a-ae56-32937193aeff.png)

ん？本物のメモ帳には区切り (セパレーター) がありますね。これはどうしたらいいのでしょうか？

![notepad_047.png](https://qiita-image-store.s3.amazonaws.com/0/21785/10a8e174-d6ed-a871-1e04-a08bddd36e2d.png)

コンポーネントエディタを開き、区切りを入れたい場所の下にあるメニューアイテムを選択した状態で〔Ins〕キーを押しましょう。

![notepad_048.png](https://qiita-image-store.s3.amazonaws.com/0/21785/a9922a2c-2722-bce4-ba82-7cc34cac1668.png)

空白が挿入されたので、オブジェクトインスペクタに移動し、Caption に - (ハイフン) を入力します。

![notepad_049.png](https://qiita-image-store.s3.amazonaws.com/0/21785/eb55641c-6134-62f1-db52-e92d56fd6b25.png)

セパレーターが作成されました。

![notepad_050.png](https://qiita-image-store.s3.amazonaws.com/0/21785/398a3178-3d4c-518e-3bed-f2081ee25171.png)

同様に、もう１か所にもセパレーターを挿入します。

![notepad_051.png](https://qiita-image-store.s3.amazonaws.com/0/21785/6f6e8ad6-c387-b590-a1c2-7f4711641815.png)

これで OK ですね。

 - メニューの並びはドラッグ＆ドロップで入れ替えられます。
 - 間違って追加したメニューアイテムは〔Del〕キーで削除されます。
 - メニューアイテムを削除してもアクションが削除されるわけではありません。

この時点で〔F9〕を押して実行すると、とりあえずメニューが表示されますが、コードが記述されていないのでメニューがすべてグレーアウトしていますね。

![notepad_052.png](https://qiita-image-store.s3.amazonaws.com/0/21785/7c6616d3-323d-a267-ad17-103ad3f3fdc2.png)

...そうなんです、実はここまで１行もコードを書いていないのです。


# // 続く
長くなったので[後編](https://qiita.com/ht_deko/private/d5c4de7d55eebca928e2)に続きます。

[^1]: 残念ながら Community Edition では Delphi と C++Builder を同居させられません。