コラム / １：１：チャット / 5

あ、そうそう、MemoのLinesプロパティと、
EditのTextプロパティを消しておけば、デフォルトの表示はきえます。

オブジェクトインスペクタより、Form1のonCreateイベントをダブルクリックします。

セッションクラスの生成文を書きます。

Form1のonDestroyイベントもダブルクリックします。

セッションクラスの解放文を書きます。

貼り付けたメニューから、
セッション＞開く
画面を戻して
セッション＞閉じる
画面を戻して
セッション＞入る
戻して
セッション＞出る
とそれぞれクリックします。

エディタに４つ出たら成功

それぞれ記述します。

CloseとLeaveは工夫のかけらも無いので割愛。

OpenSessionは引数に、セッションの最大人数を指定します。
今回は二人チャットなので2です。

JoinSessionは引数に、IPを表現した文字列を入れます。
234.123.0.55 みたいなやつです。（左のは適当
ただ、入力部分を作るのがめんどくさいので、
InputBox関数ですませてます。
まぁやればわかるので気にしなくてOKでしょう。