フォームに、円を描くプログラムを作りました。
「Delphiの魔法」さんの記事を参考にさせてもらいました。
ツールバーの「Diarogs」から、「TcolorDialog」コンポーネントをフォームに貼り付けます。

あとは、左画像のイベント部分をダブルクリックして出てきたプロシージャに下記のコードを書きます。

実行すると、色のない円が描かれます。
フォームをクリックすると、ダイアログが現れて、色を選択して「OK」をクリックすると、円に色が塗られます。

そんだけ(^^;
なんせ、ド素人ですから・・・

プログラム

procedure TForm1.FormClick(Sender: TObject);
begin
  //フォームをクリックするとダイアログが現れる
  if ColorDialog1.Execute=True then
    begin
      Canvas.Brush.Color := ColorDialog1.Color;
      Repaint;
    end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  if Width >Height then
    Width := Height
  else
    Height := Width;
    Repaint;
end;
procedure TForm1.FormPaint(Sender: TObject);
begin
  //キャンバスに円を描く
  Canvas.Ellipse(2,2,Height-50,Height-50);
end;

procedure TForm1.FormResize(Sender: TObject);
begin
  //ウィンドウを正方形にする
  if Width >Height then
    Width := Height
  else
    Height := Width;
    Repaint;
end;

本当にうれしいです。
昔のDelphi（５）では、データベースがすぐに使えるようになっていました。
ところがインストールしたDelphi2006には、データベースがすぐに使えるようにはなっていません。
Interbaseというのがあったので、それに接続しようとしましたが、どうしてもできませんでした。
ライセンスが必要みたいです。

あきらめられずに、Webをうろつきましたが、驚くほど情報がないのです。
そんななかで見つけたのが、個人で使うなら無料というデータベースです。
解説も英語ページでしかなくて、半ばあきらめかけていたのですが、なんとかDelphiの中からデータベースを開くことができました。
超嬉しいです！やった！

まずこちらからDelphi2006用Absolute Database、をダウンロードしインストールしました。

その次にやったのは、ParadoxファイルをAbsoluteに変換する作業です。
こちらのページを参考にさせていただきました。

次に、Delphiのフォームに、ツールからコンポーネントを貼り付けました。
貼り付けたのは、「Absolute DB」から、ABSDatabase、ABSTable、
ツールパレットの「Data Access」から、DataSource、「Data Controls」からDBNavigator、DBGrid1　コントロールです。

それぞれのコントロールには、データベースに接続するための情報を入れます。

フォームに色を塗ってみました。
これも超簡単です。
「オブジェクトインスペクタ」の OnPaint をダブルクリックして、出てきた Begin～end; の間に、下記コードの色のついた部分を書くだけです。赤いフォームにアンダーライン付の文字が表示されました。
簡単すぎるだろって？
ま、アタシのレベルはそんなもんですから(＾＾;
動くというだけで、プログラミングは楽しいですね。
次回は、「Delphiの魔法」さんのサンプルを試してみる予定です。円を描きます。

【プログラム】

unit Circle;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;
type
  TForm1 = class(TForm)
    procedure FormPaint(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormPaint(Sender: TObject);
begin
  //太字とアンダーライン
  Form1.Canvas.Font.Style := [fsBold,fsUnderline];
  Form1.Canvas.Font.Size := 72; //サイズ72ポイント
  FOrm1.Color := clRed;//フォームの色
  Form1.Canvas.TextOut(10,10,'A');//文字の表示
end;
end.

さっそく、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;

家にあったバージョン（Delphi2006)をWindows7にインストールしたのですが、起動すらできませんでした。
バージョンが古いので対応してないのかもしれません。
Borland Developer Studio 2006 が正しい呼び名のようです。

Webで検索したら、次のレジストリを削除したら動いたという記事を見つけました。

“HKEY_CURRENT_USER\Software\Borland\BDS\4.0\Known IDE Packages”
“$(BDS)\Bin\stide100.bpl”

3度目のインストール挑戦なので、ダメだったらアンインストールする気持ちで、レジストリをさわりました。
見事にDelphiが起動してくれました。超嬉しいっす。

書籍もDelphi2006のものは、まったく見つかりませんでした。出版されてない？
我が家にはDelphi使いが1名いるのですが、忙しすぎてまったく構ってはくれません。
一人さびしく、Delphiと遊びましょうか。