Progr'amador

Olá, Eu acho que o Table não reconhece o '%' como na Query, use * que vai da certo. Table1.Filter := 'NOME = '+#''''+Edit1.Text+'*'+''''; Table1.Filtered := True; Abs. Progr'amador.

Valeu Graymalkin, Como falei nunca usei Table, sempre uso Query. Brigado pela correção! Abs. Progr'amador.

onde tem tres aspas, coloque quatro. de: Table1.Filter := 'Nome ='+ ''''+ Edit1.Text + ''' +'%''; para: Table1.Filter := 'Nome ='+ ''''+ Edit1.Text + '''' +'%''; Abs. Progr'amador.

não tenho certeza mas tenta isso: QueryBuscaCd.Close; QueryBuscaCd.Sql.Clear; QueryBuscaCd.SQL.Text := 'Select NUMERO,TITULO,GENERO,QTDCDS,STATUS,' + 'QTDXEMPRE,ULTCOLEMP From Cad_Cd Where TO_CHAR(CONTEUDO) Like :Busca'; QueryBuscaCd.ParamByName('Busca').Value := '%' + EditBusca.Text + '%'; QueryBuscaCd.Open; Abs. Progr'amador.

Tenta isso: SELECT COUNT (*) AS QtdeProcs FROM Processos INNER JOIN Docs ON Processos.Nro_Proc = Docs.CodProc INNER JOIN Log_Usuarios ON Docs.CodBarras = Log_Usuarios.Cod_Doc WHERE Fase = 1 AND Data Between to_date('01/01/2005','dd/mm/yyyy') AND to_date('04/15/2005','dd/mm/yyyy') Abs. Progr'amador.

1º - Deletar Delete from Pessoas Where Nome = 'Wellingtom' 2º - Aumentar Salario 20%. Vê se isso resolve: Select Salario+(Salario*20/100) Salario from Funcionarios Abs. Progr'amador.

Observe que na sua Select você esta trazendo somente o Campo Nome, use o asteristico(*): 'Select * from Dados Abs. Progr'amador.

já tive proplemas como esse, engraçado que no segundo if num precisa de parentes, ele funciona legal. pra mim isso tem outro nome: BUG - "Comigo é no popular" Abs. Progr'amador.

deve estar entrando no else e limpando os campos antes de inserir, vê que o COD vem de um Label e no else ele não limpa esse label. pode sê isso! Abs. Progr'amador.

Olá Carla, Eu num vi erro ae não! Só uma sugestão: Porque você num usa a propria select pra verificar se existe o nome, tipo: Abs. Progr'amador.

Olá DELPHI-Man32, Qual o erro que ta dando ae? você já tentou usar o FieldByName, tipo: Abs. Progr'amador.

Num sei e eu entendi, o que você está falando é deveria entrar o primeiro if? é isso? bom se for coloque as variaveis a e b entre parenteses, tipo: var a,b:Boolean; Baiti:Byte; begin a := true; Baiti := 2; Move(Baiti, b, 1); if (a) and (b) then ShowMessage('b é true') else if a and not b then ShowMessage('b é false'); end; Abs. Progr'amador.

Olá hencker, eu nunca usei esse Filter, na verdade não uso Tabale! mas acredito que você devieria tirar esse FIRST (Prinmeiro), do jeito que ta, ele vai filtar e sempre vai voltar pro primeiro registro. estou certo ou errado??? me corrigem se estiver errado! Abs. Progr'amador.

Então seja bem vindo dinovo, sua ajuda será bem vinda! Oke você leu? Abs. Progr'amagor.

Desculpe-me mas não entendi. Poderia reformular sua pergunta com mais detalhes? Abs. Progr'amador

Qual a versão do seu dephi? E onde você está imprimindo? Seria no QReport? Abs. Progr'amador.

Olá OSJunior, TshFileOpStruct é uma estrutura que contem informações de copia, exclusão e movimentação de arquivos ela faz parte da função ShFileOperation, definida em ShellApi.pas Abs. Progr'amador.

Olá, é como o Kikonanet falou realmente, mas você teria que substituir os campos NULL por zero dentro da Select pra evitar erro, verifique se eu banco suporta a função NVL, tipo: SQL.Add('Select Nvl(CAMPO,0) CAMPO From tabela1'); usando o mesmo código que o Kikonanet passou, ficaria assim: E se num aceitar essa função NVL faz assim: Abs. Progr'amador.

Ue!?!?!? O SaveDialog já faz isso sozinho, basta executar: SaveDiaglog1.Execute;

Não é por méritos! o Kikonanet tambem colaborou só achei engraçado! Fechado.

É so fazer a select em modo de execução tambem: Vamos supor que você esteja usando um Edit1. pra fazer a busca. entendeu? mas se você quizer o * mesmo, podemos fazer uma implementação pra subistituir o * pelo % na select: fica até mais bonitinho! com asteristico * Progr'amador.

Olá, tenta usar o WHILE em vez do for. Table1.First; while not Table1.EOF do begin // bla, bla ... Table1.Next; end; Abs. Progr'amador.

Olá kikonanet, Colocar no evento do Form funciona se o butão tiver diretamente no form, se tiver dentro de um Panel por exemplo, o mouse ira passar primeiro pelo panel, com isso o cursor não estara mais em cima do butao e continuara do mesmo jeito ate o mouse chegar no form. felipe_pr, Em vez você usar 2 bitbtn você poderia usar só um. Adicione no form um componente TImageList, e adicione as duas imagens dentro do ImageList, vamos supor nessa ordem: 0 = porta fechada; 1 = porta aberta. Ae no MouseMove do Botao coloque: e no MouseMove do Form ou do objeto mas proximo do BitBtn (Caso o BitBtn não esteja diretamente no form) você usa esse: Entendeu? Abs. Progr'amador.

Se você usar Query, você pode usar o "%" nos filtros, tipo assim: Select * from tabela where campo like 'texto%' Num sei se é isso, especifica melhor o que você quer fazer, ainda ta muito vaga suas pergunta. Abs. Progr'amador.

Como assim? filtrar onde??