listviewの検索ボックスでクリアボタンを削除するにはどうすればよいですか？

Question

私はので、私はこれをしなかったリストビューの検索ボックスに動的にTEditButtonを入れたい：

ListView       := TListView.Create(Self);  
ListView.Parent     := Self; 
ListView.Name     := 'hello'; 
ListView.Height     := 369; 
ListView.Width     := 369; 
ListView.Align     := TAlignLayout.Bottom; 
ListView.SearchVisible   := True; 
ListView.BeginUpdate;  

for i := 0 to ListView.controls.Count - 1 do 
begin 
    if ListView.controls[i].ClassType = TSearchBox then 
    begin  
    SearchBox := TSearchBox(ListView.controls[i]); 
    end; 
end; 

OKbtn := TEditButton.Create(SearchBox); 
OKbtn.Parent := SearchBox;  
OKbtn.Text := 'OK'; 
OKbtn.Width := 30; 

SearchBox.AddObject(OKbtn); 
ListView.EndUpdate;  

が、問題は検索ボックスを編集中clear buttonがあまりにも来ています。 searchboxの右側にあるクリアボタン（X）を削除するにはどうすればよいですか？