HyperButtons bzw HyperPanels erstellen (Delphi Anfänger)

[DeddyH]

Woher sollen wir denn wissen, was in Unit1 bzw Unit2 steht/deklariert wurde?

[mkinzler]

In der Unit, in der der Fehler auftritt: Unit2

@Detlef: Der Source ist im 1. Beitrag angehängt

[DeddyH]

Hatte ich gar nicht gesehen. Man könnte aber auch den Komponenten-Experten benutzen, das vermeidet solche Probleme oder sollte es zumindest.

[Flashco]

Nungut, da drängt sich mir die Frage auf "Was ist das "Komponenten-Experten"" ?

[mkinzler]

Komponente->Neue Komponente ...

[Flashco]

Ich werd mich bei Gelegenheit mal genauer damit befassen.

Meine weiteren Fragen beziehen sich nun auf:

-Was genau habe ich jetzt mit

Code:

constructor THyperPanel.Create(AOwner: TComponent);
BEGIN
    inherited Create(AOwner);
    Width := 100;
    Height := 100;
    Color:= clred;
    BorderStyle:= bsSingle;
    BevelWidth:=3;

erreicht? Ist das neue "HyperPanel" jetzt vorhanden wenn ich das Programm starte, vorrausgesetzt, ich behebe die restlichen Fehler?

-Wie gebe ich jetzt diesem Panel eine Funktion, also anders gesagt, welcher Procedure(?)-Befehl wird für "OnMouseDown" gebraucht? (Wie sähe dieser aus?)
Ich habe es mit:

Code:

  Procedure TMain.HyperPanelClick (Sender: TObject);
  begin
    close;
  end;

probiert, bekomme jedoch da die aussage dass ein ";" erwartet wird statt dem "." bei " Procedure TMain.HyperPanelClick (Sender: TObject);"

[DeddyH]

Das HyperPanel ist nur dann vorhanden, wenn Du es als Komponente installierst und auf Dein Formular packst oder wenn Du es von Hand instanzierst.