Desenvolvimento de Aplicações Desktop Delphi - PowerPoint PPT Presentation

slide1 n.
Download
Skip this Video
Loading SlideShow in 5 Seconds..
Desenvolvimento de Aplicações Desktop Delphi PowerPoint Presentation
Download Presentation
Desenvolvimento de Aplicações Desktop Delphi

play fullscreen
1 / 143
Desenvolvimento de Aplicações Desktop Delphi
157 Views
Download Presentation
zuzana
Download Presentation

Desenvolvimento de Aplicações Desktop Delphi

- - - - - - - - - - - - - - - - - - - - - - - - - - - E N D - - - - - - - - - - - - - - - - - - - - - - - - - - -
Presentation Transcript

  1. Desenvolvimento de Aplicações DesktopDelphi Prof. Melo

  2. Apresentação • Nome: Hildeberto Melo; • Técnico em Desenvolvimento de Software. Ibratec, PE; • Bacharel em Sistemas de Informação. FIR, PE; • Pós-Graduação em Docência do Ensino Superior. FMN, PE; • Mestre em Ciência da Computação. CIN/UFPE.

  3. Roteiro • Competências • Habilidades • Resumo do Programa • Plano de Aula • Critério de Avaliação • Regras de Convivência • Material do Aluno • Avaliações

  4. Delphi

  5. Delphi

  6. Funções • Trim(string) – remove os espaços em branco no início e no fim do texto. • Ex: x := trim(‘ Hildeberto Melo ‘); • X = ‘Hildeberto Melo’; • TrimLeft(string) – remove os espaços em branco no início do texto. • Ex: x := trim(‘ Hildeberto Melo ‘); • X = ‘Hildeberto Melo ’; • TrimRight(string) – remove os espaços em branco no fim do texto. • Ex: x := trim(‘ Hildeberto Melo ‘); • X = ‘ Hildeberto Melo’;

  7. Funções • Inc(integer) – acrescenta uma unidade ao valor; • Ex: var x : integer; • X := 10; • Inc(x); • X = 11; • Dec(integer) - – decrescenta uma unidade ao valor; • Ex: var x : integer; • X := 10; • Dec(x); • X = 9;

  8. Funções • Strtoint(string) – converte um valor string em um valor inteiro. • Strtofloat(string) – converte um valor string em uma valor float. • Strtotime(string) – converte um valor string em uma valor hora. • Strtodate(string) – converte um valor string em uma valor data. • Strtodatetime(string) - converte um valor string em uma valor data/hora. • Strotocurr(string) - converte um valor string em uma valor moeda.

  9. Funções • Length(string) – retorno o tamanho de um texto. • Ex: var int x; • X = length(‘Hildeberto Melo’); • X = 15; • IntToStr(integer) – Converte um valor inteiro em um valor texto. • FloatToStr(float) – Converte um valor float em um valor texto.

  10. Funções • IntToStr(integer) – Converte um valor inteiro em um valor texto. • FloatToStr(float) – Converte um valor float em um valor texto. • FloatToCurr(float) – Converte uma valor float em um valor moeda.

  11. Mensagens • ShowMessage(texto) • ShowMessage('Hildeberto Melo');

  12. Mensagens • Application.MessageBox(texto da mensagem, titulo, ícone); • Application.MessageBox('Hildeberto Melo','Hand',MB_ICONHAND); • Application.MessageBox('Hildeberto Melo','Quaestion',MB_ICONQUESTION); • Application.MessageBox('Hildeberto Melo','Exclamation',MB_ICONEXCLAMATION); • Application.MessageBox('Hildeberto Melo','Asterik',MB_ICONASTERISK); • Application.MessageBox('Hildeberto Melo','Warning',MB_ICONWARNING);

  13. Mensagens • Application.MessageBox(texto da mensagem, titulo, ícone); • Application.MessageBox('Hildeberto Melo','Error',MB_ICONERROR); • Application.MessageBox('Hildeberto Melo','Information',MB_ICONINFORMATION); • Application.MessageBox('Hildeberto Melo','Stop',MB_ICONSTOP); • Application.MessageBox('Hildeberto Melo','Mask',MB_ICONMASK);

  14. Mensagens • MessageDlg(texto, tipo, botões): integer;

  15. Mensagens • MessageDlg(texto, tipo, botões); • MessageDlg('Hildeberto Melo',mtWarning,mbYesNoCancel,0);

  16. Mensagens • MessageDlg(texto, tipo, botões); • MessageDlg('Hildeberto Melo',mtInformation,mbYesAllNoAllCancel,0);

  17. Mensagens • MessageDlg(texto, tipo, botões); • MessageDlg('Hildeberto Melo',mtError,mbOKCancel,0);

  18. Mensagens • MessageDlg(texto, tipo, botões); • MessageDlg('Hildeberto Melo',mtConfirmation,mbAbortRetryIgnore,0);

  19. Mensagens • MessageDlg(texto, tipo, botões); • MessageDlg('Hildeberto Melo',mtCustom,mbAbortIgnore,0);

  20. Mensagens • MessageDlg(texto, tipo, botões); • MessageDlg('Hildeberto Melo',mtWarning,mbYesNoCancel,0); • MessageDlg('Hildeberto Melo',mtInformation,mbYesAllNoAllCancel,0); • MessageDlg('Hildeberto Melo',mtError,mbOKCancel,0); • MessageDlg('Hildeberto Melo',mtConfirmation,mbAbortRetryIgnore,0); • MessageDlg('Hildeberto Melo',mtCustom,mbAbortIgnore,0);

  21. Conexão Com Banco de Dados • 1ª parte da disciplina

  22. Criando Uma Conexão ODBC • Vá em: • Iniciar do Windows • Configurações • Painel de Controle • Ferramentas Administrativas • Fontes de Dados ODBC

  23. Criando Uma Conexão ODBC Para adicionar uma nova fonte clique no botão Adcionar

  24. Access • Aparecerá esta tela com os drives disponíveis para conexão • Vamos escolher o Driver do Microsoft Access (*.mdb) e clicar em concluir

  25. Access • Informar o nome da fonte de dados, ex: CTD2008 • Selecionar o Banco de Dados, clicando no botão selecionar

  26. Access • Informe onde está o arquivo do banco • Depois confirme clicando no ok

  27. SQL Server • Aparecerá esta tela com os drives disponíveis para conexão • Vamos escolher o Driver do SQL Server e clicar em concluir

  28. SQL Server • Informar o nome do alias • Escolher o servidor no qual deseja se conectar

  29. SQL Server • Após informado os dados clicar em avançar.

  30. SQL Server • Caso não haja um usuário definido no banco de dados escolher a opção Com autenticação do windows, caso contrário escolha a opção com autenticação do SQL Serve, nesse caso deverá ser informado o login e senha. • Clicar em avançar.

  31. SQL Server • Escolher o banco de dados no qual deseja se conectar. • Clicar em avançar.

  32. SQL Server • Aparecerá esta tela com opções de mudança de idioma e outras informações, não há necessidade de alterar as opções. • Clicar em concluir.

  33. SQL Server • Aparecerá esta tela com as informações da conexão • Clique no botão testar conexão pra verificar se está conectando com sucesso.

  34. SQL Server • Aparecerá esta tela com o resultado do teste. • Após estas etapas, basta ir clicando nos botões de OK/Confirmar e está concluída a etapa de criação da conexão.

  35. No Delphi • Abrir o Delphi e Iniciar um nova aplicação

  36. No Delphi • Adcionar um DataModule ao projeto

  37. No Delphi

  38. Table DataBase Paleta BDE

  39. Informar o Alias criado anteriormente No DataModule • Adcionar o componente DataBase Informar o nome do componente

  40. Propriedades do DataBase Colocar a opção LoginPropt para True Colocar a opção Connected para True

  41. Table Adcionar um Table No DataModule

  42. Table Informar o DataBaseName Ativar a Table Informar a TableName

  43. Adcionando os Campos a Table • Dar um duplo clique no componente Table1 do DataModule • Irá aparecer uma caixa, onde clicaremos com botão direito do mouse nesta caixa • Escolheremos a opção “Add All Fields” 3 2 1

  44. DataSource

  45. DataSource • Colocar um DataSource no DataModule • Escolher a tabela a qual irá se vincular 1 2

  46. Paleta DataControls DBGrid DBEdit DBNavigator DBText

  47. Form Principal • Colocar os Componentes DBGrid e DBNavigator • Fazer com que o Form Principal use o DataModule 1 2

  48. Form Principal • Vincular a propriedade DataSource do DBNavigator e DBGrid ao DataSource1

  49. Ir no Object Inspector do Form Principal e escolher a aba de eventos, o evento OnCreate

  50. Form Principal • Colocar os seguintes comandos abaixo, no evento OnCreate do Form Principal, para ativar a conexão com o banco de dados e ativar a tabela.