Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by DieDolly,
25. Jun 2018
Ist es auch möglich OnMouseMove und OnMouseLeave zu überschreiben?
Wenn ich das versuche bekomme ich die Meldung, dass diese Methoden nicht in der Basisklasse gefunden wurden.
Aber auch mit DoEnter und DoExit bekomme ich die Meldung.
DoEnter würde wenn ich das richtig verstanden habe ja schon ausgelöst, wenn ich mit der Tastatur dahin navigiere.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by DieDolly,
24. Jun 2018
Stell dir ein Link-Label vor. Im Prinzip habe ich mir ein Link-Label gemacht was ein paar Optionen mehr hat. Eben genau die, die ich brauche.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by DieDolly,
24. Jun 2018
In welcher Variable kenne ich die zuletzt genutzte Farbe denn außer in FLastLabelColor?
Das habe ich durch die Hilfe von FLabelHoverColorTmp in SetLabelMouseProperties und abfragen in GetLastLabelColor ausgebessert.
Habe sie entfernt und greife jetzt auf Self zu.
Das verstehe ich leider nicht so ganz. ich weiß, dass man oben in der Kopfdeklaration auch default so-und-so hinzufügen...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by DieDolly,
23. Jun 2018
Ich bin für Verbesserungen und Anpassungen deinerseits + Bereitstellung der Änderungen dankbar.
Ich bin mir nicht sicher, ob ich verstehe was du meinst. Deswegen würde ich dich bitte, wenn möglich, die Änderungen einzubauen und zu zeigen.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by DieDolly,
23. Jun 2018
Das hat mir geholfen danke.
Das mit dem MouseLeave scheint nicht ganz zu klappen. Die Farbe die das Label vorher hatte wird nicht wieder zugewiesen.
Mein Versuch
function TMyLabel.GetLastLabelColor: TColor;
begin
Result := FLastLabelColor;
FLastLabelColor := -1;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by DieDolly,
23. Jun 2018
Ich weiß nicht wie ich auf das Event reagiere. Aktuell habe ich ein Showmessage in beiden Events stehen aber ich bekomme den Dialog nicht angezeigt.