Usuario:Matematico Discreto/Taller
Este es mi taller de chapa y pintura para... pues es obvio, para construcción de páginas, artículos, etc.
DON'T DISTURB
¿Sugerencias? ¿Encargos? Pulse AQUÍ
Proyectos:
Texto en imagenes
por la sobresaliente calidad de sus artículos. |
Portada programación
Clase Bienvenida en Java
PortadaProgramacion
L Bienvenida.java
L NumeroArticulos.bas
/**
* Clase gráfica Bienvenido en Java que muestra la bienvenida
* al usuario
* @author tio1.jpg
*/
package wikia.inciclopedia.portadas;
import java.lang.inciclopedia;
import java.awt.*;
import java.awt.event;
public class Bienvenida
{
/**
* Atributos de clase
*/
private Frame cuadro;
private Label lBienvenidaLink, lA, lInciLink, lLibreLink, lUncyLink, lEdicion1, lEdicion2, lFaq, lCsdyne;
/**
* Constructor
*/
public Bienvenida(){
cuadro = new Frame();
lBienvenidaLink = new Label("Bienvenido");
lA = new Label(" a ");
lInciLink = new Label("Inciprogramopedia,");
lLibreLink = new Label("la enciclopedia libre de aliasing");
lUncyLink = new Label ("Uncyclopedia");
lEdicion1 = new Label ("Edición en código fuente de ");
lEdicion2 = new Label (", iniciada en el 2006");
lFaq = new Label("F.A.Q para n00bs");
lCsdyne = new Label("¿Cómo ser divertido y no estúpido?");
}
/**
* Muestra en pantalla la parte de la portada de bienvenida
*/
public void mostrar(){
//Colocación de objetos en pantalla y muestra.
cuadro.add(lBienvenidaLink); cuadro.add(lA); cuadro.add(lInciLink); cuadro.add(lLibreLink); cuadro.add(lEdicion1); cuadro.add(lUncyLink); cuadro.add(lEdicion2);
if(siExistenPortadas==true)
for(int i=0; i<categoriaPortadas.length(); i++)
cuadro.add(new Label(categoriaPortadas[i].toString()));
cuadro.add(lFaq); cuadro.add(lCsdyne);
cuadro.setSize(340,280);
cuadro.setVisible(true);
//Asociación objetos-eventos.
lBienvenidaLink.addMouseListener( new MouseAdapter()
{ public void
mousePressed(MouseEvent e){
Inciclopedia.bienvenido();
System.exit(0);
}} );
lInciLink.addMouseListener( new MouseAdapter()
{ public void
mousePressed(MouseEvent e){
Inciclopedia.inci();
System.exit(0);
}} );
lLibreLink.addMouseListener( new MouseAdapter()
{ public void
mousePressed(MouseEvent e){
Inciclopedia.enciLibre();
System.exit(0);
}} );
lUncyLink.addMouseListener( new MouseAdapter()
{ public void
mousePressed(MouseEvent e){
Inciclopedia.uncyclopedia();
System.exit(0);
}} );
lFaq.addMouseListener( new MouseAdapter()
{ public void
mousePressed(MouseEvent e){
Inciclopedia.faq();
System.exit(0);
}} );
lCsdyne.addMouseListener( new MouseAdapter()
{ public void
mousePressed(MouseEvent e){
Inciclopedia.csdyne();
System.exit(0);
}} );
}
Código Fuente NumeroArticulos en Quick BASIC al estilo antiguo BASIC
10 REM La siguiente instruccion crea el cuadro grande en gris con la raya blanca
20 LINE (380,20)-(500,100), 7, BF
30 LINE (385,25)-(495,95), 15, B
40 LOCATE 10, 2: COLOR 0: PRINT "Actualmente, Inciclopedia tiene:"
50 REM Crea el cuadro blanco central
60 LINE (390,50)-(490,70), 15, BF
70 REM Recuenta el numero de articulos
80 FOR initialArticle TO finalArticle
90 n= n + 1
100 NEXT
110 LOCATE 17, 3: COLOR 0: PRINT n
120 LOCATE 15, 4: COLOR 0: PRINT "artículos."