Ir para conteúdo
Fórum Script Brasil

Vivendo&Aprendendo

Membros
  • Total de itens

    856
  • Registro em

  • Última visita

Tudo que Vivendo&Aprendendo postou

  1. Ola amiguinha o COMBOJ é tudo isso que foi dito acima, ela possui os procedimentos e funções para executar isso que você quer... Acho que deu para entender... Qualquer duvida posta ai falou
  2. Amigão não entendi muito bem, mas porque usar a Scroll, sendo que pode usar o formato de aplicação MDI, dessa forma seus forms sempre serão visiveis pelo usuario e caso o form seja maior q a tela principal a aplicação coloca as barras de rolagens automaticamente... Repito é só uma idéia porque não entendi muito bem o seu problema. falou V&A
  3. Olá tenta da seguinte forma. No evento OnClick do botão coloque os seguintes comandos: var IE : Variant; begin IE := CreateOleObject('InternetExplorer.Application'); IE.Visible := true; IE.Navigate(NOME_DO_EDIT); end; Declare na clausula USES: comobj Testei aki e funcionou certinho, não sei se é realmente isso q você esta procurando, mas esta ai. Testa e posta o resultado. falou V&A
  4. O campo na tabelda deve ser ObjetoOLE, mas eu aconselho a usar texto e salvar apenas o caminho da foto, ou seja, o local em que o arquivo da foto se encontra no HD. Mas lembrando isso é opinião MINHA. falou
  5. Você também pode selecionar no evento OnClick do botão o mesmo evento que esta declarado no onclick do menu; falou
  6. cara você pode baixar botões diferentes e skins tb, mas na minha opinião não usaria isso porque de uma certa forma fica mais lenta a aplicação... falou
  7. A tela é da seguinte forma: Tem um campo para Congregação, Tipo Entrada, Valor Unitário e Valor Total, sendo: Congregação e Valor Total da tabela Entrada e o restante da tabela ItensEntradas, mas o problema é o seguinte como as tabelas estão relacionadas pelo código e uso o banco Access ele só grava o código depois de salvar então fiz da seguinte maneira quando o foco sai do primeiro campo que o Congregação ele já salva o código pois ai todos os itens de entradas devem conter esse código. Já tentei editar a tabela entradas depois de salvar para pegar o valor total e altarelo conforme vou digitando no campo valor Unitário mas esta dando erro: Esta linha não pode ser atualizada. falou
  8. Galera meu sistema tem duas tabelas: Entradas ItensEntradas Na tabela de entradas possuo o campo Valor Total e na tabela de itensEntradas o campo valor. Quero que ao digitar no campo valor o campo valor total receba o calculo total dos itens da entrada. Ex: Picolé 1,00 Sorvete 2,00 Valor Total 3,00 falou
  9. beleza entendi o que você disse, mas como faço para o usuário digitar os cursos no grid e quando chegar no final, ou seja, no ultimo campo e tiver mais cursos ele der um enter e o grid criar outra linha em baixo já com o foco nela? falou
  10. O relacionamente q fiz no access esta um para muitos de membros para cursos e no delphi estou usando um adoquery para membros e outro para cusos e um ado conecta via master source para mostrar no grid somente os cursos do determinado membro. a sql esta normal Select * from membros. select * From cursos .... Me da uma idéia de como posso fazer isso de outra forma. falou
  11. cara eu entendi o que você quis dizer, mas nesse caso a estrutura não esta correta? esses comandos estão no OnExit do edit, ou seja, quando o usuário tirar o foco do edit ele pergunta se deseja incluir mais cursos, caso sim ele salva o que já esta no edit e abre outro registro se não ele só salva o que já esta no edit. Na sua opinião qual seria a melhor forma de fazer essa estrutura? falou
  12. Galera tenho duas tabelas uma de membros e a outra de cursos todas ligadas ao mesmo form, onde devo cadastrar o membro e todos os cursos q esse determinado membro já fez... o erro é o seguinte se eu adicionar somente um curso ele aceita beleza mas se tento adicionar mais de um curso ele da erro. o erro é o seguinte: Não é possível adicionar ou alterar registros, pois é preciso que eles tenham um registro ralacionado na tabela membros. Estou usando o comando APPEND e POST. E para aidicionar mais de um cursos estou usando os seguintes comandos: If Application.MessageBox('Deseja adicionar mais registros?','Alerta',MB_YESNO)=6 then begin DmDados.Cursos.Post; DmDados.Cursos.Append; DmDados.CursosRgMembro.Value := DmDados.MembrosRg.Value; EdtCursos.SetFocus; end else DmDados.Cursos.Post; Por favor me ajudem...
  13. Galera o problema é o seguinte, estou fazendo um sistema para uma igreja, e estou fazendo uma tela com os versiculos biblicos, mas o problema esta ai, tem versiculo que é maior do que a capacidade da linha do grid e no memo ele só traz uma linha de cada vez e teria que trazer todas... Como posso fazer com q o grid aceite todos os caracteres da linha sem cortar a frase? falou
  14. cara usei o APPEND pois ao executa-lo o delphi joga ele para o ultimo registro da tabela e ai adiocina um novo registro, o INSERT e o EDIT adiciona o registro no lugar onde o ponteiro esta... teoricamente os três deveriam dar certo já que minha tabela só contem um campo chamado horas, mas infelizmente nenhum deles está dando certo. Não sei mas o que fazer e preciso terminar esse projeto. Por favor me ajudem. falou
  15. Olá!!! No seu projeto, ou seja, no arquivo .Dpr coloque a seguinte linha de código antes do comando: Application.Run; coloque isso: FrmSenha.ShowModal; No form principal coloque: FrmSenha.Hide; Basicamente é isso... qualquer coisa posta ai... falou
  16. Pode ser McBlade... Me passe ai essa rotina q vou testar. falou
  17. To usando os seguintes códigos: Para inserir: EdtHorario.Enabled := true; BtnCancelar.Enabled := True; BtnSalvar.Enabled := True; BtnAgendar.Enabled := False; BtnExcluir.Enabled := False; AdoQryHoras.Append; EdtHorario.SetFocus; EdtHorario.Clear; Para Salvar: AdoQryHoras.post; EdtHorario.Clear; BtnCancelar.Enabled := False; BtnSalvar.Enabled := False; BtnAgendar.Enabled := True; BtnExcluir.Enabled := True; E não esta adicionando um novo registro mas alterando o que já existe falou
  18. Como faço para criar um form não retangular, mas tb não redondo, quero criar um form igual uma imagem, ou seja, tenho uma imagem de um cadeado então quero que meu form seja igual essa imagem e não apenas colocar um image e chamar a imagem... falou
  19. cara já não da... num sei o q pode estar acontecendo aki. falou
  20. deixe a propriedade CharCase como UpperCase. V&A
  21. cara para aceitar somente numeros segue abaixo: procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); var cValor : Char; begin if ( Key in ['.',','] ) then begin Key := #44; if Pos(Key,cValor) <> 0 then Begin Beep; Key := #0; End; End; if not ( Key in ['0','1','2','3','4','5','6','7','8','9',',',#8,#7] ) then Begin Beep; Key := #0; End; end; agora para aceitar somente letras creio q tb aceitará numeros por se tratar de uma string. da para fazer o seguinte: clicar em um botão e só aceitar numeros. clicar em outro botão e aceitar qualquer coisa.. falou espero ter ajudado. V&A
  22. Olá galera! meu problema é o seguinte: Tenho dois forms, em um eu cadastro dados no banco e no outro eu faço uma pesquisa de acordo com o timer. O problema é que quando adiciono somente um registro funciona certo, mas quando vou adicionar mais de um ele não salvar o outro ele simplesmente não da o append mas sim o edit e ai ao invés dele adicionar outro registro na tabela ele simplesmente altera o que já existe. Como posso mudar isso. Estou usando Access, comandos append, post e delphi 7. falou
  23. - VITORBRANDO - é isso mesmo que eu quero, mas preciso fazer isso via código e funcionar quando eu clicar em qualqer lugar não só em pastas ou arquivos. cara vlw pela ajuda e se você souber fazer isso por favor me ensine ai to precisando mesmo. - MACKS - To aguardando o código que você falou que tem... Vlw também.. Alexandre - V&A
  24. cara posta ai a sua duvida que ai a galera poderá te ajudar... falou
  25. Ae galera esse ta resolvido utilizaei um componente muito legal e fácil... Segue ae o link para download do componente que é totalmente free... http://www.torry.net/vcl/forms/appearence/tmsnpopup.zip KIKONANET vlw pela ajuda V&A
×
×
  • Criar Novo...