domingo, 11 de noviembre de 2012

Ejemplo de Fondo Verde en Filmación

Práctica Para Segundo A-B 5

Ejercicios Online para Alumnos sin Folletos

Práctica de Romper Cristal After Effects

Unidad 1.

Unidad 2.

Unidad 3.

Unidad 4.

Material a utilizar:

Descargar: http://www.mediafire.com/?qrf7f3dvnt4h7ki

tarea para alumnos sin folleto del curso del Segundo A - B

Para unidad 1. Romper el vidrieo de la jipeta:

Para unidad 2. Romper el Pared de la entrada:

Para unidad 3. Romper la puerta con un texto:

Para unidad 4. Romper el tanque:

Las prácticas debe ser enviado al Email: profesorinformatica@gmail.com o rubendacg@gmail.com o entregarlo en un cd.

Instrucciones de tarea

La Fecha de inicio del tarea fue semana pasada.
La hora tope para entregar estas practicas es las 12:00:hrs del 19-11-2012.
El trabajo de informatica se enviará:

Una hoja de presentación con nombre,numero,curso, código, escolar y una foto de su persona
debe contener las archivos fuertes de cada video en atfer effects,sony vegas o premiere.

TAREA INDIVIDUAL
EVALUACIÓN:

No hacen copia, debe diseñar dicho trabajo
Uso correcto ortografía y gramática
Debe ser realizado en Atfer Effects, sony vegas o premiere
Presentación con código

Inicia tu Tarea y buena suerte.

Tercero Informática Tarea

Práctica a realizar de Sistemas y Equipos Informáticos

Tarea 10.

como configurar una red en windows 7

Cómo configurar una IP fija en Windows7

viernes, 9 de noviembre de 2012

Practica 7 de Edición de video

PRÁCTICA DE EFECTO DE CC BALL ACTION

1. Clic botón inicio – clic todos los programas – Adobe Master Collection CS6

2. Clic a After Effects CS6

3. Buscar en la barra de menú, la opción composición

4. Clic en nueva composición o Presione ctrl + N y Escribir un nombre de polígono

5. El tamaño es de 64x100, con una velocidad de 30 y la duración de 0:00:08:00

6. Clic capa – clic a nuevo – sólido y poner color azul y luego escribir rayo.

7. Clic al panel efecto – ajuste preestablecido mira a mano derecha de tu pantalla.

8. Clic en la cajita de texto y Escribimos el efecto CC Ball Action.

9. Doble Clic a CC Ball Action y Clic en el inicio de la línea de tiempo.

10. Ponga fotograma clave y modifique a su gusto.

Práctica de Edición de Video

PRÁCTICA DE EFECTO DE NIGHTCRAWLER

Para esta práctica puede ser realizada por 2A y 2B y esta valida para alumnos de 1A y 1B.

Publicar el en youtube.com y enviar el link al correo profesorinformaticace@gmail.com

1. Clic botón inicio – clic todos los programas – Adobe Master Collection CS6

2. Clic a After Effects CS6

3. Buscar en la barra de menú, la opción composición

4. Clic en nueva composición o Presione ctrl + N y Escribir un nombre de yomujer

5. Importar una imagen: clic archivo – importar - archivo y busque su archivo llamado PAISAJEB y luego arrastrarlo hacia el panel del tiempo.

6. Clic a la flecha del menú de lista de Paisaje y clic a transformar

7. Poner encima de la primera cantidad de la propiedad escala y un clic sin dejar de presionar el botón derecho del mouse moverlo hacia la derecha para aumentar y hacia la izquierda para disminuir la imagen luego clic al candado de la imagen paisajeb.

8. Importar un video del chica-a: clic archivo – importar - archivo y busque la carpeta autores escolares en el disco Local D y clic al botón abrir

9. Arrastrarlo hacia el panel del tiempo

10. Clic efecto en la barra de menú – corrección de color – curcas – mover la raya hacia arriba

11. Clic al panel efecto – ajuste preestablecido mira a mano derecha de tu pantalla.

12. Clic en la cajita de texto y Escribimos el efecto keylight (1,2)

13. Doble Clic a keylight (1,2)

14. Clic al botón de gotero de color y clic al fondo verde del video o la imagen

