hover help

This commit is contained in:
Colin Kuskie 2005-06-22 03:11:00 +00:00
parent 73922afb41
commit 529d132025
3 changed files with 42 additions and 18 deletions

View file

@ -118,16 +118,19 @@ sub getEditForm {
$tabform->getTab("properties")->integer(
-name=>"thumbnailSize",
-label=>WebGUI::International::get('thumbnail size', 'Asset_Image'),
-hoverHelp=>WebGUI::International::get('Thumbnail size description', 'Asset_Image'),
-value=>$self->getValue("thumbnailSize")
);
$tabform->getTab("properties")->textarea(
-name=>"parameters",
-label=>WebGUI::International::get('parameters', 'Asset_Image'),
-hoverHelp=>WebGUI::International::get('Parameters description', 'Asset_Image'),
-value=>$self->getValue("parameters")
);
if ($self->get("filename") ne "") {
$tabform->getTab("properties")->readOnly(
-label=>WebGUI::International::get('thumbnail', 'Asset_Image'),
-label=>WebGUI::International::get('Thumbnail', 'Asset_Image'),
-hoverHelp=>WebGUI::International::get('thumbnail description', 'Asset_Image'),
-value=>'<a href="'.$self->getFileUrl.'"><img src="'.$self->getThumbnailUrl.'?noCache='.time().'" alt="thumbnail" /></a>'
);
my ($x, $y) = $self->getStorageLocation->getSizeInPixels($self->get("filename"));