Jump to content
Fórum Script Brasil

TIA0

Membros
  • Content Count

    10
  • Joined

  • Last visited

Community Reputation

0 Neutro

About TIA0

  1. Só para constar! Editei o "programa" que acusava o erro e deletei o Form que representava o DataModule, após deleta-lo eu criei um novo DataModule, desta vez utilizando a forma correta! Com o novo DataModule criado, adicionei e configurei o ADOConnection e o Query... o resultado foi positivo, o programa passou a rodar perfeitamente! Resumo! O erro foi ter criado um "DataModule" em um Form abraços
  2. Gente... o problema acabou! Não sei se eu que dei jeito nele, ou se foi ele que se consertou sozinho auhauhuauhahuahua Com a cabeça fria e tempo sobrando eu resolvi refazer tudo, desta vez observando tudo com mais calma e atenção! No fim das contas só encontrei somente UMA coisa "errada"... o "DataModule" que eu criei foi feito em um Form ao invez de um DataModule mesmo... se funciona ou não desse jeito eu não sei, só sei que depois que eu refiz tudo de novo e SOMENTE com o DataModule diferente o login funcionou! Enfim... por hora o problema acabou, farei mais testes e qualquer coisa peço aj
  3. Desculpa, foi uma falta de atenção minha! O lance das figuras é o seguinte, você clica uma vez e o site da Imageshack abre, com o site aberto você clica na lupa que fica de baixo da foto e ela aumenta a imagem para tamanho real... que no caso é 1440x900. Link Ampliado - http://img199.imageshack.us/img199/1692/59668184.png Link Ampliado - http://img413.imageshack.us/img413/9889/91793149.png A principio o programa abre normalmente! Porem quando eu aperto o botão de "logar" aparece a seguinte tela de erro! Project Project1.exe raised exception class EAccessViolation with message 'Acess violati
  4. Jhonas... Eu acessei os links e baixei tudo, testei... todos funcionaram! Se eu COPIAR/COLAR funciona, mas seu eu tentar implementar dá erro!!! kuroi Simm... eu estava achando que era o SQL tambem, por fim acabei mudando o método, mas ainda não consigo exito! RESUMO... depois de varias tentativas eu consegui isolar o problema, caso alguém possa me dar uma ajuda... estou postando a tela de erro e aonde o erro aparece! unit UnDM; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ADODB; type TDM = class(TForm) AcessADO: TADO
  5. Boa noite, Estou tentando fazer um Tela de Login com Banco de Dados em Access, porem sempre que tento fazer o login o Delphi me retorna uma mensagem de erro! Estou quase certo que o problema está na declaração SQL... Outra coisa! Fiz uma validação para conferir se os campos estão em branco, mas o Delphi acusa um erro e pula a ação! procedure TLogin.btt_logarClick(Sender: TObject); var Login, Senha: String; begin Login := edt_login.Text; Senha := edt_senha.Text; if (Login = '') Or (Senha = '') then begin Application.MessageBox('Campo de Usuário ou Senha em
  6. Boa tarde, Estou precisando importar somente determinados dados de uma planilha para outra, mas não estou vendo jeito para isso! Imaginem a seguinte planilha... ESCOLA...|NOME...|NOTA| ESCOLA A|Márcio..|8......| ESCOLA A|João.....|7......| ESCOLA C|Augusto|4.....| ESCOLA B|Camila..|7.....| ESCOLA B|Roberta|8......| ESCOLA C|Felipe...|3......| Ou seja, uma planilha com o nome da escola, nome do aluno e a sua nota. Como podem ver a planilha não tem ordem! Preciso descobrir um jeito de somente esportar os alunos da "ESCOLA A" para outra planilha, alguém pode me ajudar? abraços
  7. Obrigado a todo pela ajuda! Consegui dar jeito no combobox!!!
  8. Então... não tem muito código, estou tentando somente preencher o combbox ao inicializar o form... da uma olhada e me diz o que pode ser! abraços
  9. Eita... que mole que eu dei :/// mas tipo, concertei lá, deu um "msgbox" antes volto o intervalo correto! Porem da erro 13 "tipos incompatíveis"... terei que converter a sequencia final para string e ai então utiliza-la?
  10. boa tarde, estou tentando preencher um combobox, porem esta gerando um erro! O código que estou usando é o seguinte... total = ThisWorkbook.Worksheets("Plan3").UsedRange.Rows.Count cmb_mat_situ.RowSource = ThisWorkbook.Worksheets("Plan3").Range("A2:A & total").Rows como devo proceder? abraços
×
×
  • Create New...