15. En la propiedad screen Pre-blur: Clic encima de la cantidad y poner el valor de 3

16. Clic a la flecha de screen matte y en la propiedad clip black: clic encima y poner 45

17. En la propiedad clip white: Clic encima de la cantidad poner el valor de 60

18. En la propiedad screen shrink/: Clic encima de la cantidad y poner el valor de -1

19. En la propiedad screen softne: Clic encima de la cantidad y poner el valor de 0.4

20. Clic capa – clic a nuevo – sólido con el nombre Ruido fractal

21. Clic al panel efecto – ajuste preestablecido mira a mano derecha de tu pantalla.

22. Escribimos el efecto ruido fractal

23. Arrastrar el efecto hacia la capa ruido fractal o presione doble clic con la capa selecciona.

24. Clic botón de lista de tipo de fractal y elegir dinámica progresiva

25. En la propiedad Contraste: Clic encima de la cantidad y poner el valor de 239 y enter

26. Clic a la flecha de transformar y en la propiedad escala: poner el valor de 50 y enter

27. Clic en ojito de la capa ruido fractal y mover el indicador de tiempo hasta que quede como el ejemplo que esta profesorinformaticacec.blogspot.com o en el tiempo 0;00;00;09

28. Clic en ojito de la capa ruido fractal y En la propiedad evolución clic al reloj

29. Mover indicador de tiempo en el tiempo 0;00;00;23 o vea ejemplo

30. Clic a primera cantidad de la propiedad evolución: cambie el 0x por 1x

31. Mover el indicador de tiempo hasta 0;00;00;09 o como la primera posición que tenía.

32. En la propiedad brillo: poner el valor de 150 y luego un clic al reloj de la propiedad brillo.

33. Mover indicador de tiempo a 0;00;00;23 o vea ejemplo

34. En la propiedad brillo: poner el valor de -170

35. Clic a la capa de chica-a: Duplicar la capa con Crtl + D o Editar – duplicar.

36. Clic a la copia y clic derecho y elegir cambiar nombre: escribir segundo

37. Clic a la chica-a y clic derecho y elegir cambiar nombre: escribir primero

38. Clic a la flecha de segundo en la columna mate seguim , donde dice ninguno y elegir mate luna nubes (que es el nombre que le pusimos a la capa solido) y Clic a la capa primero

39. Con el indicador de tiempo indicar el 0;00;00;00 y Clic a la flecha de transformar y en la propiedad opacidad: poner el valor de 0 y enter

40. Con el indicador de tiempo indicar el tiempo 0;00;01;07 y Clic al reloj de opacidad y Clic a la flecha de transformar y en la propiedad opacidad: poner el valor de 0 y enter

41. Con el indicador de tiempo indicar el 0;00;01;12 y Clic a la flecha de transformar y en la propiedad opacidad: poner el valor de 100 y enter

42. Clic a capa ruido fractal y segundo con crtl presionado para seleccionar la dos capas

43. Clic a capa y clic a precomponer

44. Importar un video del Jumper Smoke.mov : clic archivo – importar - archivo y busque la carpeta efectoece y luego teletransportacion en el disco Local D y clic al botón abrir

45. Arrastrarlo hacia el panel del tiempo y reducir el tamaño y ubíquelo en el momento donde desaparecer luego clic flecha de columna de modo y elegir multiplicar

46. Repita el proceso 42 y 43 con el sonido Jumper Sounda.wav

47. Clic a la capa Jumper Smoke y Duplicar la capa con Crtl + D o Editar – duplicar.

48. Duplique y coloque cuanta veces sea necesario para cubrir a la chica.

49. Seleccione todas las duplicado de jumper smoke y a la capa de sonido Sounda.wav y clic capa y luego precomponer: escribir sombra y clic al botón aceptar

50. clic flecha de columna de modo sombra y elegir multiplicar.

SQL SERVER Y VB:NET 4Informática

Practica en SQL SERVER y mostrarla en un grid view con VB.net 4 de Informática

Hace un tiempo atrás, si mas no recuerdo en el año 2010 , publiqué aquí mismo en este blog un articulo acerca de como guardar una imagen en sql server mediante c#.net, y me preguntaban como hacerlo en vb.net y además como mostrarlo, estube investigando al respecto y hoy comparto este tutorial, asi que empecemos:

