nsouza

Exatamente, é isso que acontece o grid, você estendeu. Quanto a tblOrdemServico você tb esta certo é uma tabela. >A tblOrdemServico tem a chave primaria IDOS >A tblMaterialGasto tem uma chave primaria IDMaterial e um chave estrangeira IDOs > O campos do meu formulário estão ligados a tblMaterialGasto, no formulário eu digito no campo edtOrdemServico e o grid que esta ligado a qryMaterialGasto, mostra os valores >Eu preciso que quando digito o numero da O.S no campo edtOrdemServico ele atualiza o grid, mas se o numero da OS não existir na tabela principal tblOrdemServico, ele retorna a mensagem conforme lhe expliquei. obrigado.

Você fala em datagrid - estamos falando de programação .NET? Se for um programa Win32, o componente seria um DBGrid. Faz diferença saber isto. O sentido de ligação é do detalhe para o mestre, ou seja, o seu dataset tblOrdemServico deve apontar para o MasterSource do dataset tblMaterialGasto (se não entendi errado quem é mestre e detalhe). Vocês está usando um DBGrid para a edição dos dados? Se for, você quer digitar o número da OS em uma coluna e visualizar os dados dela em outras duas colunas? Abraços Estou usando o TDBGrid, desculpe. Eu preciso do seguinte: digitar o numero da OS no campo edtOrdemServico e o dbgrid mostrar os dados relacionados a esta OS. Na verdade Micheus, quebrei cabeça e consegui fazer o filtro, adicionei um query no TDBGrid, meu problema agora ´´e o seguinte. Quando a ordem de serviço não existir ele me retornar a mensagem " Ordem de Serviço não existe!" tentei fazer desta forma: if key = #13 then begin dm.tblOrdemServico.Close; dm.tblOrdemServico.open; o formulario onde coloquei este codigo esta acoplado a tblMaterial que tem a chave estrangeira da tabela tblOrdemServico Esta linha consulta na tabela tblOrdemServico, se existe numero da ordem de servico if (StrToInt(edtOrdemSevico.Text)) = dm.tblOrdemServico.FieldByName('IDOS').AsInteger then begin ShowMessage('Ordem de serviço não existe'); dbDescricao.Clear; edtOrdemSevico.SetFocus; exit; end else begin aqui execute uma procedure material; end end; Qual o resultado deste codigo: quando digito a OS 1 retorna a mensagem " Ordem de Serviço não existe!" - Mas esta OS existe quando digito a OS 2,3,4,5 o DBGrid atualiza Quando digito uma OS que não existe por exemplo 21, o DBGRID, fica branco ao invés de retornar a mensagem " Ordem de Serviço não existe!" Este agora e o problema!

Colegas tenho um formulario MaterialGastro com os campos edtOrdemServiço (TDEdit) tenho tabem um datagrid com os campos IdOrdemServilo (chave estrangeira) Descricao Valor Gostaria que quando eu digita a OS numero 001 no formulario so aparecesse o material da OS 001 no data grind mas esta aparecendo a da OS 002 Usei a propriedade Master Source ligando a IDOs (tblOrdemServico-chave primaria) ligando a IDos(chave estrangeira da tblMaterialGasto) mas ainda não esta filtrando, o que fiz de errado? Quando navego e pula para OS 002 não filtra. Obrigado

alguém poderia me orientar com qual ferramenta grafico ou posso usar como o banco de dados Firebird, vou começar o curso sobre esta banco de dados. baixei o mysql-front mas acho que não da para usa-lo. Obrigado

Colegas, 1- tenhum um form de ordem de serviço, gostaria que quando alguém fosse digitar uma ordem de serviço e ela já existisse, no evento ao sair do campo retornasse a mensagem "Numero já cadastrado" 2- Preciso tb do contrario, quando não existisse a Ordem de Serviço retornasse a mensagem" Este número não foi cadastrado" a tabela é: tblOrdemServico o campo NumOs Desde já obrigado!

