>=this.AddObject('_' + padl(m.i, 4, '0'), 'MapMultiLineToolTipLabel') > with this.Controls(this.ControlCount) > .Top = m.nHeight > .Left = 5 > .Caption = aa[m.i] > > > .AutoSize = TRUE > .Visible = TRUE > =INKEY(.0001) > && here the width was correct >Are you sure you needed inkey() in your case?