M mingmingtx Unregistered / Unconfirmed GUEST, unregistred user! 2003-06-01 #1 哪位高手知道象ACDSEE那样的对一组图片实现缩略图预览的功能怎么实现?请告诉小妹吧, 若有源码请给小妹一份吧mingm13@263.net感激不尽!
萧 萧星离 Unregistered / Unconfirmed GUEST, unregistred user! 2003-06-01 #2 自己实现也可以,用windows98/2000带的柯达的控件也可以的
特 特尔斐 Unregistered / Unconfirmed GUEST, unregistred user! 2003-06-01 #3 ACDSEE的不知道如何实现,不过在DELPHI中应该好实现, 使用Canvas.CopyRect方法可以实现图片缩放,例,显示一个BMP的80*80的缩略图到 TImage上: procedure(ABmp: TBitmap; AImage: TImage); var Dest: TRect; begin Dest := Rect(0,0,80,80); AImage.Canvas.CopyRect(Dest, ABmp.Canvas, ABmp.Canvas.ClipRect); end;
ACDSEE的不知道如何实现,不过在DELPHI中应该好实现, 使用Canvas.CopyRect方法可以实现图片缩放,例,显示一个BMP的80*80的缩略图到 TImage上: procedure(ABmp: TBitmap; AImage: TImage); var Dest: TRect; begin Dest := Rect(0,0,80,80); AImage.Canvas.CopyRect(Dest, ABmp.Canvas, ABmp.Canvas.ClipRect); end;
M mycybyb Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-07 #7 ImageSee的速度太慢了,而且不能边解压缩边显示。