Obrigado, funcionou corretamente! Coloque este código no evento OnExit do componente procedure TForm1.DBMemo1Exit(Sender: TObject); begin DBMemo1.Lines.Text := UpperCase(DBMemo1.Lines.Text); end; abraço

Coloquei no evento onEnter do campo, quando mandei executar deu a mensagem que a minha tabela não tava no modo de edicao ou inserção. Tem como criar este procedimento quando eu clicar no botão novo? Coloque no envento OnEnter do componente dbDataCadastro.Text := datetostr(now); abraço

Estou usando o DM.tblFuncionarioFieldByName('UF').Value, achei mas facil e funcionou. Agora quanto ler, amigo, é o que mais estou fazendo, um dia teria que megulhar na programação, Li um livro de visual basic net de 1350 paginas, mas confesso que não da para memorizar ou capitular tudo na hora de programar. Obrigado pelos conselhos, disposição e paciencia com quem esta começando. As palavras de Mateus 7:12 se cumprem no caso de vocês. Força sempre!! Isto você disse no post#3 E depois de reportar o erro, o Jhonas lhe fez esta pergunta no post#6 identificador não declarado: "Value" Este é um campo da sua tabela ? e se for, ele é string ou integer ? e no post#7 você mostra sua incerteza Na verdade ele está incorreto! Isto acaba acontecendo porque quando tentamos exemplificar, usamos nomes hipotéticos - não sabemos qual o nome que o "questionador" deu a sua tabela (não sabemos sequer, se é uma table ou uma query), campo, ... Então, neste caso, como estava sendo tratado de UF, este exemplo deveria ser adaptado ao seu caso, logo não poderia ser TIPO, mas sim UF: DM.tblFuncionarioUF.Value; Isto levando em consideração que você tenha adicionado os campos (Fields) ao seu dataset (table ou query). Porque do contrário, ainda teríamos a questão pensar no uso de DM.tblFuncionarioFieldByName('UF').Value Pela dúvida, percebe-se que você não deve ter lido algum material que lhe explique como usar trabalhar com banco de dados e foi logo se jogando a programar, pois do contrário, você estaria usando TDBComboBox (como já sugeriu o colega Jhonas) - seria a opção mais simples para quem está começando - usaria componentes data-aware. Dê uma olhada nesta apostila Banco de Dados com Delphi (ref. Apostilando.com), ela é adequada ao iniciante, já que passa os conceitos básicos e acredito que você compreenderá que são estes componentes. Os bancos mudam, os componentes de acesso também, mas o conceito (a idéia) sobre como você interage com eles é sempre a mesma. Bom estudo e não desanime.

Se não se importar envia para mim tb, nilojf@gmail.com, tenho interesse neste material. Obrigado desde já!

Tenho um componente TDBMemo chamado no formulário de dbSolicitacao, gostaria que após digitar o texto ele convertesse tudo para maiuscula. Tem como fazer isso? Obrigado nlsouza

Bom dia, tenho um campo chamado dbDataCadastro no formulario, no banco de dados em SQLSERVER o formato esta "datetime", no campo "dbDataCadastro" do formulário tem um mask edit (!99/99/0000;1;_), eu gostaria que ao clicar no botão Novo Registro (bitNovo) adiciona-se a data atual neste campo. Tentei a função DateTime, mas disse que não aceitava o argumente. alguém pode ajudar?

o que mais tenho feito é lido, mas com sou iniciante, e como todo iniciante ainda tenho dificuldade em aplicar tudo o que leio, fiz exatamente como mandou, cliquei duas vezes e apareceu todos os campos que já estavam lá, somente atualizei depois deu esse erro. Mas tudo bem! Muito obrigado por tentar ajudar ...

Deu a mensagem " Undeclared indentifier: 'tblFuncionarioTIPO" o mesmo problema que te disse antes, lembra?

