RangePtr cell = (RangePtr) (ExcelWS->Cells->get_Item(x, y)); //ExcelWS компонент от TExcelWorksheet
E2027 Must take address of a memory location