Java能否实现JPanel视图的放大与缩小

问的有点模糊，你看是不是这个

创新互联是专业的师宗网站建设公司，师宗接单;提供成都做网站、网站建设、外贸营销网站建设,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行师宗网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

import java.applet.Applet;

import java.awt.Image;

import java.awt.Graphics;

public class MyApplet_16 extends Applet {

Image img;

//初始化方法

public void init() {

//加载gif格式图像文件

img=getImage(getCodeBase(),"飞机.gif");

}

public void paint(Graphics g){ //绘图方法

//原大小显示图片

g.drawImage(img,10,10,this);

//获取图片尺寸

int w=img.getWidth(this);

int h=img.getHeight(this);

//缩小一半显示

g.drawImage(img,250,50,w/2,h/2,this);

//放大一倍显示

g.drawImage(img,160,160,w*2,h*2,this);

}

}

可以的话，将你的具体要求给个百度词条

javascript放大镜代码

同命相连，我也在找这个效果，失望啊！

发现有教程，可是运行不起来，看你会吗？

picclass.asp 图片处理类文件

meta http-equiv="Content-Type" content="text/html; charset=utf-8" /

%

'//////////// GPS：Get Picture Size //////////////

'//////////////利用ADODB.stream获取图片尺寸//////////////

'/////////Cited By Leon（心晴） 2005年8月11日//////////

Class GPS

Dim aso

Private Sub Class_Initialize

Set aso=CreateObject("Adodb.Stream")

aso.Mode=3

aso.Type=1

aso.Open

End Sub

Private Sub Class_Terminate

set aso=nothing

End Sub

Private Function Bin2Str(Bin)

Dim I, Str

For I=1 to LenB(Bin)

clow=MidB(Bin,I,1)

if AscB(clow)128 then

Str = Str Chr(ASCB(clow))

Else

I=I+1

if I = LenB(Bin) then Str = Str Chr(ASCW(MidB(Bin,I,1)clow))

end If

Next

Bin2Str = Str

End Function

Private Function Num2Str(num,base,lens)

'GPS (2005-8-11)

dim ret

ret = ""

while(num=base)

ret = (num mod base) ret

num = (num - num mod base)/base

wend

Num2Str = right(string(lens,"0") num ret,lens)

End Function

Private Function Str2Num(str,base)

'GPS (2005-8-11)

dim ret

ret = 0

for i=1 to len(str)

ret = ret *base + cint(mid(str,i,1))

next

Str2Num=ret

End Function

Private Function BinVal(bin)

'GPS (2002-8-11)

dim ret

ret = 0

for i = lenb(bin) to 1 step -1

ret = ret *256 + ascb(midb(bin,i,1))

next

BinVal=ret

End Function

Private Function BinVal2(bin)

'GPS (2002-8-11)

dim ret

ret = 0

for i = 1 to lenb(bin)

ret = ret *256 + ascb(midb(bin,i,1))

next

BinVal2=ret

End Function

'///以下是调用代码///

Function getImageSize(filespec)

'GPS (2002-8-11)

dim ret(3)

aso.LoadFromFile(filespec)

bFlag=aso.read(3)

select case hex(binVal(bFlag))

case "4E5089":

aso.read(15)

ret(0)="PNG"

ret(1)=BinVal2(aso.read(2))

aso.read(2)

ret(2)=BinVal2(aso.read(2))

case "464947":

aso.read(3)

ret(0)="GIF"

ret(1)=BinVal(aso.read(2))

ret(2)=BinVal(aso.read(2))

case "535746":

aso.read(5)

binData=aso.Read(1)

sConv=Num2Str(ascb(binData),2 ,8)

nBits=Str2Num(left(sConv,5),2)

sConv=mid(sConv,6)

while(len(sConv)nBits*4)

binData=aso.Read(1)

sConv=sConvNum2Str(ascb(binData),2 ,8)

wend

ret(0)="SWF"

ret(1)=int(abs(Str2Num(mid(sConv,1*nBits+1,nBits),2)-Str2Num(mid(sConv,0*nBits+1,nBits),2))/20)

ret(2)=int(abs(Str2Num(mid(sConv,3*nBits+1,nBits),2)-Str2Num(mid(sConv,2*nBits+1,nBits),2))/20)

case "FFD8FF":

do

do: p1=binVal(aso.Read(1)): loop while p1=255 and not aso.EOS

