Ir para conteúdo
Fórum Script Brasil

Alessandro

Membros
  • Total de itens

    160
  • Registro em

  • Última visita

Tudo que Alessandro postou

  1. Eu fiz o teste e colocando o código no on show funciona...ou seja, quando o form carrega na memória ele tra o que tem no edit...mas se eu vou colocar mais de uma vez dá erro.... Reparei que esse não é o meolhor caminho, pois sempre será necessário criar a mesma coisa quando o form for aberto..... valeu galera....pode fechar...
  2. Como eu sei se a tabela está em modo de inserção ?? Você fala do Active := true ??
  3. Galera, é o seguinte Eu fiz o seguinte código : procedure TfmCadProd.btnSalvarClick(Sender: TObject); begin if Edit1.Text = '' then begin Messagedlg('Digite o produto!',mtWarning,[mbok],0); edit1.SetFocus; end else begin fmCadOsCancel.DBComboBox1.Items.Add(Edit1.Text); Edit1.Clear; btnFechar.setFocus; end; end; Eu estou utilizando o form : fmCadProd onde existe um edit1.text. Quando eu digito algo no campo e clico no btnSalvar quero que este texto vá para um ComboBox em outro form chamado fmCadOsCancel. O programa compilou sem problemas....só que quando eu clico no botão dá este erro aí Clica aqui pra ver o erro que esta dando Alguém sabe porque ? Alguém tem outra forma de fazer isso ?
  4. Alessandro

    Curiosidade

    Nossa, foram mais ou menos 1 acesso a cada dois minutos depois que eu postei... Bom, com esse título também..... Galera eu achei um artigo muito interessante sobre esse assunto....clique no link abaixo : Link para artigo sobre o QuickReport4
  5. Alguém sabe como gravar um arquivo com a extensão .QRP como arquivo com extensão .xls,.doc,.txt. Eu estou gerando um relatório, mas só pode ser visualisado pelo Delphi... Como eu faço para salvar em outras extensões esses relatórios ?
  6. valeu Cara....pessoal pode fechar....
  7. Então vai ser assim : query1.active := false; query1.sql.clear; query1.sql.add('SELECT Login,Senha * FROM dbCadUsu.db where Chapa = "' + edtMatricula.Text + '"'); query1.active:= true; ou Assim : query1.active := false; query1.sql.clear; query1.sql.add('SELECT dbCadUsu.Login,dbCadUsu.Senha * FROM dbCadUsu.db where Chapa = "' + edtMatricula.Text + '"'); query1.active:= true; ???????????
  8. Boa cara...funcionou valeu mesmo.... No botão alterar eu coloquei query1.post e alterou sem problemas....Não querendo dar um de chatão, mas já que chegamos até aqui....como ficaria minha consuta só para trazer duas colunas da minha tabela ? Por exemplo : Login e Senha, ou seja, quando eu consultar, no dbGrid aparecer somente duas colunas... Se não der td bem...
  9. >>Clica aqui para ver o erro Não rolou...eu coloquei o código no evento on click do botão query1.edit; E deu esse erro aí...
  10. A tela é essa aí. A propriedade Enabled está True; A propriedade Read Oly está False; Quando eu digito no edit, eu busco os registro e eles aparecem no dbgrid, só que não dá para alterar nenhum campo entendeu ? Se alguém souber como eu faço para alterar, valeu..... Obrigado galera....
  11. Eu estou usando paradox ... Quando eu disse bloqueados foi no sentido de "Os registros não podem ser editados". Eu quero fazer o seguinte: 1º Consultar o usuário através do seu código >>Eu consegui 2º Visualizar seu dados >> Eu consegui em um dbGrid. 3º Somente um ou dois registro ser alterado, por exemplo : Login e Senha. >>Não é possível, pois os registro não estão podendo ser editados no dbGrid.
  12. Galera, eu digito a chapa do usuário em um edit1.Text e faço a consulta normalmente : //no evento click do botão query1.active := false; query1.sql.clear; query1.sql.add('select * from dbCadUsu.db where Chapa = "' + edtMatricula.Text + '"'); query1.active:= true; //Esses dados aparecem em um dbGrid ------------------------------------------------------------------------------------------ A dúvida é : Porque os dados ficam bloqueados no dbGrid ? Eu gostaria que pudesse ser alterado o campo SENHA da minha tabela pelo dbGrid, é possivel?
  13. Funcionou pessoal.....valeu mesmo....
  14. Galera, gostaria de saber como eu abro um executável clicando em um botão ?
  15. valeu, eu descobri o que estava errado...na minha tabela , o campo E-mail tinha TRAÇO, por isso não aparecia......errei feio....não pode colocar nenhum tipo de caractere especial no nome das colunas.....hehe
  16. valeu Capablanca, eu comecei o sistema de outra forma para tiorar este detalhe....agora vou usar um form principal .... Assim eu faço PRIMEIRA ================================== procedure TForm1.FormCreate(Sender: TObject); begin WindowState := wsMaximized; end; ================================== e elimina o meu problema..... Abraço;......
  17. Inclua a unit DBITYPES na clausula uses do seu form. procedure TForm1.Table1PostError(DataSet: TDataSet; E: EDatabaseError; var Action: TDataAction); begin if EDBEngineError(E).Errors[0].ErrorCode = 9729 then ShowMessage('Registro já existe!'); Action:= daAbort; end;
  18. Gostaria de saber como eu faço para um Form se adaptar as configurações de video do meus windows ? Por exemplo : Eu faço um projeto em 800 X 600, mas depois eu mudo para 1024 x 760 o Form fica menor, ou seja, ele não se adapta.... Alguém como eu faço para isto não acontecer ?
  19. Gostaria de saber porque algumas colunas da minha tabela não está aparecendo no relatório, mesmo eu selecionando-as para que apareça.
  20. Se alguém souber algo a respeito responde aí...
  21. Então, fiquei sabendo de um componente chamado EQR Export, que exporta relatórios quick report p/ diversos formatos (PDF, JPG entre outros)... >>ELE ESTÀ DISPONÍVEL PARA O DELPHI 6 ? >>COMO EU UTILIZO ?
  22. Iae galera do forum, Eu estou precisando utilizar outro componente que dê para salvar os relatórios em outro formato (PDF,DOC...), pois o QuickReport não disponibiliza esta opção. Alguém conhece outra forma a não ser o QuickRep1.ExportToFilter(TQRHtmlExportFilter.Create('teste.html'));
  23. ERA ISTO MESMO RAPAZIADA......valeu... Ps. Os caras respondem na lata.....show de bola
  24. Galera do forum, gostaria de saber como eu faço para um Edit1.Text receber somente letras maiúsculas
  25. valeu cara....é melhor eu salvar mesmo....hehe
×
×
  • Criar Novo...