Usando componentes do Delphi.pdf
Transcript of Usando componentes do Delphi.pdf
Classe TForm
• Propriedades
• Caption – Titulo da Barra de Titulos
• ShowHint – Habilita a aplicação a mostrar o conteúdo da
propriedade Hint
• Hint – Pode armazena a string de ajuda que é visualizada quando
o curso é colocado sobre um objeto.
• Cada objeto deve ter o seu Hint específico
Classe TForm
• Eventos
• OnCreate – é executado quando o formulário é criado
• OnShow – é executado quando o formulário é visualizado.
OnShow é executado também quando a propriedade Visibled é
alterado para True.
• OnClose – é executado quando o formulário é fechado
Classe TButton
• Propriedades
• Enabled – Habilita o uso do componente
• ParentFont – Restaura a fonte do componente conforme a
definição inicial da classe
• Font – Define a fonte do componente
• O & deixa o caracter sublinhado que está após o sinal (usado p/
tecla de atalho)
Classe TButton
• Eventos
• onClick – é executado quando o botão é clicado pelo mouse.
• onExit – é executado quando o objeto perde o foco
• onEnter – é executado quando o objeto recebe o foco
Exercício
Classe TLabel
• Propriedades • Aligment – Define o alinhamento do texto que pode ser :
taLeftJustify, taRightJustify, taCenter
• AutoSize – Define o ajuste automático de acordo com o tamanho do texto na propriedade Caption
• Color – Define a cor do objeto
• WordWrap – Define a quebra automática de linha quando preenche o tamanho do objeto
Caixas de Dialogos
• No Delphi existem uma série de classe que montam uma caixa de diálogo padrão que podem ser: • Abrir Arquivo (TOpenDialog);
• Salvar Arquivo (TSaveDialog);
• Abrir Figura (TOpenPictureDialog);
• Salvar Figura (TSavePictureDialog);
• Fontes (TFontDialog);
• Cores (TColorDialog);
• E outros.
TColorDialog
• Propriedades
• Color – Armazena a cor que foi selecionada. Esta propriedade
pode também pode receber a cor para apresentar um contorno de
previamente selecionada na abertura da caixa de diálogo.
• Método
• Execute – Executa a caixa mostrando para o usuário interagir com
a mesma
Exercício
Arrastando um componente
• Existe recursos no Delphi que permite o arrasto
de um componente para outro. Para isto ser
possível deve-se:
• Ativar o arrasto. Alterando a propriedade DragMode
para dmAutomatic
• Programar o evento DragOver do objeto destino para
ativar aceitar o arrasto.
• Altere a variável Accept para TRUE
• Programar o evento DragDrop que efetuar o que deve
acontecer quando soltar o botão do mouse
Exercício
Classe TEdit
• Propriedades • Text – armazenar o conteúdo digitado pelo usuário
• PasswordChar – Define o caractere que aparecerá na digitação da senha
• Eventos • Vc pode programar os eventos onEnter, onExit, onChange
,onKeyDown e OnKeyPressed para validar a digitação ou mostrar alguma ajuda para o usuário
Classe TStatusBar
• É usada para mostrar um barra de status no rodapé do
formulário
• Disponível na paleta Win32
• Propriedades
• SimpleText – Vc pode atribuir o texto para ser impresso na barra
de status
Algumas Funções do Delphi
• function UpCase(Ch: Char): Char;
• Converte um caractere
para maiúsculo.
• S:=upCase(‘a’);
var
s : string;
i : Integer;
begin
{ Get string from TEdit control }
s := Edit1.Text;
for i := 1 to Length(s) do
if i mod 2 = 0 then s[i] := UpCase(s[i]);
Edit1.Text := s;
end;
Algumas Funções do Delphi
• procedure Val(StrOri; var Número; var Codigo: Integer);
• Converte uma string para um número seja ele inteiro ou real.
• StrOri é a string original
• Número representa um variável numérica que pode ser qualquer
tipo numérico do Delphi
• Codigo é uma variável inteira que armazena o codigo do erro
gerado na conversão da String em Número. Quando acontece
algum erro esta variável fica com um valor diferente de zero(0)
Exercício
TMemo -
• Se você precisar de um objeto mais poderoso
que o Edit o Memo é uma boa opção;
• Possui barra de rolagem lateral e inferior;
• Consegue manipular textos de até 32K;
• Pode ser usado com um pequeno bloco de
notas
TMemo
• Propriedades
• Font – altera todo o texto do memo de acordo com a fonte
especificada nesta propriedade;
• Lines – é um vetor de Strings. Na realidade é uma composição
com a classe TString que tem uma série de propriedades e
métodos. Entre os quais o método SaveToFile que salva o
conteúdo de Lines e armazena em disco.
TMemo
• Exemplo de gravação para um arquivo
Memo1.Lines.SaveToFile(‘c:\teste.txt’);
• Existe um método em lines que carrega um texto
de um arquivo é o memo.
• Exemplo
• Memo1.Lines.LoadFromFile(“C:\windows\system.ini”);
TFontDialog -
• É uma caixa de diálogo de fonte. Onde o
usuário seleciona a fonte que deseja alterar.
• Propriedades
• Font guarda a fonte selecionada pelo usuário
• Exemplo:
• If (FontDialog1.Execute) then
Edit1.Font:=FontDialog1.Font
TSaveDialog
• É uma caixa de diálogo que é usada para
selecionar unidade, diretório e nome de arquivo
e guardo o caminho na propriedade FileName
• Propriedades
• FileName guarda o path completo do arquivo
• Filter configura o filtro de arquivos
• DefaultExt define a extensão padrão do arquivo
• Title configura o titulo da caixa de diálogo
• InitialDir pode ser usado para configurar o diretório
inicial na abertura da caixa
TLoadDialog
• É uma caixa de diálogo para abertura de
arquivo. Onde o usuário pode navegar dos
dispositivos e selecionar um arquivo para
abertura.
• Propriedades
• Tem as mesmas propriedades que a TSaveDialog
TBitBtn
• É uma classe composta por um botão com uma
figura e um texto.
• Propriedades
• Kind – Onde pode ser selecionado o tipo de botão e o
Delphi já preenche a figura padrão
• Glyph – É informado o arquivo que contém a imagem
para ser visualizada no botão.
• O Delphi tem uma série de figuras que podem ser acessadas
em c:\Arquivo de Programas\Common Files\Borland
Shared\Images\Buttons
TSpeedButton
• É uma classe que contém um botão somente
com uma imagem
• Propriedades
• Glyph é o mesmo que o TBitBtn
MessageDlg
• Mostra uma caixa de messagem no centro da tela:
• function MessageDlg ( const Message : string;
DialogType : TMsgDlgType; Buttons :
TMsgDlgButtons; HelpContext : Longint ) : Integer;
• DialogType pode ser:
• mtWarning Mostra a exclamação
• mtError mostra o 'X' vermelho
• mtInformation mostra um 'i' na bolha
• mtConfirmation mostra uma interrogação
• mtCustom mostra somente uma mensage
MessageDlg
• Buttons : pode ser um ou mais de um dos seguintes valores: • mbYes Mostra um botão de 'Yes'
• mbNo Mostra um botão de 'No'
• mbOK Mostra um botão de 'OK'
• mbCancel Mostra um botão de 'Cancel'
• mbAbort Mostra um botão de 'Abort'
• mbRetry Mostra um botão de 'Retry'
• mbIgnore Mostra um botão de 'Ignore'
• mbAll Mostra um botão de 'All'
• mbNoToAll Mostra um botão de 'No to all'
• mbYesToAll Mostra um botão de 'Yes to all'
• mbHelp Mostra um botão de 'Help'
MessageDlg
• Delphi providencia uma número de combinações
predefinidas
• mbYesNoCancel = [mbYes,mbNO,mbCancel]
• mbYesAllNoAllCancel =[mbYes,mbYesToAll,
mbNo,mbNoToAll,mbCancel]
• mbOKCancel =[mbOK,mbCancel]
• mbAbortRetryCancel =[mbAbort,mbRetry,mbCancel]
• mbAbortIgnore =[mbAbort,mbIgnore]
MessageDlg
• Exemplos: • var
buttonSelected : Integer;
begin
// Mostra a caixa de diaálogo de confirmação
buttonSelected := MessageDlg('Confirmation',mtError, mbOKCancel, 0);
// Show the button type selected
if buttonSelected = mrOK then ShowMessage('OK pressionado');
if buttonSelected = mrCancel then ShowMessage('Cancel pressionado');
end;
Exercício
• Fazer um aplicativo com um Memo adicione opção: Mudar
a fonte de um texto, carregar um arquivo previamente
salvo no disco (usar caixa de dialogo) e salvar o arquivo
corrente (usar caixa de diálogo)
• Obs: Quando o botão abrir arquivo for pressionado. Deve-se
verificar se o texto foi alterado e dar opção para o usuário salvar o
texto antes de abrir outro.
Exercício
• Faça um registro com os dados do funcionário. Este registro deve ter:
Codigo (integer), Nome (String), eMail(String), No. Dependentes
(integer), Salario Bruto (real), Valor do IRRF (real) e Salario
Liquido(real)
• Faça um formulário para armazenar estes dados. Campos numéricos
só podem aceitar números e o ponto decimal, o nome deve aceitar
somente maiúsculo e o eMail tem que ter no mínimo um @.
• Faça botões para: gravar dados, limpar o formulário, ler dados e um
para calcular (neste caso o IRRF e o Sal. Liquido)
• O Calculo do IRRF é feito conforme a tabela padrao do IRRF
• Cada dependente deve abater R$ 171,97,00 da base de calculo do
IRRF
• Sal.Liquido = Sal.Bruto – Vlr IRRF
TRichEdit
• É uma classe que corresponde a um editor que
pode ler e salvar arquivos RTF.
• Propriedades
• SelLength – Indica se existe texto selecionado no
RichEdit
• SelAtributes – Faz referencia ao texto selecionado
• Métodos
• Assign – Atribui os dados que podem ser validos para
um texto selecionado
Exercício
• Fazer um aplicativo com um RichEdit adicione opção:
Mudar a fonte de um texto selecionado, carregar um
arquivo previamente salvo no disco (usar caixa de
dialogo) e salvar o arquivo corrente (usar caixa de
diálogo)
• Obs: Quando o botão abrir arquivo for pressionado. Deve-se
verificar se o texto foi alterado e dar opção para o usuário salvar o
texto antes de abrir outro.
TRadioButton
• Permite selecionar um único botão no formulário ou no
contêiner de objetos.
• Propriedades
• Checked
• Métodos
• OnClick
TCheckBox
• Permitir marcar uma opção
• É possível selecionar mais de um checkbox no mesmo
formulário ou contêiner
• Propriedade
• Checked
• Método
• onClick
Exemplo
TGroupBox
• É um contêiner de objetos
• É possível agrupar vários objetos dentro de um GroupBox
• É possível ter vários GroupBox de acordo com a
necessidade.
• Os botões de rádio dentro de um GroupBox são
independentes um do outro
TGroupBox
• Propriedades
• Visible
• ControlCount – Contém o número de elementos dentro do
contêiner
• Controls – É um vetor com os objetos existentes no contêiner
TRadioGroup
• É uma caixa com botões de rádio
• Propriedades
• Items – Vetor com os itens que compõem as opções dos botões
• ItemIndex – Retorna com o numero do item que foi selecionado.
Exemplo
TGroupBox TRadioGroup TRadioGroup
TListBox
• É uma lista que pode ser selecionada um único
ou elemento ou vários
• Propriedades
• Items – vetor com os itens que compõem a lista
• ItemIndex – retorna o número do item selecionado
• MultiSelect – False indica seleção simples e True indica
múltipla seleção
• Sorted – para colocar a lista em ordem crescente
TListBox
• Métodos
• A propriedade Items tem uma série de métodos dentre as quais
podemos citar:
• IndexOf(String) – Tem a finalidade de fazer uma busca String passada
como parâmetro. Caso exista retornar o numero do índice onde
encontra-se a String senão retorna -1.
• Add(String) – Adiciona a String no Item do ListBox
• Delete(No.Indice) – Remove o item especificado do ListBox
TBevel
• É uma objeto que representa um chanfrado (bevel). Que
pode ter varias formas
• Propriedade
• Shape – Especifica a forma de um Bevel
• Style – o estilo do Bevel que pode ser raised ou lowed
Exemplo
TListBox com MultSelect
• Para usar um ListBox com múltiplas seleções deve alterar
a propriedade MultiSelect para True.
• Ao ativar esta propriedade fica disponível um vetor
chamado Selected que é composto por valores lógicos
que indicam se a posição está selecionada (true) ou não
(false)
• A propriedade SelCount armazena a quantidade de itens
selecionados
TListBox com MultSelected
• Para verificar se um item está selecionado faça:
• If ListBoxX.Selected[No.Item] then
{Faça algo}
Exemplo
For x:=0 to ListBox1.Item.Count -1 do
If ListBox1.Selected[x] then
Lista:=Lista+’ ‘+ListBox1.Items.Strings[x];
Exercício • Faça a versão dois do último exercicio fazendo com que
o primeiro listbox seja multiselected. Permitindo que o
usuário possa selecionar mais de um objeto
• Quando o usuário seleciona somente um objeto o verbo
está na 3ª pessoa do singular caso selecione mais de um
objeto deve ficar com o verbo na 3ª pessoa do plural.
• O início da frase sempre deve começar em maiúsculo
TComboBox
• É uma caixa combina de um TEdit com um ListBox.
• Propriedades
• Items – tem a mesma finalidade do TListBox
• Text – tem o mesma finalidade que o TEdit
• Style – Indica o estilo da caixa que pode ser:
• csDropDown – permite a edição e exibe uma caixa de listagem
mediante a solicitação
• csDropDownList – não permite a edição. Usuário pode pressionar uma
letra da lista
TScrollBar
• É uma barra de rolagem
• Propriedades • Position – Valor da posição atual
• Max – Valor Maximo
• Min – Valor Minimo
• SmallChange – Valor quando clicar na seta
• LargeChange – Valor quando clicar entre a seta e posição atual
• Kind – Altera a orientação da barra Vertical ou Horizontal
TTrackBar
• É uma barra onde existe um tick com valor máximo,
minimo e atual.
• Localizado na paleta Win32
• Propriedades
• Frequency – Intervalos do ticks
• Min – Valor Minimo
• Max – Valor Máximo
• Position – Posição Corrente
• Orientation – Pode ser vertical ou horizontal
TProgressBar
• É uma barra de progresso
• Propriedades
• Min – Valor Minimo
• Max – Valor Máximo
• Position – Posição corrente
• Orientation – Vertical ou Horizontal
TTimer
• É um objeto que pode ser programado para executar uma tarefa a cada intervalo de tempo que deve ser representado em milesegundos.
• A propriedade Interval é representa o intervalo de tempo que o evento onTimer deve ser executado
• O método onTimer deve conter a rotina que deve ser processada a cada intervalo de tempo
• Disponível na paleta System
TTimer
• Podemos programar um TTimer para que a cada 10
milisegundos o position de um progress bar seja
incrementado
• Exemplo
• Evento on timer
ProgressBar1.Position:=ProgressBar1.Position+1
TGauge
• A classe Gauge disponível na paleta Sample pode ser
usada para dar um visual melhor a uma rotina de
processamento indicando o percentual.
• Propriedades
• Kind – especifica o tipo de Gauge
• MaxValue, MinValue e Progress – Valor mínimo, máximo e valor
Atual