OOP-Delphi-Anfänger

[hotkey]

Hallo ,

wir haben im Informatikunterricht mit der Objektorientierten Programmierung in Delphi angefangen.

Am Anfang haben wir die gnazen Begriffe geklärt (Instanzen,Objekte , Klassen und Methoden).

Jetzt sollen wir folgendes machen :

Der Lehrer will von uns , dass wir Mithilfe der OOP in Delphi ein Rechteck programmieren , das sich mit einem Buttonklick zeichnen lässt.(Nicht grad einfach).


Bin so weit gekommen :

Code:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls;

type
  TForm1 = class(TForm)
    RechteckBTN: TButton;
    LoeschBTN: TButton;
    EndeBTN: TButton;
    PaintBox1: TPaintBox;
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

  TRechtecke = class             // Hier ist die Klassenbeschreibung
    laenge:integer;
    breite:integer;

    private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }



   end;


var
  Form1: TForm1;
  Rechteck: TRechtecke;

implementation

procedure rechteckmachen();
    begin
    Form1.Paintbox1.Canvas.MoveTo(20,20);   // Diese procedure soll irgendwie so eine Art Anfang sein für das Zeichnen.
    Form1.Paintbox1.Canvas.MoveTo(100,100);
    end;





{$R *.dfm}

end.

Und jetzt , da passiert nix sobald ich auf den Button drücke.

Das Problem ist ja , ich kenn die Befehle garnicht , mit denen man so ein Rechteck zeichnen soll.
Bitte nicht so kompliziertes sagen/empfehlen , hab nicht so viel Erfahrung mit OOP.
Ist das erste Mal , dass ich mit Klassen etc arbeite und selbst Klassen erstelle.