texthint for memo component

Hi Dimity,
I have successfully used script texthint for text component, but it doesn't work for memo component.  Is there a way to put a hint in the memo component like I can the text component?  I have attached a picture of the current form.

current script is:

procedure frmTeacher_OnShow (Sender: string; Action: string);
begin
frmTeacher.Edit1.TextHint := 'Enter the teachers name';
frmTeacher.Edit2.TextHint := '0444 444 444';
frmTeacher.Edit3.TextHint := 'sam@sample.com';
frmTeacher.Memo1.TextHint := 'This field appears on the bottom of reports';
end;

thank you.