W:=CreateOleObject('Word.Application'); sel_:=W.Selection; sel_.Tables(1).Borders('wdTopBorder').Style := 'wdStyleNone';