さっそく、10数年前に最後の更新されたサイトへ行ってきました。

ビギナーズの最初のプログラムは、フォントを編集するというものです。
インターフェースがだいぶ違うので、試行錯誤しながら手探りでやっております。
でもなんとか第1回目はクリア・・と思う

それにしてもこのブログの記事タイトル、大きすぎだわ
なおそう

どうでしょうか？
使用前、使用後です。

どうやったのかというと、コンポーネントから、ボタン2個、ラベル１個、フォントダイアログ1個をフォームに貼り付けました。
「フォント編集」というボタンをダブルクリックして、次のようなコード（プロシージャ）を書きました。

procedure TForm1.Button1Click(Sender: TObject);
begin
//フォントダイアログを開く
if FontDialog1.Execute=True then
begin
//ラベルに表示する
Label1.Font := FontDialog1.Font;
end;
end;

procedure TForm1.cmdExitClick(Sender: TObject);
//フォームを閉じる
begin
Close;
end;