Source position: comctrls.pp line 1150
public procedure TListItems.Exchange(
const AIndex1: Integer;
const AIndex2: Integer
);