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);"