如果可能的话,我想在两个可调整大小的面板之间放置一些按钮,或者直接放在分离器上。我如何实现它们将与分离器一起移动;我如何锚定它们?
编辑:
也许是我忘记提及的最重要的事情。该分割线必须与屏幕截图一样宽,并且按钮应该位于其上;所以这些按钮现在实际上“漂浮在分离器上”。
非常感谢
最佳答案
你无法自动执行此操作。
您可以在拆分器的 OnMoved 事件中手动更改 Buttons 的 Left 属性。
没有一个好的解决方案(拖动时刻的可视化效果不好),但它可以达到您需要的结果。你可以解决这个问题,尝试ResizeStyle=rsUpdate;这样,当您拖动拆分器时,按钮也会移动。
procedure TForm1.Splitter1Moved(Sender: TObject);
begin
SpeedButton1.Left := Splitter1.Left + 40;
SpeedButton2.Left := Splitter1.Left + 40;
SpeedButton3.Left := Splitter1.Left + 40;
SpeedButton4.Left := Splitter1.Left + 40;
end;
问候
关于delphi - 如何创建包含组件的分离器?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/6109035/