[delphi-br] Função para gerar WHERE de busca com like

2006-01-18 Por tôpico Gabriel Dimas Pereira Assis Filho
Olá pessoal Recentemente tive acesso a uma rotina em asp que montava uma string sql para busca, não sei que é o autor, mas a adaptei para delphi e a transformei em uma funcão, segue abaixo a mesma para quem quiser usar: function StrSQLBusca(Campos: array of string;

[delphi-br] localizar arquivos em todo o HD

2005-07-01 Por tôpico Gabriel Dimas Pereira Assis Filho
Bom dia, Queria saber se algem tem uma função para listar todos os arquivos de um disco. Desde já agradeço! -- 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,

Re: [delphi-br] Delphi 7 + ADO + Sql Server

2005-01-07 Por tôpico Gabriel Dimas
se vc estiver usando comando SQL para fazer a insersão, é necessário que vc feche, e depois abra novamente a query para que a consulta seja atualizada e o novo dado seja vizualizado, caso vc esteja usando uma ADOTable , não precisa. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM

Re: [delphi-br] Consulta e Edição em um TDBGrid

2005-01-05 Por tôpico Gabriel Dimas
Olá, amigo... Coloque um TUpdateSQL, e na TQuery, na propriedade UpdateObject ligue o UpdateSQL. Obs.: No TQuery Tem uma outra propriedade, RequestLive, que qdo está como true, lhe retornará valores autocalculados pelo banco de dados ex.: o valor de um campo autoincremento. Mas vc só

Re: RES: [delphi-br] Diferençã entre horas

2004-12-10 Por tôpico Gabriel Dimas
Use estas funções q desenvolvi converta para real faça as devidas operações depois converta novamente!! Function TempoparaReal(Const Tempo:string ):Real; Var P_1,P_2,P_3:string; begin P_1:=copy(Tempo,0,Pos(':',Tempo)-1); P_3:= copy(Tempo,Pos(':',Tempo)+1,length(Tempo));

Re: [delphi-br] Re: SELECT EM DATAS

2004-11-16 Por tôpico Gabriel Dimas
se vc estiver usando DateTimePicker, faça o parametro receber (DateTimePicker.Date -1) caso seja um dia -- 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,

Re: RES: [delphi-br] Preciso arrumar esse letreiro urgente

2004-11-16 Por tôpico Gabriel Dimas
Faça assim: declare o iSoma emprivate { Private declarations } e passe o valor 1 qdo criar o form procedure TForm1.Timer1Timer(Sender: TObject); var sMostra, sTitulo : string; begin sTitulo := 'KOBRA SISTEMAS'; if Label1.Caption = '' then Label1.Caption:= sTitulo

Re: [delphi-br] SELECT EM DATAS

2004-11-11 Por tôpico Gabriel Dimas
Já que oque te interessa é a data de inicio tire a dataa final da comparação! SELECT count(*) FROMTABELA V WHERE V.usu_chave = '1' AND V.dt_inicio = TO_DATE('22/11/2004', 'DD/MM/') -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas,

Re: [delphi-br] Excluir um registro

2004-11-11 Por tôpico Gabriel Dimas
utilize o evento BeforeDelete da Query ou Table e coloque on seguinte código begin if Application.MessageBox('Tem certez que deseja excluir?','Atenção', MB_ICONEXCLAMATION + MB_YESNO)= idno then abort; end; -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens

Re: [delphi-br] SQL agrupar por mes

2004-10-26 Por tôpico Gabriel Dimas
tente no lugar de , pois a liguagem interna do accesses é baseada no inglês WHERE DatePart(, DataPedido) = 2004 -- 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

Re: [delphi-br] Data do Executável

2004-10-19 Por tôpico Gabriel Dimas
Use este comando: Obs.: estou usando Delphi 7, não sei se tem nas ver anteriores! DateTimeToStr(FileDateToDateTime(FileAge(Application.ExeName :-) -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse:

Re: [delphi-br] OnkeyDown

2004-10-18 Por tôpico Gabriel Dimas
ou usar um TDBEdit com as propriedades Data Source e Field devidamente configurados :-) -- 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:

[delphi-br] Prog que leia *.rpt

2004-09-30 Por tôpico Gabriel Dimas
Boa noite amigos, Alguem poderia me informar onde consigo um prog que leia arquivos salvos em cristal report e salve-os em outro formato. É apenas para vizualizar um arq que recebemos aqui na empresa. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens

Re: [delphi-br] Como associar um arquivo a um aplicativo.

2004-09-29 Por tôpico Gabriel Dimas
Dica retirado do DTDelphi2.6 Inclua na seção uses: Registry Problema: Criei um editor de textos no Delphi. Agora gostaria que o Windows Explorer usasse este editor para abrir arquivos com a extensão .dpg e .dan. Como fazer? Solução: Para fazer isto será necessária a criação de algumas

[delphi-br] gravar imagem no ini

2004-09-27 Por tôpico Gabriel Dimas
Olá pessoal, gostaria de saber se tem como gravar uma imagem em um campo de sessão do arq ini. Desde já agradeço! -- 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

Re: [delphi-br] gravar imagem no ini

2004-09-27 Por tôpico Gabriel Dimas
Convertendo para uma Stream, perdoe a minha ignorãncia com referência a stream, mas seria uma conversão de imagem para string? vc poderia postar um exemplo bem básico? Só mais uma coisa poderia me informar o tamanha máximo que poderia ter um arq ini? Muito obrigado pela atenção Walter.