1. creamos la base de datos y la tabla que nos servirá para este ejemplo

create database imagen
go

use imagen

CREATE TABLE Producto(
IDproducto int IDENTITY(1,1) NOT NULL,
Descripcion varchar(50) NULL,
Precio numeric(18, 2) NOT NULL,
Foto image NULL,
CONSTRAINT [PK_Producto] PRIMARY KEY CLUSTERED (IDproducto)
)

2.- Ahora en visual studio 2008 y creamos un nuevo proyecto de visual basic.net

elegimos Aplicación de Windows Forms y le colocamos un nombre

creamos la siguiente intrefaz: dentro de un groupbox 2 labels, dos textbox(txtdescripcion y txtprecio), un control picture box llamado picFoto, dos buttons ( cmdguardar y cmdexaminar) y un control DataGridView llamado DataGridViewImage

3.- Ahora hacemos clic derecho en la solucion y elegimos agregar, luego clase

y le ponemos de nombre ImageClass

y la estructura de nuestro proyecto queda como la imagen anterior

4.- Hacmeos doble clic en la en el archivo Image Class.vb , borramos todo y pegamos el siguiente codigo

Imports System.Data
Imports System.Data.SqlClient

Public Class ImageClass

#Region “Set Class Variables …”

Private clsobj As ImageClass
Private lstobj As List(Of ImageClass)

Private sqlcon As SqlConnection
Private sqlcom As SqlCommand
Private sqlrdr As SqlDataReader

Private sqlstr As String = “Data Source=MYPC;Initial Catalog=imagen;Integrated Security=True”

#End Region

#Region “Set Property Data …”
Private _productoid As Integer
Public Property ProductoID() As Integer
Get
Return _productoid
End Get
Set(ByVal value As Integer)
_productoid = value
End Set
End Property

Private _descripcion As String
Public Property Descripcion() As String
Get
Return _descripcion
End Get
Set(ByVal value As String)
_descripcion = value
End Set
End Property

Private _precio As Double
Public Property Precio() As String
Get
Return _precio
End Get
Set(ByVal value As String)
_precio = value
End Set
End Property

Private _imagen() As Byte
Public Property Imagen() As Byte()
Get
Return _imagen
End Get
Set(ByVal value() As Byte)
_imagen = value
End Set
End Property
#End Region

Public Function ObtenerImagenes() As List(Of ImageClass)

lstobj = New List(Of ImageClass)
lstobj.Clear()

sqlcon = New SqlConnection(sqlstr)
sqlcon.Open()

sqlcom = New SqlCommand()

With sqlcom
.Connection = sqlcon
.CommandType = CommandType.Text
.CommandText = “SELECT * FROM Producto order by IdProducto”
sqlrdr = .ExecuteReader()
End With

Do While sqlrdr.Read()
clsobj = New ImageClass()

clsobj.ProductoID = Convert.ToInt32(sqlrdr.GetValue(0))
clsobj.Descripcion = Convert.ToString(sqlrdr.GetValue(1))
clsobj.Precio = Convert.ToString(sqlrdr.GetValue(2))
clsobj.Imagen = sqlrdr.GetValue(3)

lstobj.Add(clsobj)
clsobj = Nothing
Loop

sqlrdr.Close()
sqlcom.Cancel() : sqlcom.Dispose()
sqlcon.Close() : sqlcon.Dispose()

Return lstobj

End Function

End Class

5.- Ahora en la vista codigo de nuestro formulario agregamos al principio el siguiente codigo refrenciando a los namespace que utilizaremos

Imports System.Data
Imports System.Data.SqlClient
Imports System.Diagnostics
Imports System.IO

y luego de la linea Public Class Form1, agregamos lo siguiente:

Private objgridimages As ImageClass

Public Sub cargargrid()

objgridimages = New ImageClass()

Me.Cursor = Cursors.WaitCursor

Try
DataGridViewImage.DataSource = objgridimages.ObtenerImagenes()

If DataGridViewImage.Rows.Count = 0 Then
MessageBox.Show(“No existen registros “, “Grid Image”, MessageBoxButtons.OK, MessageBoxIcon.Information)
End If

