procedure TMoveForm.FormCreate; //(Sender: TObject);begin MoveForm.Hide; ShowForm.SetLastSound(0); end;