h1006272147
发表于 2014-7-26 20:19:59
天那,30个鱼币,又不是打土豪,这么狠。
h1006272147
发表于 2014-7-26 21:02:46
突然间弄明白了。激动人心,无法言表!
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.AlphaBlend:=True;
end;
procedure TForm1.TrackBar1Change(Sender: TObject);
begin
lbl3.Caption:=IntToStr(TrackBar1.Position)+'%';
Form1.AlphaBlendValue:=Byte(TrackBar1.Position*255 div TrackBar1.Max);
end;
MLK
发表于 2014-8-17 14:05:34
甲鱼老师说自己是中文系毕业的,结果连凸和凹都分不清……
ygrong_2008
发表于 2014-9-6 08:46:37
太生气了,无法HOLD啦 >_<......
Lin-Ye
发表于 2015-2-16 10:26:50
好东西,谢谢楼主分享
Lin-Ye
发表于 2015-2-16 10:34:01
好东西,谢谢楼主分享