Einzelnen Beitrag anzeigen

Medium

Registriert seit: 23. Jan 2008
3.688 Beiträge
 
Delphi 2007 Enterprise
 
#1

Komponente: Freiform Shape

  Alt 18. Mär 2008, 18:03
Quasi als Nebenprodukt dessen, was in diesem Thread entstand, ist eine Komponente abgefallen, bei der ich mir vorstellen kann, dass sie eines Tages evtl. mal jemandem nützen wird.

Es handelt sich um etwas ähnliches wie TShape, jedoch ist die Form zur Entwurfszeit frei bearbeitbar. Zudem wird zur Laufzeit dafür gesorgt, dass sämtliche Mausevents nur auftreten, wenn die Maus auch im sichtbaren Bereich ist. Dadurch eignet sich das ganze auch für komplexe Schaltflächen o.ä.


Ich empfehle die zwei Dateien im .zip in das Lib-Verzeichnis von Delphi zu kopieren, und dann muss nur noch "KATPolyEdit.pas" als Komponente installiert werden.

Entstanden und gestestet unter Delphi 7 Ent., die in o.g. Thread auftretenden Probleme mit der RTTI & Co können hier aber nicht auftreten, da nichts in dieser Richtung benutzt wird.

Die Funktionsweise ist spimel, und statt eines Screenshots habe ich ein kleines Screenvideo angehängt, welches kurz zeigt, wie es geht und aussieht.

Ich hoffe es findet jemand Gefallen daran.
Angehängte Dateien
Dateityp: zip polyedit_vid_134.zip (539,0 KB, 54x aufgerufen)
Dateityp: zip polyedit_472.zip (4,2 KB, 33x aufgerufen)
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)
  Mit Zitat antworten Zitat