Label1.Hint := '* This is my program' + Chr(13) +
                       '*  and I am using these' + Chr(13) +
                       '*  long hints for my  ' + Chr(13) +
                       '*  labels' + Chr(13) +
                       '*  Looks Nice!';