if p1191 and p1196 then exit do else aso.read(binval2(aso.Read(2))-2)

do:p1=binVal(aso.Read(1)):loop while p1255 and not aso.EOS

loop while true

aso.Read(3)

ret(0)="JPG"

ret(2)=binval2(aso.Read(2))

ret(1)=binval2(aso.Read(2))

case else:

if left(Bin2Str(bFlag),2)="BM" then

aso.Read(15)

ret(0)="BMP"

ret(1)=binval(aso.Read(4))

ret(2)=binval(aso.Read(4))

else

ret(0)=""

end if

end select

ret(3)="width=""" ret(1) """ height=""" ret(2) """"

getimagesize=ret

End Function

End Class

%

图片调用文件----------------------------------------------------------------------------------------------------------

%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%

!--#include file="picclass.asp"--

!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"

""

head

SCRIPT LANGUAGE="JAVASCRIPT"

!--

function maxview(){

if (window.screen){

var w=screen.availwidth;

var h=screen.availheight;

window.moveTo(0,0);

window.resizeTo(w,h);

}

}

// --

/SCRIPT

meta http-equiv="Content-Type" content="text/html; charset=utf-8" /

title/title

SCRIPT src="zoom.js" type=text/javascript/SCRIPT

/head

body onLoad="maxview(); OnLoadMainFunction();"

table width="905" border="0" align="center" cellpadding="15" cellspacing="1"

tr

td valign="top" bgcolor="#FFFFFF"table width="100%" border="0" cellspacing="15"

cellpadding="0"

tr

td valign="top"

%

if request("showid")"" then

sql="update lei_product set dianjishu=dianjishu+1 where id="(request("showid"))

conn.execute(sql)

set rs=server.CreateObject("adodb.recordset")

showstr="select * from lei_product where id=" (request("showid"))

rs.open showstr,conn,1,1

if not rs.bof and not rs.eof then

'/////获取ShowImg.asp的绝对路径/////

Dim curFile

curFile=Server.mappath(Request.servervariables("PATH_INFO"))

Dim curfilename,filename

'/////图片相对路径（存于数据库中）

'cufilename=rs("ImgURL")

cufilename="../admin/upimg/"rs("bigimg2")

cufilename2="../admin/upimg/"rs("bigimg")

'/////因为ShowImg.asp与images在同一目录，所以我们用instrrev获取images的路径/////

filename=left(curFile,instrrev(curFile,"\"))cufilename

filename2=left(curFile,instrrev(curFile,"\"))cufilename2

'/////建立GPS类实体/////

Dim GetPicSize

Set GetPicSize=new GPS

Set fs=Server.CreateObject("Scripting.FileSystemObject")

'/////获取图片类型/////

Dim PicSuffixName

Dim PicSuffixName2

if (fs.FileExists(filename)=false) then

Response.Write("scriptalert('文件加载失败,请确认文件是否存在');history.back(-1);/script")

Response.End()

end if

if (fs.FileExists(filename2)=false) then

Response.Write("scriptalert('文件加载失败,请确认文件是否存在');history.back(-1);/script")

Response.End()

end if

PicSuffixName=fs.GetExtensionName(filename)

PicSuffixName2=fs.GetExtensionName(filename2)

Dim PD '//Picture Dimension

Dim PD2 '//Picture Dimension

Dim PWidth,PHeight

Dim PWidth2,PHeight2

PD=GetPicSize.GetImageSize(filename)

PD2=GetPicSize.GetImageSize(filename2)

PWidth=PD(1) '//获取图片宽度

PWidth2=PD2(1) '//获取图片宽度

PHeight=PD(2) '//获取图片高度

PHeight2=PD2(2) '//获取图片高度

Set fs=Nothing

Set GetPicSize=Nothing

%

SCRIPT type=text/javascript

var usezoom = 1;

var itemimagedir = '';

var zoom_bigimagediv = 'bigimagediv';

var zoom_bigimagetablediv = 'bigimagetablediv';

var zoom_highlightdiv = 'highlightdiv';

var zoom_bigimageouterdiv = 'bigimageouterdiv';

var zoom_viewportwid = 400;//大图图片显示区域

var zoom_viewporthei = 320;//大图片显示区域

var zoom_mainimagewid = %=PWidth2%;//小图宽

var zoom_mainimagehei = %=PHeight2%;//小图高

var zoom_mainimageurl = '../admin/upimg/%=rs("bigimg2")%';

var zoom_zoomimagewid = %=PWidth%;//原图大小宽

var zoom_zoomimagehei = %=PHeight%;//原图大小高

var zoom_zoomimageurl = '../admin/upimg/%=rs("bigimg2")%';//大图地址

var zoom_bigimagetablexoffset = 1;

var zoom_bigimagetableyoffset = 21;

var zoom_displayxposition = 0;

var zoom_displayyposition = 0;

var zoom_miniimagex = 0;

var zoom_miniimagey = 0;

var zoom_highlightbgcolor = 'ffffff';

var zoom_highlightimage = 'highlight.gif';

function GetZoomObjectData() {

var position;

if (!InIE !InNS6 !DOMCompatible)

return;

position = MeMSOObjectGetPosition('mainimage');

zoom_miniimagex = position.x;

zoom_miniimagey = position.y;

position = MeMSOObjectGetPosition('locatezoomim');

zoom_displayxposition = position.x;//显示图片的位置

zoom_displayyposition = position.y - 21;

Zoom_StartupZoomRegion();

}

onloadlist += 'GetZoomObjectData();';

/SCRIPT

table width="100%" border="0" align="center" cellpadding="0" cellspacing="1"

tr

td bgcolor="#FFFFFF" div align="center"

table cellspacing="0" cellpadding="0" width="100%" border="0"

tbody

tr

td valign="center" align="middle" rowspan="4"table cellspacing="1"

cellpadding="2" width="%=PWidth2%"

bgcolor="#efe6dd" border="0" height="%=PHeight2%"

tbody

tr

td bgcolor="#ffffff"img

src="..\admin\upimg\%=rs("bigimg")%" name="mainimage"

border="0" width="%=PWidth2%" height="%=PHeight2%"

id="mainimage" //td

/tr

/tbody

/table

br /

a href="#" target="_blank"点击看大图/a/td

td valign="bottom" align="left" height="5"img height="5"

src="dot_line.gif" width="401" //td

/tr

tr

td valign="bottom" align="left" width="420" height="1"table cellspacing="0"

cellpadding="0" width="100%"

border="0"

tbody

tr

td colspan="2"img id="locatezoomim" height="1"

src="dot_1.gif" width="1"

name="locatezoomim" //td

/tr

/tbody

/table/td

/tr

tr

td valign="top" align="left" width="425"

background="bigImg.gif"

height="330"p  /p/td

/tr

tr

td align="middle"div id="highlightdiv"

style="Z-INDEX: 2; LEFT: -2000px; POSITION: absolute; TOP: -2000px;

visibility: hidden;"/div

div id="bigimageouterdiv"

style="Z-INDEX: 4; LEFT: -2000px; VISIBILITY: visible; OVERFLOW:

hidden; WIDTH: 300px; POSITION: absolute; TOP: -2000px; HEIGHT: 300px"

div id="bigimagediv"

style="Z-INDEX: 4; LEFT: -2000px; POSITION: absolute; TOP: -2000px;

visibility: hidden;"img

id="mainzoomimage" height="2400" src="" width="800" border="0"

name="mainzoomimage" //div

/div

div id="bigimagetablediv" style="Z-INDEX: 3; LEFT: -2000px; POSITION:

absolute; TOP: -2000px; visibility: hidden;"/div/td

/tr

/tbody

/table

/div

div align="right"/div/td

/tr

/table

%end if

rs.close

set rs = nothing

%

%end if

%

/td

/tr

/table/td

/tr

/table

table width="905" height="8" border="0" align="center" cellpadding="0" cellspacing="0"

tr

td/td

/tr

/table

/body

/html

HTML5中，如何为图片制作放大镜效果？

制作图片的放大效果我考虑到的方法是将原始图片绘制到canvas上，然后在对canvas进行局部裁剪最后对裁剪的部分进行放大，这样就可以实现放大镜的效果。

这里我给出一个实现这个想法的示例。该示例实际上就是运用HTML5 canvas中对画布进行裁剪与保存画布状态的相关知识实现的。

上面是给出示例的效果图。这是不是你想要的放大镜效果呢？

下面我们来看下示例代码：在这个示例中当你点击图片时图片就会出现上图效果，再一次点击时就变成原始图片了。

!DOCTYPE html

html

head

meta charset="utf-8"

title放大镜/title

!—HTML代码设计：一个简单的canvas元素--

/head

body

div id="result-stub" class="well hidden"

canvas id="canvas" width="345" height="345"

p你的浏览器不支持canvas元素/p

/canvas

/div

script

window.onload=function() {

//获取canvas对象以及图片对象

var

canvas = document.getElementById('canvas'),

img = new Image(),

context = null,

dataUrl = null,

//设置一个标记，该标记的作用是控制我们点击canvas时放大镜效果的消失和出现

isMagnified = false,

//init函数只要是在图片加载时绘制出图形

init = function() {

img.onload = function() {

//绘制原始图片

context.drawImage(img, 0, 0);

//将图片信息转化为二进制信息或者URL信息存储在dataUrl中方便后面调用

dataUrl = canvas.toDataURL();

}

img.src = 'fist-pump-baby.jpg';

//设置标记值

isMagnified = false;

},

//magnify函数的作用是绘制具有放大镜效果的图形

magnify = function() {

//保存当前画布的绘制状态即画布绘制原始图片的状态。方便我们在后面恢复到绘制原始图片的状态

context.save();

//因为放大镜的圆圈和把手是通过canvas绘制的这里设置了一些绘制把手和圆圈的样式属性。

context.lineWidth = 10;// 线条宽度

context.shadowColor = '#000';// 阴影的颜色黑色

context.shadowBlur = 15;// 模糊级别为15

context.shadowOffsetX = 5;// 形状与阴影的水平距离5

context.shadowOffsetY = 5;// 形状与阴影的垂直距离5

//保存画布当前状态即我们设置阴影属性后的状态方便后面使用

context.save();

//绘制出放大镜把手的图形

context.beginPath();

context.moveTo(230, 230);

context.lineCap = 'round';

context.lineWidth = 30;

context.lineTo(285, 285);

context.stroke();

//对图片进行裁剪，裁剪出的图形是一个圆形。

context.beginPath();

context.arc(

150,

150,

115,

0,

Math.PI * 2,

true);

context.clip();

//创建一个新的Image对象，这个Image对象的图片资源是前面存储在dataUrl中的图片资源。所以这个Image对象和之前初始化的Image对象是完全一样的。

var magnified = new Image();

magnified.src = dataUrl;

//对Image对象进行放大1.5倍，并进行绘制。注意此时的画布状态时裁剪为一个圆形的状态，所以这里绘制的也仅仅是图片中的一个圆形区域。这里为了绘制出图片中娃娃的脸设置了绘制的图片有一定的偏移量。

context.scale(1.5, 1.5);

context.drawImage(img, -40, -40);

//调用restore()函数将画布状态恢复到绘制把放大镜把手时的状态，即具有阴影属性

context.restore();

//绘制放大镜的圆圈，即绘制刚刚我们裁剪出来图片的边框。这样刚刚裁剪出来的圆形图形就会正好处于放大镜的圆圈中。

context.arc(

150,

150,

115,

0,

Math.PI * 2,

true);

context.stroke();

//重置画布，将画布恢复到绘制元素图片的状态，以方便绘制出放大效果后，再次点击是绘制原始图片。

context.restore()；

//设置标记值，实现点击后放大效果消失。

isMagnified = true;

};

//加载初始化代码，即当运行页面时会在页面绘制出一个原始图像

init();

//监听画布的点击事件，当点击页面的图像时会根据标记的值来进行判断是否对画布进行方大处理

$('canvas').click(function() {

if (isMagnified) {

init();//绘制原始图像

}

else {

magnify();//绘制放大的图像

}

});

}

/script

script src="jquery.js"/script

/body

/html

对于这些知识在一个叫秒秒学的教程网站上有相关的学习资料，有兴趣的可以自己去看看，希望对你有帮助。

网页图片如何放大显示

打开第三方浏览器；

在浏览器的页面中，选择“查看”；

在查看中选择放大或缩小功能，同样也可使用快捷键来放大缩小网页，使用放大“Ctrl+”,使用缩小“Ctrl-”；

还可以使用浏览器右下方的快捷按键，来调整网页的大小；

或者使用“Ctrl+鼠标滑轮上下”来调整网页大小；

IE浏览器的时候，在IE浏览器的界面中选择点击“工具”；

在工具，鼠标移动到“缩放”在弹出的放大缩小中，选择要放大的比例。也可以使用快捷键来放大缩小网页，使用放大“Ctrl+”,使用缩小“Ctrl-”。

文章名称：图片放大镜java代码 java怎么放大图片
网站链接：http://kswjz.com/article/ddgcido.html