引言: 請教各位如何用程式將指定的Tmemo中的一個word 反白 謝謝

引言: 請教各位如何用程式將指定的Tmemo中的一個word 反白 謝謝 找到解法了：

 
procedure TForm1.Button1Click(Sender: TObject);
begin
   memo1.text := 'This is a test';
   memo1.SetFocus ;
   memo1.SelStart :=10;
   memo1.SelLength :=5;
end;