import javax.media.Manager;
import javax.media.MediaLocator;
import javax.media.Player;
import javax.swing.*;
import java.awt.Component;

public class SwingCapture {
	public static void main(String[] args) {
	// TODO Auto-generated method stu
		otro perro=new otro();
		perro.show();
		perro.proceso();
	}
}
class otro extends JFrame{
	JLabel Imagen;
	otro(){
		Imagen=new JLabel();
		Imagen.setBounds(30,40,20,20);
		add(Imagen);
		setBounds(400,400,400,400);
		setLayout( null ); // use a BorderLayou	 
		setTitle("Prueba de Camara Web");
	}
	public void proceso(){
			Manager.setHint( Manager.LIGHTWEIGHT_RENDERER, true );
		try{
			MediaLocator ml = new MediaLocator("vfw://0");
			Player p = Manager.createRealizedPlayer(ml);
			
			Component video = p.getVisualComponent();
			
			video.setBounds(20,30,600,600);
			if ( video != null ){
				// agragar el video al componente
                add( video);
			}
               

			p.start();
		}catch(Exception e){
			e.printStackTrace();
		}
	}
}

import java.io.*;
import javax.swing.*;

public class Prueba1 {

    public static void main (String[] args)throws Exception {
    	procedimiento objeto=new procedimiento();
    	objeto.AbrirArchivo("perro.bmp");
	}
}
class procedimiento{
	RandomAccessFile archivo;
	String cerosunos;
	String cerosunosaux;
	Byte Decimal;
	
	public void AbrirArchivo(String Archivo)throws Exception{
		archivo=new RandomAccessFile(Archivo,"rw");
		for(int w=54;w<=60;w++){
				cerosunos="";
				cerosunosaux="";
				
				archivo.seek(w);
				Decimal=archivo.readByte();
				cerosunosaux=Integer.toBinaryString(Decimal);
				
				int i = Decimal;
   				String aChar = new Character((char)i).toString();
   				
				//Conpletar los 8 bits.	
				if(cerosunosaux.length()<8){
					for(int x=cerosunosaux.length();x<8;x++){
						cerosunos=cerosunos+"0";
					}
					cerosunos=cerosunos+cerosunosaux;
				}
				JOptionPane.showMessageDialog(null,"El contenido del archivo en el byte: " + w + "\n binario: " + cerosunos + " \n Decimal: "+ Decimal + " \n Ascii: " + aChar);
		}
		
	}
}

import java.io.*;
import javax.swing.*;

public class Prueba1 {

    public static void main (String[] args)throws Exception {
    	procedimiento objeto=new procedimiento();
    	objeto.AbrirArchivo("byte.txt");
	}
    
    
}
class procedimiento{
	RandomAccessFile archivo;
	String cerosunos="";
	String cerosunosaux;
	public void AbrirArchivo(String Archivo)throws Exception{
		archivo=new RandomAccessFile(Archivo,"rw");
		archivo.seek(0);
		cerosunosaux=Integer.toBinaryString(archivo.readByte());
		
	//Conpletar los 8 bits.	
		if(cerosunosaux.length()<8){
			for(int x=cerosunosaux.length();x<8;x++){
				cerosunos=cerosunos+"0";
			}
			cerosunos=cerosunos+cerosunosaux;
		}
		
		JOptionPane.showMessageDialog(null,"El contenido del archivo es " + cerosunos);
	}
}

public int SearchTreeForFile(String RootPath , String InputPathName,String OutputPathBuffer);

	String Salida_Ruta="";
       	int Verificacion=CLibrary.INSTANCE.SearchTreeForFile(Ruta,Archivo,Salida_Ruta);
JOptionPane.showMessageDialog(null,"El archivo esta en la Ruta " + Salida_Ruta );

# On Error GoTo Error_Sub  
#   
#     Dim temp As String, Ret As Long  
#   
#     Me.MousePointer = vbHourglass  
#     'Creamos un bufer para almacenar el resultado osea del path  
#     temp = String(MAX_PATH, 0)  
#   
#     'Retorna 1 si se encontró ( text1 es el path, text2 es el archivo )  
#     Ret = SearchTreeForFile(Text1, Text2, temp)  
#       
#     ' encontrado  
#     If Ret <> 0 Then  
#         MsgBox "Archivo encontrado en: " + Left$(temp, InStr(1, _  
#                 temp, Chr$(0)) - 1), vbInformation  
#     ' no encontrado  
#     Else  
#         MsgBox "Archivo no encontrado", vbInformation  
#     End If  
#       
#     Me.MousePointer = 0