1 / 143

Desenvolvimento de Aplicações Desktop Delphi

Desenvolvimento de Aplicações Desktop Delphi. Prof. Melo. 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.

zuzana
Télécharger la présentation

Desenvolvimento de Aplicações Desktop Delphi

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

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.

More Related