Pular para o conteúdo principal

Aplicação MDI no Java

Aplicações MDI (Multiple Dcument Interface ou Interface de Múltiplos documentos) são aquelas onde temos uma janela principal (ou pai) que gerencia várias outras (filhas), tornando possível trabalhar com mais de um documento de uma única vez, como exemplo temos editores de textos, planilhas, programas de correio eletrônico, enfim, muitas aplicações do nosso cotidiano se utilizam dessa tecnologia.
A seguir temos um exemplo, retirado do livro Java Como Programar (Deitel), que mostra o uso de duas classes do Swing (JDesktopPane e JInternalFrame) que fornecem suporte ao MDI.

// pacotes de núcleo do java
import java.awt.*;
import java.awt.event.*;

// pacotes de extensão do java
import javax.swing.*;

/**
*
* @author du
*/

public class Main extends JFrame{
private JDesktopPane theDesktop;

//configura a GUI
public Main()
{
super("Usando o JDesktopPane !!! VIVA !!!");

//cria uma barra de menus, um menu e itens de menu
JMenuBar bar = new JMenuBar();
JMenu addMenu = new JMenu("Adicionar");
JMenuItem newFrame = new JMenuItem("Frame Interno");

addMenu.add( newFrame );
bar.add( addMenu );

setJMenuBar( bar );

//configura a área de trabalho
theDesktop = new JDesktopPane();
getContentPane().add( theDesktop );

//configura ouvinte para o item de menu newFrame
newFrame.addActionListener(

//classe interna anonima para tratar eventos de item de menu
new ActionListener(){
//exibe nova janela interna
public void actionPerformed( ActionEvent event ){
//cria frame interna
JInternalFrame frame = new JInternalFrame(
"Frame Interno", true, true, true, true);

//anexa painel ao painel de conteudo da frame interna
Container container = frame.getContentPane();
MyJPanel panel = new MyJPanel();
container.add( panel, BorderLayout.CENTER);

//configura o tamanho da frame interna com o tamenho de seu conteudo

frame.pack();

//anexa a frame interna a area de trabalho e a exibe
theDesktop.add( frame );
frame.setVisible( true );

}

}//fim da classe interna anonima
);// fim da chamada para addActionListener

setSize( 600, 440 );
setVisible( true );
}// fim do contrutor


public static void main(String args[]) {

Main application = new Main();

application.setDefaultCloseOperation(
JFrame.EXIT_ON_CLOSE);
}

}// fim da classe DesktopTest


Comentários

  1. Post bem interessante, mas eu gostaria de ver um exemplo de aplicação com acesso a um banco de dados.

    ResponderExcluir
  2. Oi, achei o blog interessante, parabéns, um post falando de MDI no delphi iria bem, abraços…

    ResponderExcluir
  3. Simples implementação...

    ResponderExcluir
  4. Este comentário foi removido pelo autor.

    ResponderExcluir

Postar um comentário

Obrigado por Participar do programero, fique a vontade para agradecer, retificar, perguntar ou sugerir.

Mais visitadas

Manipular arquivos com PL/SQL (Oracle)

O bom e velho arquivo, é impressionante como lidamos com seus vários tipos durante todos os dias, bom hoje vamos mostrar um jeito simples de se escrever e ler arquivos apenas com a codificação nativa do Oracle. A primeira coisa a fazer é criar um diretório válido configurado no Oracle, e permissões de acesso a esse diretório para o usuário de banco onde faremos o exemplo, sendo assim suponhamos que nosso usuário de banco se chame programero, e nosso diretório real esteja em c:\programero, então logado como SYSTEM devemos executar os seguintes comandos: 1: -- cria diretorio 2: create or replace directory DIR_PROGRAMERO as ' C:\PROGRAMERO '; 3: -- concede permissão de escrita e leitura para nosso usuário 4: grant read , write on directory DIR_PROGRAMERO to PROGRAMERO; Para escrever, basicamente precisamos apenas saber onde esse arquivo ficará, no nosso caso no diretório criado acima, segue o código de escrita: 1: declare 2: -- nosso handler 3: v_a...

Centralizar Texto em Edit

Como todos sabemos o Edit mantém todo texto digitado a esquerda, o que não fica bem quando o usamos para a entrada de números, pois bem, o exemplo abaixo apresenta uma alternativa para centralizar um determinado valor dentro de um Edit: procedure EditChange(Sender: TObject); var vl_label : TLabel; //variável do tipo Label begin vl_label := TLabel.Create(self); //criamos um label WITH vl_label DO BEGIN Font.Name := TEdit(sender).Font.Name; //pegamos a fonte usada no edit Caption := TEdit(sender).Text; //pegamos o conteúdo do edit SendMessage(TEdit(sender).Handle, EM_SETMARGINS, EC_LEFTMARGIN, (TEdit(sender).Width-vl_label.Width) div 2); //centraliza no label e retorna para o edit END ; vl_label.Free; end ;

Funções de Data e Hora (Delphi)

É muito comum nos depararmos no dia a dia com a necessidade de manipular datas e horas, seja para um calculo de permanência, dias de atraso enfim, é praticamente escapar de alguma situação que necessite desse tipo de controle. Assim como a necessidade e se utilizar algum recurso para manipular as datas e horas de alguma maneira e freqüente, as duvidas de como o faze-lo também é, basta um breve olhar em qualquer fórum especializado e lá está, alguma duvida relacionada, por isso decidi falar um pouco sobre uma unit muito poderosa chamada DateUtils para a manipulação de data e hora, com um grande numero de métodos e classes que facilitam a vida de qualquer um. Alguns exemplos: CompareDate(constA, B: TDateTime): TValueRelationship; Compara apenas a data de dois valores (do tipo TDateTime) retornando: LessThanValue O primeiro valor é menor que o segundo EqualsValue Os valores são iguais GreaterThanValue O primeiro valor é maior que o segundo CompareDateTime(const A, B: TD...