Search code examples
delphidelphi-7

How to patch TSpinEdit to use Vista/Win7 visual style?


Win7 must give ok style for TSpinEdit, but I see outdated style:

enter image description here

So arrows are not themed, and buttons are old. I use Delphi7. How to patch VCL to fix style? OK is:

enter image description here


Solution

  • I don't know if Delphi 7 already had it but you can use TEdit in combination with TUpDown and then set the Association property of the TUpDown to your TEdit.