文件名称：Delphi幻灯模式的图片查看器程序.rar
文件大小：115KB
文件格式：RAR
更新时间：2022-07-30 06:23:42
Delphi源码-图形处理
Delphi图片查看器程序，图片幻灯片，对象是BMP格式的图像，不过JPG/GIF也可以查看。这个图片浏览器的亮点是TAB的使用，在现在的窗体设计来看，TAB的应用早已是“标准配置”了。相关代码： procedure TBmpViewer.mCutClick(Sender: TObject); begin mCopyClick (Self); //通过拷贝和删除实现剪切 mDelClick (Self); end; procedure TBmpViewer.mCopyClick(Sender: TObject); begin Clipboard.Assign (Image1.Picture.Graphic); //将image1中的图片装入剪贴板 end; procedure TBmpViewer.mPasteClick(Sender: TObject); var TabNum: Integer; begin // 装入tab对应的页 TabNum := TabControl1.Tabs.IndexOf ('Clipboard'); if TabNum < 0 then // 如果不存在则为clipboard创建一个新页 TabNum := TabControl1.Tabs.Add ('Clipboard'); // 将焦点设到该页并使之重绘 TabControl1.TabIndex := TabNum; TabControl1Change (Self); end;
【文件预览】：
srcfans.com
----PBmpView()
--------PBmpView.dof(2KB)
--------BmpView.ddp(51B)
--------BmpView.dcu(8KB)
--------示例图片.bmp(470KB)
--------BmpView.pas(5KB)
--------PBmpView.dpr(204B)
--------PBmpView.res(876B)
--------BmpView.dfm(2KB)
--------PBmpView.cfg(358B)