不幸的是 Delphi 没有缩放TSpeedButton.Glyph。按钮表面缩放，但是字形的大小保持原来的样子。我用天真的方法把位图缩放了TCanvas.StretchDraw，但是结果很恶心。我在网上搜索了一下，我找到了GDI+库，在那里我可以定义质量。解决方案的灵魂是TIGPGraphics.DrawImage( image, .... )，但是这里的image是一个TIGPImage示例，它没有带TBitmap参数的构造函数，它没有复制TBitmap的属性，我不想只是为了传递TIGPImage构造函数而流式传输位图。有人能帮我创建一个TBitmap内容的GP图像和拉伸绘制到另一个TBitmap（SpeedButtonX.glyph）。我不坚持GDI加，我对其他解决方案以及感兴趣，而结果会更好，然后与TCanvas.StrechDraw。
我从这里下载了GPIPlusMod库：https://github.com/jackdp/IGDIPlusMod