Im going to have to stop editing my files before posting. Here is the original which did not clear:
procedure Tmainform.FormCreate(Sender: TObject);
begin
TrayIcon1.Icon.Assign(Application.Icon);
TrayIcon1.Show;
Application.OnHint := @ShowHint;
ShowScrollBar(listbox1.Handle, SB_BOTH, false);
clipboard.Clear;
clipboard.astext:='';
Listbox1.clear
//here is what works note the new position of clipboard.clear
procedure Tmainform.FormCreate(Sender: TObject);
begin
clipboard.Clear;
clipboard.astext:=''; //this is still required
TrayIcon1.Icon.Assign(Application.Icon);
TrayIcon1.Show;
Application.OnHint := @ShowHint;
ShowScrollBar(listbox1.Handle, SB_BOTH, false);
listbox1.Clear;