Código Delphi [-] procedure TFormMain.TBItem3Click(Sender: TObject); begin TileMode := tbVertical; Tile; end;
procedure TFormMain.TBItem3Click(Sender: TObject); begin TileMode := tbVertical; Tile; end;