Re: [delphi-br]
Olá Leonardo, Tente o Seguinte: DtmDados.cdsFunc.Open; for i := 0 to dbgrid1.SelectedRows.Count - 1 do Begin DtmDados.cdsFunc.GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i])); DtmDados.cdsFunc.Edit; *DtmDados.cdsFunc.Filtered := False;* *DtmDados.cdsFunc.filter := 'ID_FUNC = '+ String_com_o_codigo_do_funcionario;* *DtmDados.cdsFunc.Filtered:=true; *DtmDados.cdsFunc.FieldByName('NOTA').AsString:=edNota.Text; DtmDados.cdsFunc.Post; End; Talvéz você possa utilizar esta propriedade do Filtered de outra forma, de maneira que atenda sua necessidade. Lembrando. O Filtered atua como um and no SQL. boa sorte! Alexandre Macedo 2006/10/5, Leonardo Ribeiro [EMAIL PROTECTED]: Estou com o seguinte problema utilizo o codigo abaixo pra modificar o campo notas para vários registros em um dbgrid: i: Integer; begin DtmDados.cdsFunc.Open; for i := 0 to dbgrid1.SelectedRows.Count - 1 do Begin DtmDados.cdsFunc.GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i])); DtmDados.cdsFunc.Edit; DtmDados.cdsFunc.FieldByName('NOTA').AsString:=edNota.Text; DtmDados.cdsFunc.Post; End; Funciona direito quando tenho todos os registros do BD no dbgrid, mas quando faço uma pesquisa por exemplo por empresa não dá certo, porque ele ta modificando baseando na linha do DBGrid( DBGrid1.SelectedRows.Items[i]), e eu preciso que ele baseie no campo ID_FUNC, que é o registro do usuário, alguem sabe como fazer? -- Leonardo Ribeiro (DarkAvenger) MSN: [EMAIL PROTECTED] Ipatinga - MG Slackware is the real nerds [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Iniciante com duvidas...
Olá Cláudio, Sou Analista de Sistemas a mais de 5 anos. Já trabalhei com o VB no início e me adaptei para o Delphi neste período. Em todos os projetos em que me envolvi o Delphi permitiu que eu pudesse resolver absolutamente todas as questões sobre o projeto do software com uma boa otimização do trabalho. Não sei se ajudou mas aí vai minha sugestão. Sds, Alexandre Macedo Especialista em TI Aplicada Gestão Estratégica dos Negócios 2006/10/4, claudio.saocarlos [EMAIL PROTECTED]: Bom dia a todos do grupo. Sou um antigo rpogramador em Clipper 5,2 e estou definitivamente decidio a mudar para programação orientada a objetos. Tenho duvidas sobre qual linguagem me aprofundar e gostaria que as pessoas do grupo com conhecimento em Delphi e VB pudessem me ajudar a tomar esta decisão. Gostaria de saber quais são os prós e contras que existem entre as duas linguagens. Para que tipo d eaplicativos uma é melhor que a outra, etc... Tenho que admitir que tenho uma queda para o Delphi, alias ja fiz pequeninhas coisas em delphi a alguns anos atras, mas gostaria da opinião de pessoas com amis conhecimento que eu. Desde ja fico agradecido aos que puderem me ajudar. Arabço Claudio [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] [urgente] propiedades de componente
Olá Rafael, Bom os componentes que possuem a propriedade Text a exemplo do Edit são herdados da Classe TEditCustom. Por isso você póderá utilizar o seguinte: for i:=0 to TForm(sender).ComponentCount-1 do if TForm(sender).Components[i] is TCustomEdit then begin (TForm(sender).Components[i] as TCustomEdit ).Text := ''; Espero ter contribuído. Sds, Alexandre Macedo 2006/10/6, Rafael Jorge [EMAIL PROTECTED]: como eu faço pra saber se tal compomente tem uma determinada propiedade?? exemplo eu quero varrer o form e apagar os textos de todos os compomentes que tem a propiedade text. ai faria assim... for i := 0 to self.componentscount -1 do if (fu) self.components[i] (funcao que diz se tem a proiedade ou nao) -- Rafael jorge alves www.itrecife.com - para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html