identificador não declarado: "Value" Este é um campo da sua tabela ? e se for, ele é string ou integer ? o Combobox está retornando uma string abraço Este campo é do tipo TEXTO o meu banco de dados é em access, este campo e para salvar o estado (MG) por exemplo. DM.tblFuncionarioTIPO.Value; esta correto o codigo acima usando essa palavra TIPO?

Fiz o que você orientou e ficou desta forma. O DM é o datamodule que esta a tabela funcionario mas deu o seguinte erro: Undeclared indetifies: "Value" DM.tblFuncionario.Active :=true; DM.tblFuncionario.Edit; DM.tblFuncionarioTIPO.Value:= ComboBox1.Items.Strings[ComboBox1.itemindex]; (Foi para esta linha que apontou o erro) DM.tblFuncionario.Post;

voce pode usar o componente DBComboBox que tem acesso ao banco de dados diretamente mas se quiser mesmo usar o Combobox voce deve fazer referencia ao campo da tabela exemplo procedure TForm1.ComboBox1Click(Sender: TObject); begin Query1.Active := true; Query1.Edit; Query1TIPO.Value := ComboBox1.Items.Strings[ComboBox1.itemindex]; Query1.Post; end; abraço entendi um pouco, o campo da minha tabela se chama UF a tabela se chama Funcionario, como ficaria este codigo usando o campo no envento click do botão? Este Query1 é algum componente que eu tenho que colocar? Por curiosidade talvez seja mais facil para mim, se eu usar um DBComboBox eu consigo digitar manualmente os Estados do país ou tenho que criar uma tabela para ele buscar os dados? Como é algo que não alterarei eu preferiria digitar os dados diretamente no combobox! Obrigado.

Colegas, assim com muitos estou começando no delphi, minha duvida com certeza será banal para você's experientes. To fazendo um sitema que tem um TCombobox onde digitarei os estados (UF) como faço para que este compontente guarde os valores na tabela, não encontrei a propriedade DataField para associar esses valores Obrigado NSouza

Obrigado pela dica o pouquinho que mexi vi que é só beleza, prefiro o visul basic.net é mais completo vou ficar com a versão 7 mesmo!

Colegas, estou trabalhando com o Delphi 8 alguém tem algum tutorial sobre como fazer conexão com um banco de dados em Access? No Delphi 7 é tranquilo mas no 8 não consegui... Obrigado nlsouza

Colegas, sou iniciante no mundo Delphi e quando executo meu programa da a seguinte mensagem de erro: "Project estoque.exe raised exception class EClassNotFound with massage 'Class Tpanel not foud". Process stopped. Use stop or ran to continue" Como faço para resolver este problema?

Colegas, bom dia! Sou iniciante do Delphi, alguns dizem que ele não faz conexão com alguns banco de dados ou se faz precisa de programação especial, um exemplo que me disseram foi a conexão com o MySql 5 que o delphi não faz. Estou baixando o SQL Server 2005 Express Edition (gratis) , o delphi faz conexão com esse Bando de Dados? Desde já obrigado. nlsouza

Colegas, Tenho um banco de dados protegido em nivel de usuário. As restrições eu faço através da linha de comando CurrenteUser(). para por exemplo desativer ou deixar um botão no formPrincipal invisivel. No entanto gostaria de fazer o mesmo trabalho mas usando a identificação pelo pelo grupo. Tentei CurrentGroup() mas não deu certo. Aguém poderia me ajudar? Obrigado, Att, n.souza

Ola colegas! As respostas que achei não me satisfez! Tenho um controle de combustivel com tres campos Data, kmAnterior, KmAtual. Gostaria que quando aparecesse uma nova linha de registro no formulario continuo, o campo kmAnterior herdasse o valor do KmAtual Exemplo: Data kmAnterior kmAtual 29/12/07 350 400 01/01/08 ""400"" 450 (esta é a nova linha de registro com o valor kmAnterior que herdou o valor do kmAtual anterior "linha anterior") Gostaria de um codigo se possivel. Tentei fazer e não consegui. Obrigado!