指针怎么正确的指向组件，并调用之

指针怎样正确的指向组件，并调用之
如题

定义一个指针后怎样将其指向一个组件，并用指针来操作组件，谢了


比如，有一个组件Memo1 现定义一个指针
  p:pointer;

怎样让其指向Memo1,并操作这个指针，同时改变Memo1的内容




[解决办法]
p := Memo1;
…… ……
TMemo(p).Lines.Clear;
TMemo(p).Lines.Add('ceshi');