Unit
Unit4

Declaration
msg_box1 : Tmsg_box1;