1、窗体透明度设置及窗体淡入淡出
delphi设置窗口透明
form1.AlphaBlend :=true; //透明
form1.AlphaBlendValue :=180; //透明度
form1.TransparentColor :=true; //透明颜色
原文链接:https://www.cnblogs.com/del88/p/4297760.html
窗体淡入淡出
将AlphaBlend设置为True,然后更改AlphaBlendValue属性的值。从0开始增加,最大255。 使用时间控件,Interval 设为10。
procedure TForm13.Timer1Timer(Sender: TObject);
begin
if timer1.Interval = 500 then begin
form13.Hide;
timer1.Enabled := false;
end;
form13.AlphaBlendValue := form13.AlphaBlendValue + 5;
if form13.AlphaBlendValue = 250 then begin
timer1.Interval := 500;
end;
end;
2、clientWidth、offsetWidth指的是什么
scrollWidth是对象的实际内容的宽,不包边线宽度,会随对象中内容的多少改变(内容多了可能会改变对象的实际宽度)
clientWidth是对象可见的宽度,不包滚动条等边线,会随窗口的显示大小改变。
offsetWidth是对象的可见宽度,包滚动条等边线,会随窗口的显示大小改变。
scrollHeight: 获取对象的滚动高度。
**offsetHeight:**获取对象相对于版面或由父坐标
3、窗体的隐藏和显示
隐藏: Application.Minimize(); ShowWindow(application.Handle,SW_HIDE);
显示: ShowWindow(application.Handle,SW_SHOW); Application.Restore();
4、设置窗体为主窗体
选择主菜单的“Prjoect / Options”(工程 / 选项)菜单,在弹出的对话框中点击“Forms”选项卡,在里面的“Main Form”项目中设置主窗体。
5、(546): Identifier redeclared: 'Tfrm_gate.SpeedButton2Click'
重复定义,很可能是该按钮的函数重复了
版权归原作者 csdn-唯一 所有, 如有侵权,请联系我们删除。