登录
首页 » Delphi源码 » Delphi 使播放的Flash随窗口大小改变

Delphi 使播放的Flash随窗口大小改变

于 2022-05-31 发布 文件大小:42.71 kB
0 206
下载积分: 2 下载次数: 1

代码说明:

Delphi 使播放的Flash随窗口大小改变,也就是让Flash播放的窗口内容随着父窗口的大小而自动适应,把窗口拉大时,Flash画面也会跟着变大,让内容适应窗口大小的变化。

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • Delphi 多帧动画播放
    Delphi 多帧动画播放,Delphi将多幅连续的BMP图像显示在一起,形成了动画的效果,类似于GIF的类型动画。每一张图片都是一帧,将帧快速的连起来,就形成了动画效果。
    2023-07-24 05:15:03下载
    积分:1
  • Delphi版智能图片放大器
    Delphi版智能图片放大器,用滑块改变放大倍率,向左滑,则放大位数变大,反之则变校打开程序后,鼠标在图片区域移动,即可把鼠标悬停区域的图像放大显示N倍,放大位数就是刚才提到的,滑块来调整的放大位数,部分代码可参考如下:   Const //定义放大的区域    dSide=50;//区域大小   var    sSide: Integer;//放大比例[1至100],1为最大100为缩小    msHide: Boolean;    OldX,OldY,NewX,NewY: integer;    Dest,Source: TRect;   {$R *.DFM}   Procedure TForm1.ImageFD(x,y,Side: Integer);//定义放大区域及放大过程   begin    sSide:=30; //初始化放大比例    msHide:=True;    //Canvas.CopyMode:=cmSrcCopy;    image1.Picture.Assign(image2.Picture);   end;   详细情况请下载源码后查看Unit1.pas文件。
    2023-04-17 17:00:04下载
    积分:1
  • Delphi 将TDBGrid导入到Excel表中附数据库
    Delphi7.0将TDBGrid导入到Excel表中,测试程序先连接好SQLSERVER数据库,并将数据读取到TDBGrid中,然后再将数据从TDBGrid导入到Excel表中,为了测试方便,SQLSERVER数据库文件已经附在源码包中。以下代码片断会有参考意义,完整源码请下载:   //将TDBGrid表中的标题插入到Excel表中的首行   for I:=0 to DbName.Columns.Count-1 do   begin    if DbName.Columns[i].Visible=False then    Continue;    Page.Cells[j,i+1] := DbName.Columns[i].Title.Caption;    Page.Cells[j,i+1].Font.Bold := True; //设置字体为粗体   end;   Inc(j); //Excel表中的下一行   First; //将指针返回到TDBGrid表中数据的首行   while not Eof do   begin    for i:=0 to DbName.Columns.Count-1 do    begin    if DbName.Columns[i].Visible=False then    Continue;    //将指定行中每列的数据,添加到Excel表中    Page.Cells[j,i+1] := trim(DbName.DataSource.DataSet.Fieldbyname(DbName.Columns[i].FieldName).asstring);    end;    Inc(j); //Excel表中的下一行    Next; //TDBGrid表中的下一条记录   end;
    2022-06-29 23:05:07下载
    积分:1
  • Delphi实现RGB色环的绘制 XE10.2+WIN764
    Delphi实现RGB色环的绘制源码 XE10.2+WIN764,鼠标移动时提取颜色RGB的值,可以设置中心圆是否是透明的,RGB色环的代码绘制,传入图片的大小,扣出中心的黑色圆,输入图片与中心圆的半径。这个色环的颜色十分精细,过渡十分自然,本例子代码的参考价值还是挺大的。
    2022-06-27 11:06:18下载
    积分:1
  • 用Delphi播放AVI文件
    用Delphi播放AVI文件,AVI是一种视频格式,其实在Windows系统中,有很多的AVI小视频,用于实现Windows窗口中的小动画效果,在很多时候,我们可以借助播放AVI视频来实现窗体上的一些动画效果,比如Loading进度条、Office助手等。
    2023-03-12 02:55:04下载
    积分:1
  • Delphi 编写的VOD视频点播及后台管理系统
    Delphi 编写的VOD视频点播及后台管理系统,这套系统既是一套多媒体系统,也是一套数据库系统,VOD部分的功能有:KTV管理系统,编号点歌、轻音乐、拼音点歌、迪士高、明星点歌、DVD影院、播放列表、歌曲管理等。
    2022-01-24 15:29:37下载
    积分:1
  • Delphi 使用API函数拔号
    Delphi 使用API函数拔号,拨号程序,基于api的方法实现,有兴趣下载源码参考一番。
    2022-01-26 01:52:58下载
    积分:1
  • Delphi户籍管理系统,Access数据库版
    Delphi户籍管理系统,Access数据库版,界面方面使用了Xpmenu和SReport控件。测试时的登录初始密码为:222222 。   在数据库编程方面,本系统更注重录入及查询,采用多重SQL语句查询,并结合查询可生成报表。
    2022-04-18 17:44:59下载
    积分:1
  • Delphi 实现窗体的全屏显示效果
    Delphi 实现窗体的全屏显示效果,单击按钮后即可全屏。
    2023-03-25 11:25:03下载
    积分:1
  • Delphi 键盘钩子 封锁 windows 热键
    Delphi 键盘钩子 封锁 windows 热键,封锁范围,可参见以下代码:    keycost := LPKBDLLHOOKSTRUCT(lParam);    if (keycost.vkCode=91) then//封锁win键    exit;    if (keycost.vkCode=VK_ESCAPE) and (GetAsyncKeyState(VK_CONTROL)0) then    exit; //封锁 ALT+TAB    if (keycost.vkCode=115) and ((keycost.flags and LLKHF_ALTDOWN)>0) then    exit; //封锁 ALT+F4    if (keycost.vkCode=VK_ESCAPE) and ((keycost.flags and LLKHF_ALTDOWN)>0) then    exit; //封锁 ALT+ESC    if (keycost.vkCode=VK_SPACE) and (GetAsyncKeyState(VK_CONTROL)
    2023-03-30 06:05:03下载
    积分:1
  • 696516资源总数
  • 106914会员总数
  • 0今日下载