ToString

// Главная форма
frm=new TForm();
frm.Caption="JS+ - метод визуальных компонентов ToString";
frm.Width =450;
frm.Height=300;
frm.OnMouseEnter=all_MouseEnter;

// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=
" Перемещайте указатель мыши над формой и ее элементами";
stb.OnMouseEnter=frm.OnMouseEnter;

// Кнопка
btn=new TButton(frm);
btn.Caption="Кнопка";
btn.Left=frm.ClientWidth-btn.Width-15;
btn.Top =stb.Top-btn.Height-15;
btn.OnMouseEnter=frm.OnMouseEnter;

// Панель
pnl=new TPanel(frm);
pnl.Caption="Панель";
pnl.BorderStyle=bsSingle;
pnl.Left=pnl.Top=15;
pnl.Width =frm.ClientWidth-pnl.Left*2;
pnl.Height=btn.Top-pnl.Top*2;
pnl.OnMouseEnter=frm.OnMouseEnter;

frm.ShowModal();

// Обработчик события OnMouseEnter
function all_MouseEnter(Sender)
{
  stb.SimpleText=" "+Sender.ToString();
}