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

Lista de políticos com ficha suja

ATUALIZAÇÃO (08/03/2012 ano de eleição) Representantes de duas pessoas da lista (Eliseu Padilha e Alex Canziani) entraram em contato e pediram que esses fossem removidos, alegando que não houve condenação. É justo essa requisição, porém vale lembrar que escândalos nacionalmente reconhecidos de corrupção não deram em nada, por isso o que realmente conta nesse ano de eleição é uma pesquisa minuciosa sobre os candidatos escolhidos, eu particularmente, por não estar nem um pouco satisfeito, não irei votar em ninguém que já tenha sido eleito. Estou voltando a postar por um motivo nobre, meu tempo continua apertado mas esse post é rápido, na verdade nem meu ele é (visitem o espaço de nosso amigo Lord ), estou apenas repassando essa valiosa informação. Teremos eleição esse ano, e é importante não repetirmos erros passados, vamos ficar atentos em relação a esses nomes e exclui-los de vez do cenário politico nacional. Façamos nossa parte, publicando em nossos blog...

Listar arquivos existentes em diretório (Delphi)

Mostraremos uma maneira simples e prática para listar o conteúdo de um diretório com a opção de incluir nessa listagem os arquivos de seus subdiretórios. No exemplo abaixo temos um Edit para receber o diretório a ser pesquisado um CheckBox para indicar se os subdiretórios entrarão na pesquisa um botão para efetuar a pesquisa e um Memo para listar os arquivos encontrados, no final um Edit que receberá o cálculo final (em bytes) da soma do tamanho dos arquivos. procedure TForm1.Button1Click(Sender: TObject); begin   tamanhoTotal := 0;   memLista.Lines.Clear;   ListarArquivos(edtDiretorio.Text, chkSub.Checked);   Edit1.Text := IntToStr( tamanhoTotal ); end; procedure TForm1.ListarArquivos(Diretorio: string; Sub:Boolean); var   F: TSearchRec;   Ret: Integer;   TempNome: string; begin   Ret := FindFirst(Diretorio+'\*.*', faAnyFile, F);   try     while Ret = 0 do ...

Como pegar valor de coluna invisível do GridView

Em determinado momento nos deparamos com a seguinte situação, nossa tabela do banco de dados possui como campo chave, um ID por exemplo, incrementado por uma rotina da aplicação, do banco ou algum outro mecanismo de incremento (sequences, increment, etc), logo não há porque mostrar essa coluna para o usuário porque o mesmo não sabe de sua existência, e seu valor não tem qualquer relevância para ele, sendo assim o mais lógico a se fazer é não mostra-lá na aplicação. Seu valor é necessário já que por se tratar de uma chave primária precisaremos dela para atualizar, inserir ou excluir os dados, então o que fazer? A resposta seria simples, deixemos ele invisível, buscaremos seu valor e o usuário não perceberá, porém a partir da versão 2005 do visual Studio as colunas setadas com "visible = false" não são renderizadas, com isso ao se tentar acessar seu valor o que recebemos é nada. Para contornarmos essa situação podemos codificar o seguinte: protected void GridView1_R...