下载频道  >  gdwuyihua的资源
  • Delphi进度条(多线程),美观不卡界面,简单开启,定位,结束

    Delphi进度条(多线程),美观不卡界面,简单开启,定位,结束: 包目录(MyProgress): MyProgress.dcu //最终引用 MyProgressPackage.bpl //安装包 MyProgressPackage.bpi MyProgressPackage.dcp MyProgressPackage.lib 包安装(无需编译,直接安装): 将包目录(MyProgress)复制到目标安装目录 Delphi\菜单\Component\Install Packages\...选择包目录中的包文件 .\MyProgressPackage.bpl 添加路径: Delphi\菜单\Tools\Options\Environment Options\Delphi Optioins\Library\Library path: 添加包目录 在工程中单元中引用: uses MyProgress 功能列表: 1.开启进度(标题,消息,透明度(0-255),是否同步任务栏,是否有边框) procedure StartPro(aTitle,aMsg:String; AlphaValue:Integer=0; IsSyncTaskbar:Boolean=True; IsHasBorder:Boolean=True);//显示动画 2.给养进度(标题,,消息):保持或更新进度指示,不调用则保持StartPro时的状态 procedure FeedPro(aTitle:String; aMsg:String='正在处理中, 请等待...'); 3.关闭进度 procedure ClosePro;

    2019-03-28
    10
  • 真正可用的DevExpressVCL18.1.6.FS

    真正可用的DevExpressVCL18.1.6.FS,DevExpress VCL 18.16 Full Source with DxAutoInstaller for Delphi 7 - Delphi 10.3 Rio

    2019-03-28
    40
  • 自己编写的Delphi组件定时器Timer,内支持线程,不会像D原生那样卡顿及界面.

    自己编写的Delphi组件定时器Timer,内支持线程,不会像D原生那样卡顿及界面.

    2019-03-09
    17
  • DELPHI音频播放音量调节

    包目录(MyMMs): 包资源如下: MyMMs.dcu //最终引用 MyMMsPackage.bpl //安装包 包安装(无需编译,直接安装): 将目录(MyMMs)复制到目标安装目录 Delphi\菜单\Component\Install Packages\...选择包目录中的包文件 .\MyMMsPackage.bpl 添加路径: Delphi\菜单\Tools\Options\Environment Options\Delphi Optioins\Library\Library path: 添加包目录 在工程中单元中引用: uses MyMMs 功能列表: SetMasterVolume(iVol:Integer); //设置主音量(iVol.音量0-100) SetMasterMute(bMute:Boolean); //设置静音(bMute:Ture.静音/False.有音) //创建播放器: Player:TMyPlayer; Player:=TMyPlayer.Create; //播放文件: function TMyPlayer.PlayFile&#40;filename:WideString&#41;:Boolean;//直接播放文件 function TMyPlayer.SetFile&#40;filename:WideString&#41;:Boolean;//设置播放文件 procedure TMyPlayer.Play;//播放 procedure TMyPlayer.Stop;//停止 procedure TMyPlayer.Close;//关闭 procedure TMyPlayer.Pause;//暂停 procedure TMyPlayer.SetVolume(volume:Integer);//设置音量 procedure TMyPlayer.SetPosition(Position:Integer);//定位播放 function TMyPlayer.GetPosition:Integer;//获取当前位置 procedure TMyPlayer.SetStereo(source: Integer);//设置立体声(0.stereo,1.Left,2.Right,x.average) //释放播放器: if (Assigned(Player)) or (Player<>nil) then begin Player.Close; FreeAndNil(Player); end;

    2019-02-14
    50
  • NavicatPremium11.1.13.Cn.x86x64 破解版

    数据库工具, Navicat 破解版 NavicatPremium11.1.13.Cn.x86x64

    2017-03-12
    10
  • MySQL精简版(无需安装)

    数据库 MySQL MySQL精简版 无需安装

    2017-03-11
    37
  • NativeXml409组件

    Delphi 组件 , XML NativeXml

    2017-03-11
    11
  • 两款拾色器(Colors_Pro_2.1,DukeyGetColor)

    两款拾色器(Colors_Pro_2.1,DukeyGetColor) 简单,免安装.

    2017-03-11
    25
  • XML Marker1.1

    XML Marker1.1 XML 查看器

    2017-03-11
    32
  • Delphi资源类型及资源文件+GIF播放的编写(详细说明和范例)

    Delphi资源类型及资源文件 GIF资源播放的编写(详细说明和范例)

    2016-05-18
    15
img
gdwuyihua
  • 分享宗师

    成功上传21个资源即可获取

关注 私信