]>
git.proxmox.com Git - pve-manager.git/blob - lib/PVE.old/HTMLDropDown.pm
bbe8b2ea2831368a09dfb3fbe863467decba4767
1 package PVE
::HTMLDropDown
;
14 $self->{uid
} = "pvemenu_" . ++$umenuid;
20 my ($self,$name,$link,$text,$img) = @_;
21 if (!(defined($self->{$name}->{count
}))) { $self->{$name}->{count
}=0; }
22 $self->{$name}->{$self->{$name}->{count
}}->{link} = $link;
23 $self->{$name}->{$self->{$name}->{count
}}->{text
} = $text;
24 $self->{$name}->{$self->{$name}->{count
}}->{image
} = $img;
25 $self->{$name}->{count
} = $self->{$name}->{count
} + 1;
26 $self->{$name}->{menuid
} = $self->{uid
} . "_" . $name;
29 sub out_dropdown_menu
{
31 my ($self,$name) = @_;
35 my $image = "/images/iarrdown.png";
37 my $menuid = $self->{$name}->{menuid
};
40 $html .= "<div id=\"$menuid\" onMouseOut
=\"dropdown
('$menuid',0);\" onMouseOver
=\"dropdown
('$menuid',1);\" style
=\"position
:absolute
; top
:0px
; left
:0px
; visibility
: hidden
;\">";
42 $html .= "<span style
='width:15px; color:#FFFFFF;'><img alt
='' src
='$image' border
=0></span
><br
>";
44 $html .= "<div
class='dropdown'>";
45 for $i (0 .. ($self->{$name}->{count}-1)) {
48 if ($self->{$name}->{$i}->{text} eq "-" ) {
49 $html = $html . "<hr width
='175'>";
52 if ($br == 1) {$html = $html . "<br
>"; }
53 my $img = $self->{$name}->{$i}->{image};
54 my $imgtxt .= $img ? "<img alt
='' src
='$img' style
='border:0px; vertical-align:text-bottom;'> 
; 
;" : '';
55 my $txt = $self->{$name}->{$i}->{text};
57 $html .= "<a style
='white-space:nowrap;' class='dropdown' id
='${menuid}_ddlnk_$i' href
='$self->{$name}->{$i}->{link}'>$imgtxt$txt</a
>";
62 $html .= "</div><br></div
>";
68 my ($self,$name,$shape,$elink) = @_;
71 my $image = "/images/tarrdown
.png
";
73 $image = "/images/$shape.png
";
76 my $menuid = $self->{$name}->{menuid};
78 my $lnk_name = $menuid . "_lnk_
" . $self->{links};
79 if (defined($elink)) { $elink = ",'$elink'"; }
80 $html = "<img alt
='' style
='cursor:pointer;' name
='$lnk_name' src
='$image' border
=0 " .
81 "onMousedown
=\"javascript
:dropdown
('$menuid',1,'$lnk_name'$elink);\">";
82 $self->{links} = $self->{links} + 1;