procedure DoIt; begin TThread.Synchronize(MyThread, procedure() begin Form2.Caption:='Let Me Show You'; end); end;