Wie Höhe festschreiben?

[jaenicke]

Du kannst auch einfach SetBounds überschreiben. Das wird nämlich beim Setzen der Höhe usw. aufgerufen.

Delphi-Quellcode:

    procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer); override;
    // Dummyzeile, da der Highlighter im Forum ne Macke hat^^

Dort kannst du den Wert verändern bevor du ihn an die geerbte Methode weitergibst.

[Mattze]

Hi,

also ich packe es nicht.
Bei SetBounds funktioniert es nicht. Vielleicht muss ich erst eine "Zwischenkomponente" ableiten, bei der ich das setbounds überschreibe und kann dann erst die eigentliche Komponente basteln? (Vorfahr ist bei mir TCustomControl.)

Min-und MaxHeight laufen offenbar auf das selbe hinaus. Irgendwie muss man sie ja in die Komponente einbauen und das wird wohl nur durch Methodenüberschreiben gehen. Bleibt die Frage, welche das sein müssten.

Wie gesagt, zur Laufzeit ist das natürlich alles kein Problem mit der Höhe. Und richtig nötig zur Designtime wäre das eigentlich auch nicht.
Aber schön wäre es, würde einiges einfacher machen und wie üblich, fragt man sich oft, wie die das gemacht haben.
(Es wäre ja auch Ziel der Oberfläche, dass man das so auf dem Formular anordnen kann, wie es zur Laufzeit aussieht. Kann man ja, aber da muss man eben doch genau gucken. Das kann man sich bei der automatischen Höhe sparen.)

Gruß
Mattze

[DeddyH]

Wie hast Du es denn versucht? SetBounds sollte nämlich schon funktionieren.

[stahli]

Welche Delphi-Version hast Du denn?
Evtl. musst Du Dein Package noch neu installieren. Es könnte evtl. sein, dass zur Laufzeit deine neue Kompo erzeugt wird aber in der IDE noch Deine alte (installierte).
Ändere mal testweise die Farbe oder Standardtext um zu sehen, welche Kompoversion in der IDE installiert wird.

[Mattze]

Hi,

jetzt geht es mit SetBounds. Da war bei mir nur 'ne kleine Schwarzblende.
Ich habe das NACH inherited festgelegt, was natürlich nicht gehen kann.

Also vielen Dank!

Gruß
Mattze