
(*
 Delphi Object and Component Reference
# {bmc bm18.BMP} {bmc bm10.BMP} Cascade example
This code runs when the user chooses a menu item called Window | Cascade:
*) 
procedure TForm1.Cascade1Click(Sender: TObject);
begin
  Cascade;
end; 