Catch ex As Exception
MessageBox.Show(ex.Message, “Grid Image”, MessageBoxButtons.OK, MessageBoxIcon.Error)
Finally
objgridimages = Nothing
End Try

Me.Cursor = Cursors.Default
End Sub

Private Sub FromatDataGridView()

With DataGridViewImage
.AutoGenerateColumns = False
.Columns.Clear()

Dim ColumnaCodigoProducto As New DataGridViewTextBoxColumn()
With ColumnaCodigoProducto
.DataPropertyName = “ProductoID”
.HeaderText = “Codigo”
.ReadOnly = True : .Visible = False
.Width = 0
End With
.Columns.Add(ColumnaCodigoProducto)

Dim ColumnaDescripcionProducto As New DataGridViewTextBoxColumn()
With ColumnaDescripcionProducto
.DataPropertyName = “Descripcion”
.HeaderText = “DescripcionProducto”
.ReadOnly = True : .Visible = True
.Width = 400
End With
.Columns.Add(ColumnaDescripcionProducto)

Dim ColumnaPrecioProducto As New DataGridViewTextBoxColumn()
With ColumnaPrecioProducto
.DataPropertyName = “Precio”
.HeaderText = “PrecioProducto”
.ReadOnly = True : .Visible = True
.Width = 200
End With
.Columns.Add(ColumnaPrecioProducto)

Dim ColumnaImagen As New DataGridViewImageColumn()
With ColumnaImagen
.DataPropertyName = “Imagen”
.HeaderText = “Imagen Producto”
.ImageLayout = DataGridViewImageCellLayout.Zoom
.ReadOnly = True : .Visible = True
.Width = 50
End With
.Columns.Add(ColumnaImagen)
End With

End Sub

Public Sub limpiarcontroles()
txtdescripcion.Text = “”
txtprecio.Text = “”
picfoto.Image = Nothing
txtdescripcion.Focus()
End Sub

5.- Ahora le damos doble click al boton cmdexaminar y colocamos el siguiente codigo para que nos muestre un auadro de dialogo para seleccionar nuestra imagen y nos lo muestre en el control picFoto

Dim openFileDialog1 As New OpenFileDialog()

Dim result As New DialogResult
openFileDialog1.InitialDirectory = “Bibliotecas\Imágenes”
openFileDialog1.Filter = “archivos de imagen (*.jpg)|*.png|All files (*.*)|*.*”
openFileDialog1.FilterIndex = 3
openFileDialog1.RestoreDirectory = True
result = openFileDialog1.ShowDialog()
If (result = DialogResult.OK) Then
picfoto.Image = Image.FromFile(openFileDialog1.FileName)
End If

6.- Ahora en el evento load del form (doble clic en cualquier espacio del form), agremos la siguiente linea de código

cargargrid()

7.- En el boton cmdguardar damos boble clic y escribimos el siguiente código
Try

Dim cn As New SqlConnection(“Data Source=.;Initial Catalog=imagen;Integrated Security=True”)
Dim coUsuario As New SqlCommand
coUsuario.Connection = cn
coUsuario.CommandText = “INSERT INTO Producto VALUES (@Descripcion,@precio, @foto)”
coUsuario.Parameters.Add(“@Descripcion”, System.Data.SqlDbType.NVarChar)
coUsuario.Parameters.Add(“@precio”, System.Data.SqlDbType.SmallMoney)
coUsuario.Parameters.Add(“@foto”, System.Data.SqlDbType.Image)

coUsuario.Parameters(“@Descripcion”).Value = txtdescripcion.Text
coUsuario.Parameters(“@precio”).Value = Val(txtprecio.Text)

Dim ms As New System.IO.MemoryStream()
picfoto.Image.Save(ms, System.Drawing.Imaging.ImageFormat.Jpeg)
coUsuario.Parameters(“@foto”).Value = ms.GetBuffer()
cn.Open()
coUsuario.ExecuteNonQuery()
cn.Close()

Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
cargargrid()
limpiarcontroles()

8.- Ahora solo nos queda ejecutar nuestra aplicación , para presionamos f5, si no tenemos ningun registro en nuestra bd nos saldrá el siguiente mensaje