yo huso esto para que salga un menu al presionar el boton derecho del mouse necesito que ademas de mostrar el texto mostrara un icono en cada parte del menu me podrian decir como hacerlo?
esto en las acciones
esto en el boton
esto lo pongo en funciones globales
esto en las acciones
tblMenu={};
tblMenu[1] ={};
tblMenu[1].Text = "Eliminar";
tblMenu[1].ID = 100;
--Icono aqui
tblMenu[1].Checked = false;
tblMenu[1].Enabled = true;
tblMenu[2] ={};
tblMenu[2].Text = "Restablecer posicion";
tblMenu[2].ID = 101;
--Icono aqui
tblMenu[2].Checked = false;
tblMenu[2].Enabled = true;
tblMenu[3] ={};
tblMenu[3].Text = "Ayuda";
tblMenu[3].ID = 102;
--Icono aqui
tblMenu[3].Checked = false;
tblMenu[3].Enabled = true;
mousePosition = System.GetMousePosition(false, nil);
--Dialog.Message("","ratio = "..ratio.. "\nmouse: x="..mousePosition.X.." y="..mousePosition.Y.."\nwindow: x="..windowPosition.X.." y="..windowPosition.Y);
editor(mousePosition.X, mousePosition.Y);
--editordeiconos
function editordeiconos(X, Y)
SelOption = Application.ShowPopupMenu(X, Y, tblMenu, TPM_LEFTALIGN, TPM_TOPALIGN, true, false);
if SelOption == 100 then
DialogEx.Show("Dialog16", true, nil, nil);
end
if SelOption == 101 then
Button.SetPos(sObject, 578, 147);
end
if SelOption == 102 then
DialogEx.Show("Dialog2", true, nil, nil);
end
end