Re: [delphi-br] Compara OnClick com NIL
Eu tentei com o componente também. Mas não funcionou. É estranho que eu consiga fazer o evento receber nil mas não comparar. On 12/7/06, Alcir - Listas [EMAIL PROTECTED] wrote: Faltou o componente. if Componente.OnClick = nil then t+ Alcir Leodinei Bielak escreveu: Olá. Tem como eu checar se o evento OnClick é nulo? Eu tentei if OnClick = nil then e está dando a mensagem de Not Enough Actual Parameters. Valeu -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however.. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] OPORTUNIDADES!!!!
Srs., Bom Dia! Estamos precisando de um profissional para ocupar de imediato as oportunidades listadas abaixo. Solicitamos sua divulgação junto aos amigos/contatos. Aos interessados solicitamos o CV atualizado, remuneração (CLT e PJ) e disponibilidade. 17 anos - Tecnologia de Informação com Qualidade PROFISSIONAL MÓDULO NÍVEL IDIOMA QTDE LOCAL DATAS PREVISTAS OBSERVAÇÃO EXPER. PROJETO INÍCIO DURAÇÃO Analista Programador VB/Asp /Net PL 1 Rio de Janeiro Imediato Indeterminado Analista de Storage MVS Storage JR Inglês avançado 2 SP/RJ/MG/DF ou Home office Dezembro 1 ano, podendo ser estendido Experiência em: HSM/SMS, ABAR's backup jobs (especially VSAM), SMA ACS routines, STOPX37, DASD management. Analista de Storage MVS Storage PL/SR Inglês avançado 5 SP/RJ/MG/DF ou Home office Dezembro 1 ano, podendo ser estendido Experiência em: HSM/SMS, ABAR's backup jobs (especially VSAM), SMA ACS routines, STOPX37, DASD management. Desenvolvedor JAVA PL/SR Inglês avançado 30 SP/RJ/MG/DF ou Home office Dezembro 1 ano, podendo ser estendido Um dos 3 perfis:1 - Java (J2EE) + Banco de Dados relacional (DB2, Oracle) ou; 2 - Java (J2EE) + Banco de Dados relacional (DB2, Oracle) + Websphere (WSAD/WAS/Portal) ou; 3 - Java (J2EE) + Banco de Dados relacional (DB2, Oracle) + Eclipse/Weblogic. Desenvolvedor COBOL CICSPL-1REXX PL/SR Inglês avançado 20 SP/RJ/MG/DF ou Home office Dezembro 1 ano, podendo ser estendido Um dos 3 perfis: 1 - MVS + COBOL/CICS + Banco de Dados relacional (DB2, Oracle) ou; 2 - MVS + PL-1/CICS + Banco de Dados relacional (DB2, Oracle) ou; 3 - VM + REXX + Banco de Dados relacional (DB2). Desenvolvedor LOTUS NOTES PL/SR Inglês avançado 20 SP/RJ/MG/DF ou Home office Dezembro 1 ano, podendo ser estendido Um dos 2 perfis: 1- Lotus Notes/Domino + Banco de Dados relacional (DB2, Oracle) 2- Java (J2EE/Javascript)+ Lotus Notes/Domino + Banco de Dados relacional (DB2, Oracle) DBA Banco de dados TERADATA SR Inglês avançado 1 Hortolândia - SP Novembro 1 ano, podendo ser estendido Analista de sistema WEB (Java) SR 3 São Paulo Novembro 1 ano Com experiência em projetos para clientes bancários. Analista de Suporte TWS (TIVOLI) SR Inglês fluente 5 São Paulo/ Rio de Janeiro Novembro Indeterminada Ambiente: Mainframe, Tivoli (OPC, Control-M). Primeiros 6 meses em São Paulo. Analista de Produção TWS (TIVOLI) SR Inglês fluente 5 São Paulo/ Rio de Janeiro Novembro Indeterminada Ambiente: Mainframe, Tivoli (OPC, Control-M). Primeiros 6 meses em São Paulo. Consultor de Negócio Setor elétrico. Sistema GIS SR 1 São Paulo Zona Sul Imediato Indeterminada Experiência em implantação de projetos, com conhecimentos de PL/SQL e solução SmallWorld. Formação: Engenharia Elétrica. Escopo: Atuar como consultor de negócio para o setor elétrico identificando as necessidades do cliente Atenciosamente, Vanessa Souza CTT Integration Group Tel.: (55 21) 2258-8694 Fax: (55 21) 3879-5595 [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Compara OnClick com NIL
Pra isso voce pode usar o Assigned Ex. If Assigned(Button1.OnClick) then begin ... End; Aten Elazar -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Leodinei Bielak Enviada em: sexta-feira, 8 de dezembro de 2006 08:06 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Compara OnClick com NIL Eu tentei com o componente também. Mas não funcionou. É estranho que eu consiga fazer o evento receber nil mas não comparar. On 12/7/06, Alcir - Listas [EMAIL PROTECTED] wrote: Faltou o componente. if Componente.OnClick = nil then t+ Alcir Leodinei Bielak escreveu: Olá. Tem como eu checar se o evento OnClick é nulo? Eu tentei if OnClick = nil then e está dando a mensagem de Not Enough Actual Parameters. Valeu -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however.. [As partes desta mensagem que não continham texto foram removidas] ___ O Yahoo! está de cara nova. Venha conferir! http://br.yahoo.com
[delphi-br] Quebrar linha no DBGRID
Pessoal,,, Como posso mostrar uma linha de 160 char, em duas de 80 ou algo parecido, dentro de um DBGRID ??? CODIGO , NOME , OBSERVACAO (80) OBSERVACAO (80) -- CODIGO, NOME , OBSERVACAO (80) OBSERVACAO (80) Obrigado
[delphi-br] Migração IB para FB
Bom dia a todos Venho mais uma vez recorrer aos senhores. Meus sistemas foram feitos em Delphi 6 e estão usando o InterBase (aqueva versão que vem no CD), mas agora eu estou pensando em migrar para o FB 1.5. Gostaria de saber se será necessário muita alteração nos sistemas e na programação no Banco de Dados (uso muita Procedure e algumas triggers com os generators). Os componentes que eu estou usando são da paleta Interbase (TIBQuery, TIBStoredProc, TIBTransaction, TIBDatabase). Obrigado, Giovanny
Re: [delphi-br] ERRO
mas você tentou executar o gfix? se mesmo com o gfix não deu certo.. so com um backup mesmo. ou então da uma procurada no google por dicas de como recuperar um banco. obs: o pessoal que defende o firebird que me desculpe, mas por essas e outras que eu uso MySQL. uso ha 3 anos e nunca tive problema algum com nenhum banco. mySQL + InnoDB é muito bom. 2006/12/7, Ana Amélia Souza Pereira [EMAIL PROTECTED]: Oi Eduardo, O problema realmente era com meu banco e foi pra o espaço. Criei um novo, como passo as informações para ele? Ana 2006/12/7, Eduardo Silva dos Santos [EMAIL PROTECTED]eduardo.drd%40gmail.com : Oi Ana, da uma olhada na pasta bin do Firebird, la tem o gfix.exe, ele é um utilitário de linha do comando va ao prompt e execute o Gfix e veja quais os parametros ele requer. deve ser algo tipo Gfix -f SEUBANCO.FDB , vai ser algo desse tipo; 2006/12/7, Ana Amélia Souza Pereira [EMAIL PROTECTED]aamelia.mg%40gmail.com aamelia.mg%40gmail.com : Bom dia! É o Interbase. 2006/12/7, Eduardo Silva dos Santos [EMAIL PROTECTED]eduardo.drd%40gmail.com eduardo.drd%40gmail.com eduardo.drd%40gmail.com : se for Firebird tem que usar o GFix para corrigir a corrupção no arquivo do banco. se não der certo espero que vc tenha um backup. Em 06/12/06, Luiz Escobar [EMAIL PROTECTED]escobar%40megasistema.com.br escobar%40megasistema.com.br escobar%40megasistema.com.br escobar%40megasistema.com.br escreveu: Bom pela mensagem para FIREBIRD pois já vi algo assim no grupo deles... pelo que lembro tam um tal de DATAPUMP/DATADUMP e/ou GFIX e/ou GBAK, e se caso nenhum der certo, começa a procurar os backup´s... Não sei nada sobre FIREBIRD apenas acompanho o grupo... e é mais ou menos isso que lembro no momento... Luiz Escobar - Segue mensagem original! - De: Ana Amélia Souza Pereira [EMAIL PROTECTED]aamelia.mg%40gmail.com aamelia.mg%40gmail.com aamelia.mg%40gmail.com aamelia.mg%40gmail.com aamelia.mg%40gmail.com Data: Wed, 6 Dec 2006 22:38:47 -0200 Para: delphi-br@yahoogrupos.com.brdelphi-br%40yahoogrupos.com.brdelphi-br%40yahoog rupos.com.brdelphi-br%40yahoog rupos.com.brdelphi-br%40yahoog rupos.com.brdelphi-br%40yahoog rupos.com.br Assunto: [delphi-br] ERRO Olá, Alguém pode me ajudar com este erro: database file appears corrupt{} bad checksum checksum error on database page 290. O que devo fazer para resolver. Ana Amélia [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com eduardo.drd% 40gmail.com eduardo.drd% 40gmail.com eduardo.drd% 40gmail.com Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com eduardo.drd% 40gmail.com Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Gostaria da opnião do pessoal que já usou ou ainda usa a VCL_Skin.
Com VCL Skin o programa fica lindo, MAS.. dependendo da máquina fica muito lento, dando erros inesperados, sugiro que vc use um esquema de cores ou algo assim para refinar o visual, e deixa o vcl skin pra lá.. 2006/12/7, Leonardo Quinino [EMAIL PROTECTED]: É recomendada ? percebi em alguns testes preliminares que o programa ficou quase 5 megas, maior só porque compilei junto o componente. -- Leonardo Quinino -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como enviar e-mail com arquivo atachado atraves do Outlook Express
Pessoal, aproveitando o assunto alguem sabe como mandar email como compromisso no microsoft outlook pelo indy de outra forma seja qual for? grato. - Original Message - From: Andrei Luís To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 07, 2006 9:36 AM Subject: Re: [delphi-br] Como enviar e-mail com arquivo atachado atraves do Outlook Express Bom dia Paulo, Eu utilizo a função abaixo, testada e funcionando no Delphi 4 e BDS 2006: uses MAPI; function EnviarEMail(const De, Para,CC, Assunto, Texto, Arquivo: string; Confirma: Boolean): Integer; var Msg: TMapiMessage; lpSender, lpRecepient, lpComCopia: TMapiRecipDesc; FileAttach: TMapiFileDesc; SM: TFNMapiSendMail; MAPIModule: HModule; Flags: Cardinal; begin // cria propriedades da mensagem FillChar(Msg, SizeOf(Msg), 0); with Msg do begin if (Assunto '') then lpszSubject := PChar(Assunto); if (Texto '') then lpszNoteText := PChar(Texto); //Corpo da Mensagem // remetente if (De '') then begin lpSender.ulRecipClass := MAPI_ORIG; lpSender.lpszName := PChar(De); lpSender.lpszAddress := PChar(De); lpSender.ulReserved := 0; lpSender.ulEIDSize := 0; lpSender.lpEntryID := nil; lpOriginator := @lpSender; end; // destinatário if (Para '') then begin lpRecepient.ulRecipClass := MAPI_TO; lpRecepient.lpszName := PChar(Para); lpRecepient.lpszAddress := PChar(Para); lpRecepient.ulReserved := 0; lpRecepient.ulEIDSize := 0; lpRecepient.lpEntryID := nil; nRecipCount := 1; lpRecips := @lpRecepient; end else if (CC '') then begin lpComCopia.ulRecipClass := MAPI_CC; lpComCopia.lpszName := PChar(CC); lpComCopia.lpszAddress := PChar(CC); lpComCopia.ulReserved := 0; lpComCopia.ulEIDSize := 0; lpComCopia.lpEntryID := nil; nRecipCount := 1; lpRecips := @lpComCopia; end else lpRecips := nil; // arquivo anexo if (Arquivo = '') then begin nFileCount := 0; lpFiles := nil; end else begin FillChar(FileAttach, SizeOf(FileAttach), 0); FileAttach.nPosition := Cardinal($); FileAttach.lpszPathName := PChar(Arquivo); nFileCount := 1; lpFiles := @FileAttach; end; end; // carrega dll e o método para envio do email MAPIModule := LoadLibrary(PChar(MAPIDLL)); if MAPIModule = 0 then Result := -1 else try if Confirma then Flags := MAPI_DIALOG or MAPI_LOGON_UI else Flags := 0; @SM := GetProcAddress(MAPIModule, 'MAPISendMail'); if @SM nil then Result := SM(0, Application.Handle, Msg, Flags, 0) else Result := 1; finally FreeLibrary(MAPIModule); end; end; [] Andrei Em 06/12/06, Paulo Sérgio Dias[EMAIL PROTECTED] escreveu: Pessoal: Alguem tem alguma rotina que, a partir de um programa Delphi 7 (ou D2006) chame o Outlook Express e monte um e-mail com um arquivo atachado ? Encontrei algumas rotinas na Internet, mas as que funcionam nao permitem atachar arquivos, e as que permitem atachar arquivos nao funcionam direito. Obs.: Tem de ser pelo Outlook Express ou pelo leitor de e-mail padrao do usuario. So' nao posso enviar diretamente (motivos especificos dos meus usuarios). Por isso nao estou usando componentes para envio de e-mail. Grato pela atencao de todos Paulo [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Destruir o form...
Bom dia... Tem como tirar da memoria um programa em execucao via programacao ? Ex: WinExec('Prod.Exe',0) Entrada:=Tentrada.Create(Self); Entrada.ShowModal; Entrada.Release; Destruir o prod.exe ou seja tirar de execucao.. tem como ? Abraço. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Baixar arquivo
Alguém sabe alguma forma de baixar um arquivo da internet? Eu precisaria fazer com que meu programa fosse atualizado automaticamente sempre que eu atualizasse um arquivo que ficará armazenado em servidor de hospedagem. Teria alguma forma de fazer com que o meu programa baixe um arquivo da internet? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Baixar arquivo
acho que a forma + simples é com a função abaixo, so que ainda não testei Declare a unit Urlmon na clausula Uses; // if DownloadFile ('http://www.sitedodowload.com/nomedoarquivo.extensão', 'c:\nomedoarquivo.extensão') then ... function DownloadFile(Source, Dest: string): Boolean; begin try Result := UrlDownloadToFile(nil, PChar(source), PChar(Dest), 0, nil) = 0; except Result := False; end; end; Em 08/12/06, willer [EMAIL PROTECTED] escreveu: Alguém sabe alguma forma de baixar um arquivo da internet? Eu precisaria fazer com que meu programa fosse atualizado automaticamente sempre que eu atualizasse um arquivo que ficará armazenado em servidor de hospedagem. Teria alguma forma de fazer com que o meu programa baixe um arquivo da internet? [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Palindromes - Palindromo
Bom dia a todos, Palindromes (ARARA, AVIVA, ATOYOTA, 12321, 2A3IEAS), então eu sei o que e um palindrome, so que eu não estou conseguindo fazer esse programa para comparação de palindrome. Eu ate fiz a logica são que não esta rodando em fonte... (Console do Delphi) Gostaria saber quem poderia me ajudar. program Polindromes; {$APPTYPE CONSOLE} uses SysUtils; var n1 :integer; n2 :integer; begin Writeln('Digite dois números de até 3 digitos'); Readln(n1,n2); if (n1 1000) and (n2 1000) then if (n1 100) and (n2 100) then if (n1 / 100 = n2 mod 10) then begin n1 := (n1 / 100); n2 := n2 mod 10; if (n1 / 10 = n2 mod 10) and (n1 mod 10 = n2 / 10) then Writeln('Os numeros são palindromes') else Writeln('Os numeros não são palindromes') end else writeln('Os numeros não são palindromes') end else if (n1 10) and (n2 10) and (n2 100) then if (n1 / 10 = n2 mod 10) and (n1 mod 10 = n2 / 10) then writeln('os numeros são palindromes') else writeln('Os numeors não são palindromes'); end else writeln('Os numeros não são palindromes'); end end end end.
Re: [delphi-br] Compara OnClick com NIL
Funcionou. Valeu. On 12/8/06, Elazar Dornelles Ceza [EMAIL PROTECTED] wrote: Pra isso voce pode usar o Assigned Ex. If Assigned(Button1.OnClick) then begin ... End; Aten Elazar
[delphi-br] Destruir um EXE da memoria
Bom dia... Tem como tirar da memoria um programa em execucao via programacao ? Ex: WinExec('Prod.Exe',0) Entrada:=Tentrada.Create(Self); Entrada.ShowModal; Entrada.Release; Destruir o prod.exe ou seja tirar de execucao.. Abraço Doretto. tem como ? Abraço. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Destruir um EXE da memoria
Opa! Tem sim.. procure por como usar a função TerminateProcess. Abraços, Henrique Netzka - Original Message - From: Doretto To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 11:54 AM Subject: [delphi-br] Destruir um EXE da memoria Bom dia... Tem como tirar da memoria um programa em execucao via programacao ? Ex: WinExec('Prod.Exe',0) Entrada:=Tentrada.Create(Self); Entrada.ShowModal; Entrada.Release; Destruir o prod.exe ou seja tirar de execucao.. Abraço Doretto. tem como ? Abraço. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Compara OnClick com NIL
Já tentou com o Assigned ? - Original Message - From: Leodinei Bielak [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 8:05 AM Subject: Re: [delphi-br] Compara OnClick com NIL Eu tentei com o componente também. Mas não funcionou. É estranho que eu consiga fazer o evento receber nil mas não comparar. On 12/7/06, Alcir - Listas [EMAIL PROTECTED] wrote: Faltou o componente. if Componente.OnClick = nil then t+ Alcir Leodinei Bielak escreveu: Olá. Tem como eu checar se o evento OnClick é nulo? Eu tentei if OnClick = nil then e está dando a mensagem de Not Enough Actual Parameters. Valeu -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however.. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.432 / Virus Database: 268.15.14/578 - Release Date: 07/12/2006 01:27
[delphi-br] Re: Destruir um EXE da memoria
E so colocar esse codigo FreeAndNil(Prod.exe); --- Em delphi-br@yahoogrupos.com.br, Doretto [EMAIL PROTECTED] escreveu Bom dia... Tem como tirar da memoria um programa em execucao via programacao ? Ex: WinExec('Prod.Exe',0) Entrada:=Tentrada.Create(Self); Entrada.ShowModal; Entrada.Release; Destruir o prod.exe ou seja tirar de execucao.. Abraço Doretto. tem como ? Abraço. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Destruir um EXE da memoria
Heim? o.O O programa não é uma variável da aplicação dele. Ele mandou o windows executar e agora quer mandar o win finalizar a tarefa... Utilize a função TerminateProcess do win32sdk: BOOL TerminateProcess( HANDLE hProcess, // handle to the process UINT uExitCode // exit code for the process ); []'s Eric D. - Desenvolvimento e Soluções de Tecnologia [EMAIL PROTECTED] Talk is cheap, show me the code... - Original Message - From: jscoutinho1 To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 11:25 AM Subject: [delphi-br] Re: Destruir um EXE da memoria E so colocar esse codigo FreeAndNil(Prod.exe); --- Em delphi-br@yahoogrupos.com.br, Doretto [EMAIL PROTECTED] escreveu Bom dia... Tem como tirar da memoria um programa em execucao via programacao ? Ex: WinExec('Prod.Exe',0) Entrada:=Tentrada.Create(Self); Entrada.ShowModal; Entrada.Release; Destruir o prod.exe ou seja tirar de execucao.. Abraço Doretto. tem como ? Abraço. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Atualização automática
Como faço para fechar o meu programa após ter aberto outro? Estou implementando uma rotina de atualização automáticxa que deverá fzer isso, baixa um arquivo(.exe), abre um programa auxiliar e fecha. O programa auxiliar exclui o antigo, e renomeia o novo, abre-o e fecha-se; [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Licença do IBO
Olá Grupo, Alguém do grupo poderia me fornecer o texto solicitando a licença trustware do IBO. O meu inglês não é tão bom assim. Obrigado Jones Kleber --- spam free by www.SafestMail.com.br
Re: [delphi-br] Licença do IBO
Não é perfeito mais vai t ajudar !!! http://translate.google.com/translate_t Eduardo Visão On-Line - Jones Kleber escreveu: Olá Grupo, Alguém do grupo poderia me fornecer o texto solicitando a licença trustware do IBO. O meu inglês não é tão bom assim. Obrigado Jones Kleber --- spam free by www.SafestMail.com.br ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/
Re: [delphi-br] Re: Destruir um EXE da memoria
No exemplo que eu te passei como eu acharia qual e o meu hProcesse e o outro parâmetro. Você conseguiria exemplificar melhor... Obr. - Original Message - From: Eric D. To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 2:01 PM Subject: Re: [delphi-br] Re: Destruir um EXE da memoria Heim? o.O O programa não é uma variável da aplicação dele. Ele mandou o windows executar e agora quer mandar o win finalizar a tarefa... Utilize a função TerminateProcess do win32sdk: BOOL TerminateProcess( HANDLE hProcess, // handle to the process UINT uExitCode // exit code for the process ); []'s Eric D. - Desenvolvimento e Soluções de Tecnologia [EMAIL PROTECTED] Talk is cheap, show me the code... - Original Message - From: jscoutinho1 To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 11:25 AM Subject: [delphi-br] Re: Destruir um EXE da memoria E so colocar esse codigo FreeAndNil(Prod.exe); --- Em delphi-br@yahoogrupos.com.br, Doretto [EMAIL PROTECTED] escreveu Bom dia... Tem como tirar da memoria um programa em execucao via programacao ? Ex: WinExec('Prod.Exe',0) Entrada:=Tentrada.Create(Self); Entrada.ShowModal; Entrada.Release; Destruir o prod.exe ou seja tirar de execucao.. Abraço Doretto. tem como ? Abraço. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Duvida no cadastro de produtos pereciveis
Oi, pessoal. Estou fazendo um servico para uma distribuidora de alimentos e tenho a seguinte duvida, preciso cadastrar produtos pereciveis, o mesmo produto vem com validades diferentes. Como voces fazem para cadastrar esses produtos, pois nao vejo maneira simples para facilitar a saida do produto. Obrigado Celio Ricardo [EMAIL PROTECTED]
RES: [delphi-br] Atualização automática
Cara eu fiz um sistema desses, caso você tenha interesse podemos negociar. Marcelo Hoepfner msn: [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Andrei Luís Enviada em: sexta-feira, 8 de dezembro de 2006 13:22 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Atualização automática Willer, Uma idéia seria você utilizar no seu sistema 2 executáveis: 1 pequeno, que será executado através de ícones na área de trabalho, etc, que faz a atualização quando necessário e chama o 2º executável que é o sistema em si. [] Andrei Em 08/12/06, willer[EMAIL PROTECTED] mailto:willer%40personalcom.com.br escreveu: Como faço para fechar o meu programa após ter aberto outro? Estou implementando uma rotina de atualização automáticxa que deverá fzer isso, baixa um arquivo(.exe), abre um programa auxiliar e fecha. O programa auxiliar exclui o antigo, e renomeia o novo, abre-o e fecha-se; [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Licença do IBO
Valeu Eduardo. Jones Kleber --- spam free by www.SafestMail.com.br
Re: [delphi-br] Re: Destruir um EXE da memoria
Olhe nestes links tem dois exemplos distintos do que vc precisa: http://www.activedelphi.com.br/print.php?sid=369 http://www.swissdelphicenter.ch/torry/showcode.php?id=266 E se me permite dar uma dica: estes links foram encontrados a partir do Google (http://www.google.com.br/search?hl=pt-BRsa=Xoi=spellresnum=0ct=resultcd=1q=terminateprocess+%2Bdelphispell=1). Eu e outro colega indicamos o nome da função que vc deveria utilizar. Agora é com vc procurar a sintaxe e como implementar isso em sua aplicação. Boa sorte ;) Eric D. - Desenvolvimento e Soluções de Tecnologia [EMAIL PROTECTED] Talk is cheap, show me the code... - Original Message - From: Doretto To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 1:08 PM Subject: Re: [delphi-br] Re: Destruir um EXE da memoria No exemplo que eu te passei como eu acharia qual e o meu hProcesse e o outro parâmetro. Você conseguiria exemplificar melhor... Obr. - Original Message - From: Eric D. To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 2:01 PM Subject: Re: [delphi-br] Re: Destruir um EXE da memoria Heim? o.O O programa não é uma variável da aplicação dele. Ele mandou o windows executar e agora quer mandar o win finalizar a tarefa... Utilize a função TerminateProcess do win32sdk: BOOL TerminateProcess( HANDLE hProcess, // handle to the process UINT uExitCode // exit code for the process ); []'s Eric D. - Desenvolvimento e Soluções de Tecnologia [EMAIL PROTECTED] Talk is cheap, show me the code... - Original Message - From: jscoutinho1 To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 11:25 AM Subject: [delphi-br] Re: Destruir um EXE da memoria E so colocar esse codigo FreeAndNil(Prod.exe); --- Em delphi-br@yahoogrupos.com.br, Doretto [EMAIL PROTECTED] escreveu Bom dia... Tem como tirar da memoria um programa em execucao via programacao ? Ex: WinExec('Prod.Exe',0) Entrada:=Tentrada.Create(Self); Entrada.ShowModal; Entrada.Release; Destruir o prod.exe ou seja tirar de execucao.. Abraço Doretto. tem como ? Abraço. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Verdade sobre fieldbyname
AMigos da lista, gostaria de saber da experiencia de vcs Vi em uma lista de discussão que o FieldByName deixa o tráfeco mais lento. Isso é verdade? Desde já agradeço a todos
Re: [delphi-br] Duvida no cadastro de produtos pereciveis
Vc pode montar em sua aplicação, um módulo de rastreio de validade dos produtos, classificados por lote ou por qualquer outro fator que vc desejar. Basta criar em seu banco de dados, uma tabela filha da sua tabela de produtos, então vc vai poder realizar lançamentos de datas de validades diferentes, para diferentes lotes em diferentes grupos de transporte/entrega para um mesmo produto. Espero ter ajudado. []'s Eric D. - Desenvolvimento e Soluções de Tecnologia [EMAIL PROTECTED] Talk is cheap, show me the code... - Original Message - From: Celio Ricardo To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 1:39 PM Subject: [delphi-br] Duvida no cadastro de produtos pereciveis Oi, pessoal. Estou fazendo um servico para uma distribuidora de alimentos e tenho a seguinte duvida, preciso cadastrar produtos pereciveis, o mesmo produto vem com validades diferentes. Como voces fazem para cadastrar esses produtos, pois nao vejo maneira simples para facilitar a saida do produto. Obrigado Celio Ricardo [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Atualização automática
Só tenho dúvida na lógica. Já consigo verificar se há atualização e até baixar os novos arquivos, só não estou conseguindo fechar o executável e abró-lo novamente com a nova versão. - Original Message - From: Marcelo Hoepfner (SI) To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 1:57 PM Subject: RES: [delphi-br] Atualização automática Cara eu fiz um sistema desses, caso você tenha interesse podemos negociar. Marcelo Hoepfner msn: [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Andrei Luís Enviada em: sexta-feira, 8 de dezembro de 2006 13:22 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Atualização automática Willer, Uma idéia seria você utilizar no seu sistema 2 executáveis: 1 pequeno, que será executado através de ícones na área de trabalho, etc, que faz a atualização quando necessário e chama o 2º executável que é o sistema em si. [] Andrei Em 08/12/06, willer[EMAIL PROTECTED] mailto:willer%40personalcom.com.br escreveu: Como faço para fechar o meu programa após ter aberto outro? Estou implementando uma rotina de atualização automáticxa que deverá fzer isso, baixa um arquivo(.exe), abre um programa auxiliar e fecha. O programa auxiliar exclui o antigo, e renomeia o novo, abre-o e fecha-se; [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1910 (20061208) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Antivírus de email, como eles fazem?
Olá amigos, estou querendo fazer um sistema parecido com um antivirus.. seguinte.. meu programa ficará residente na memória e quando o usuário abrir seu outlook express ou qualquer outro, e mandar baixar os emails, meu programa entra em ação. Identifica o email, e se for um pedido, automaticamente cadastra na base de dados. o meu problema está na primeira parte, como interceptar os emails como um antivirus faz? alguem tem alguma idéia? Desde já agradeço. []s -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Duvida no cadastro de produtos pereciveis
Acho que a duvida dele é como fazer no checkout para definir. Pois se for colocar para o operador escolher dentre os lotes existente causaria probabilidade de erro. Uma hipótese seria gerar um código de barras para estes produtos e por meio do código de barras a aplicação identificar a qual lote pertence e baixar. Outra é gerenciar para na área de vendas tenha apenas sempre um único lote e assim baixar por este. E outra é sempre baixar aleatoriamente pelo ultimo e não controlar via sistema. Alguém teria alguma outra sugestão ou qual seria a melhor dentre estas para ser seguida ? Atenciosamente, Marivaldo Silva Total Informática - www.infototal.com.br Fone: (75) 3623-9318 - Feira de Santana - BA E-mail / MSN - [EMAIL PROTECTED] - Original Message - From: Eric D. To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 3:15 PM Subject: Re: [delphi-br] Duvida no cadastro de produtos pereciveis Vc pode montar em sua aplicação, um módulo de rastreio de validade dos produtos, classificados por lote ou por qualquer outro fator que vc desejar. Basta criar em seu banco de dados, uma tabela filha da sua tabela de produtos, então vc vai poder realizar lançamentos de datas de validades diferentes, para diferentes lotes em diferentes grupos de transporte/entrega para um mesmo produto. Espero ter ajudado. []'s Eric D. - Desenvolvimento e Soluções de Tecnologia [EMAIL PROTECTED] Talk is cheap, show me the code... - Original Message - From: Celio Ricardo To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 1:39 PM Subject: [delphi-br] Duvida no cadastro de produtos pereciveis Oi, pessoal. Estou fazendo um servico para uma distribuidora de alimentos e tenho a seguinte duvida, preciso cadastrar produtos pereciveis, o mesmo produto vem com validades diferentes. Como voces fazem para cadastrar esses produtos, pois nao vejo maneira simples para facilitar a saida do produto. Obrigado Celio Ricardo [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Duvida no cadastro de produtos pereciveis
gera lotes de entrada para cada entrada x produto...O unico que problema que vejo, caso na mesma compra os produtos tenham validade diferentes...nesse caso, acredito que terá que gerarlotes manualmente, quando vc entra os lotes, teu estoque aumenta, quando vc vai utilizando os lotes, teu estoque diminui. Tenho feito alguma coisa nesse sentido, nao por causa dos prazos de validade e sim apenas por norma, para que o primeiro em entrar na firma seja o primeiro em sair. O controle disso, he meio chato, mas nada que um bom banco de dados nao seja capaz de administrar. Utilizo o posgresql e faço estas administrações diretamente no banco de dados... -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Celio Ricardo Enviada em: sexta-feira, 8 de dezembro de 2006 13:39 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Duvida no cadastro de produtos pereciveis Oi, pessoal. Estou fazendo um servico para uma distribuidora de alimentos e tenho a seguinte duvida, preciso cadastrar produtos pereciveis, o mesmo produto vem com validades diferentes. Como voces fazem para cadastrar esses produtos, pois nao vejo maneira simples para facilitar a saida do produto. Obrigado Celio Ricardo [EMAIL PROTECTED] mailto:ricknetbr%40yahoo.com.br com.br [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Componente - Urgente!
Puxa Luiz! Fiquei surpreso, já que nunca tinha reparado nestes componentes. Vou testar aqui tb pq eles me deram uma idéias... Valeu pela dica! Grato, Ricardo Luiz Escobar [EMAIL PROTECTED] escreveu: Te tem e FREE... procura sobre delphi modem VML no google ou no emule... a versão era: vml1.0.4 (acho...) (creio que esse seja o melhor para o que vc quer...) TModemLogFile TModemPort TModemProfile TNoModem TVoiceModem entre outros mas creio que ele vai te ajudar... mas que vai dar trabalho à isso vai ;-) agora acho que tem também o tmsgvoc e commdrv32_261a esse ultimo não sei se vai servir pra isso que vc quer Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br - Original Message - From: Ricardo Cesar Cardoso To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 07, 2006 4:51 PM Subject: Res: [delphi-br] Componente - Urgente! Olha, sem querer desanimar, mas é bastante coisa pra ser desenvolvida. Duvido muito que tenha componente pra estas funções e se tiver vai ser pago e vai custar caro. Mas dá uma procurada por componentes de telefonia em sites como o Torry.net ou Delphi Super Page. Abraços e sucesso, Ricardo. - Mensagem original De: fpsp2000 [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 7 de Dezembro de 2006 15:48:50 Assunto: [delphi-br] Componente - Urgente! Ola! Preciso desenvolver um sistema de telemarkting, onde o operador disque pelo sistema e use headset para falar com o cliente, e que o mesmo sistema seja capaz de disparar uma mensagem gravada. Alguem conhece algum componente que tenha essas funções. Fernanda de Paula !-- #ygrp-mlmsg {font-size:13px;font-family:arial,helvetica,clean,sans-serif;} #ygrp-mlmsg table {font-size:inherit;font:100%;} #ygrp-mlmsg select, input, textarea {font:99% arial,helvetica,clean,sans-serif;} #ygrp-mlmsg pre, code {font:115% monospace;} #ygrp-mlmsg * {line-height:1.22em;} #ygrp-text{ font-family:Georgia; } #ygrp-text p{ margin:0 0 1em 0; } #ygrp-tpmsgs{ font-family:Arial; clear:both; } #ygrp-vitnav{ padding-top:10px; font-family:Verdana; font-size:77%; margin:0; } #ygrp-vitnav a{ padding:0 1px; } #ygrp-actbar{ clear:both; margin:25px 0; white-space:nowrap; color:#666; text-align:right; } #ygrp-actbar .left{ float:left; white-space:nowrap; } .bld{font-weight:bold;} #ygrp-grft{ font-family:Verdana; font-size:77%; padding:15px 0; } #ygrp-ft{ font-family:verdana; font-size:77%; border-top:1px solid #666; padding:5px 0; } #ygrp-mlmsg #logo{ padding-bottom:10px; } #ygrp-vital{ background-color:#e0ecee; margin-bottom:20px; padding:2px 0 8px 8px; } #ygrp-vital #vithd{ font-size:77%; font-family:Verdana; font-weight:bold; color:#333; text-transform:uppercase; } #ygrp-vital ul{ padding:0; margin:2px 0; } #ygrp-vital ul li{ list-style-type:none; clear:both; border:1px solid #e0ecee; } #ygrp-vital ul li .ct{ font-weight:bold; color:#ff7900; float:right; width:2em; text-align:right; padding-right:.5em; } #ygrp-vital ul li .cat{ font-weight:bold; } #ygrp-vital a { text-decoration:none; } #ygrp-vital a:hover{ text-decoration:underline; } #ygrp-sponsor #hd{ color:#999; font-size:77%; } #ygrp-sponsor #ov{ padding:6px 13px; background-color:#e0ecee; margin-bottom:20px; } #ygrp-sponsor #ov ul{ padding:0 0 0 8px; margin:0; } #ygrp-sponsor #ov li{ list-style-type:square; padding:6px 0; font-size:77%; } #ygrp-sponsor #ov li a{ text-decoration:none; font-size:130%; } #ygrp-sponsor #nc { background-color:#eee; margin-bottom:20px; padding:0 8px; } #ygrp-sponsor .ad{ padding:8px 0; } #ygrp-sponsor .ad #hd1{ font-family:Arial; font-weight:bold; color:#628c2a; font-size:100%; line-height:122%; } #ygrp-sponsor .ad a{ text-decoration:none; } #ygrp-sponsor .ad a:hover{ text-decoration:underline; } #ygrp-sponsor .ad p{ margin:0; } o {font-size:0;} .MsoNormal { margin:0 0 0 0; } #ygrp-text tt{ font-size:120%; } blockquote{margin:0 0 0 4px;} .replbq {margin:4;} -- ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ [As partes desta mensagem que não continham texto foram removidas] - Yahoo! Search Música para ver e ouvir: You're Beautiful, do James Blunt [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Enviar e-mail
Como posso enviar um e-mail diretamente pelo delphi com um arquivo HTML no corpo da mensagem, ou até mesmo abrir o outlook já com o HTML no corpo da mensagem. -- Um Abraço. Igor Alexandre. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Conecta a um banco de dados onLine
Alguém sabe se é possível fazer com que um aplicativo se comunique com um banco de dados onLine, banco de dados MySql.? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Duvida no cadastro de produtos pereciveis
Eu uso a própria nota de entrada para isso, coloco a data de validade do produto no momento da entrada, e vou baixando cfe a saida. Basta criar 2 campos, um com o saldo e outro com a data de validade. Se vc tiver controle de estoque integrado fica fácil de implementar. - Original Message - From: Eric D. [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 4:15 PM Subject: Re: [delphi-br] Duvida no cadastro de produtos pereciveis Vc pode montar em sua aplicação, um módulo de rastreio de validade dos produtos, classificados por lote ou por qualquer outro fator que vc desejar. Basta criar em seu banco de dados, uma tabela filha da sua tabela de produtos, então vc vai poder realizar lançamentos de datas de validades diferentes, para diferentes lotes em diferentes grupos de transporte/entrega para um mesmo produto. Espero ter ajudado. []'s Eric D. - Desenvolvimento e Soluções de Tecnologia [EMAIL PROTECTED] Talk is cheap, show me the code... - Original Message - From: Celio Ricardo To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 1:39 PM Subject: [delphi-br] Duvida no cadastro de produtos pereciveis Oi, pessoal. Estou fazendo um servico para uma distribuidora de alimentos e tenho a seguinte duvida, preciso cadastrar produtos pereciveis, o mesmo produto vem com validades diferentes. Como voces fazem para cadastrar esses produtos, pois nao vejo maneira simples para facilitar a saida do produto. Obrigado Celio Ricardo [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.432 / Virus Database: 268.15.14/578 - Release Date: 07/12/2006 01:27
Re: [delphi-br] Verdade sobre fieldbyname
ah, desculpa não seria nem trafeco e sim tráfico... foi maus... agora veja bem durante um importação: 500.000 registros com 50 campos na tabela iria demorar +/- uns 25 segundos à mais.. ;-) mas numa tabela de 50 campos, onde a importação tem que ser feita usando algum tipo de converção/calculo/analise/filtro/etc... eu usaria fieldbyname, o usuario que espera neste caso +25 segundos... (e olha que fica olhando 25 segundos pra tela não é facil não...) agora se for um importação dequelas tipo cópia daqui-pra-li os campos na mesma sequencia tipo xerox um banco do outro vai de fields[] mesmo faço um FOR e poucas linhas eu alimento o outro banco... tipo: while not t1.eof() do begin t2.insert; for x := 0 to t1.fieldcount do t2.fields[x].asvalue := t1.fields[x].asvalue; t2.post; t1.next; end; Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br - Original Message - From: Marcelo To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 2:48 PM Subject: [delphi-br] Verdade sobre fieldbyname AMigos da lista, gostaria de saber da experiencia de vcs Vi em uma lista de discussão que o FieldByName deixa o tráfeco mais lento. Isso é verdade? Desde já agradeço a todos [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Atualização automática
Bom na logica, antes de fechar,copiar,abrir o executavel, é melhor vc fazer a perguntinha basica pro usuario, vc tem uma atualziação para este software, deseja fazer agora ? e que a pargunta se repita tipo a cada 30 minutos, se não o usuário vai querer te matar... ehhehehe quanto a uma aplicação fechar outra, sei que tem jeito, mas de cabeça agora não lembro desculpe... Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br - Original Message - From: willer To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 3:22 PM Subject: Re: [delphi-br] Atualização automática Só tenho dúvida na lógica. Já consigo verificar se há atualização e até baixar os novos arquivos, só não estou conseguindo fechar o executável e abró-lo novamente com a nova versão. - Original Message - From: Marcelo Hoepfner (SI) To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 1:57 PM Subject: RES: [delphi-br] Atualização automática Cara eu fiz um sistema desses, caso você tenha interesse podemos negociar. Marcelo Hoepfner msn: [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Andrei Luís Enviada em: sexta-feira, 8 de dezembro de 2006 13:22 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Atualização automática Willer, Uma idéia seria você utilizar no seu sistema 2 executáveis: 1 pequeno, que será executado através de ícones na área de trabalho, etc, que faz a atualização quando necessário e chama o 2º executável que é o sistema em si. [] Andrei Em 08/12/06, willer[EMAIL PROTECTED] mailto:willer%40personalcom.com.br escreveu: Como faço para fechar o meu programa após ter aberto outro? Estou implementando uma rotina de atualização automáticxa que deverá fzer isso, baixa um arquivo(.exe), abre um programa auxiliar e fecha. O programa auxiliar exclui o antigo, e renomeia o novo, abre-o e fecha-se; [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1910 (20061208) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Verdade sobre fieldbyname
o trafeco ? bom depende, se for de droga e for passar pela alfandega pode demorar um pouco sim, agora se for o trafego, bem não vai influenciar muito não... o que fica lento é o seguinte... (lento esta entre pois não acho significativo não) quando vc usa table1.fieldbyname('blablabla').asstring ao invez de table1.fields[ 01 ].asstring é que o primeiro vai ter que procurar na tabela dos campos da table1 qual a posição dele para depois retornar o seu valor o segundo já retorna na hora, ficando assim a EXECUÇÃO bem mais rápida, MAS, EU!!!... particularmente uso o fieldbyname... fica mais facil a leitura/compreenção do programa... agora faz um teste ai vc, o meu teste deu isso ai abaixo 1.000.000x dá +/- 1 segundo de diferença... isso em um P4-1.7Ghz, 748MB-ram, windows-XP-PRO mas lembre-se 1 milhão de vezes var t1, t2 : tdatetime; x : integer; procedure TForm1.Button1Click(Sender: TObject); begin label1.caption := ''; t1 := now; for x := 1 to 100 do label1.caption := VT1.Fieldbyname('field0').asstring; t2 := now; label1.caption := timetostr( t2 - t1 ); // 00:00:04 end; procedure TForm1.Button2Click(Sender: TObject); begin label2.caption := ''; t1 := now; for x := 1 to 100 do label2.caption := VT1.Fields[0].asstring; t2 := now; label2.caption := timetostr( t2 - t1 ); // 00:00:03 end; e veja a diferença de tempo entre eles em micros mais modestos... Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br - Original Message - From: Marcelo To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 2:48 PM Subject: [delphi-br] Verdade sobre fieldbyname AMigos da lista, gostaria de saber da experiencia de vcs Vi em uma lista de discussão que o FieldByName deixa o tráfeco mais lento. Isso é verdade? Desde já agradeço a todos [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Verdade sobre fieldbyname
Olá Luiz, na verdade seria Trafego, pois tráfico é crime organizado... :-) Na verdade, o FieldByName, nao gera peso sobre o trafego na rede, e sim de processamento, quando voce informa FieldByName, o delphi percorre todos os campos até achar o que você quer, já você informando o Fields[x] o delphi já vai direto nele. Ou seja, o trafego é de processamento e nao de rede. []s Em 08/12/06, Luiz Escobar [EMAIL PROTECTED] escreveu: ah, desculpa não seria nem trafeco e sim tráfico... foi maus... agora veja bem durante um importação: 500.000 registros com 50 campos na tabela iria demorar +/- uns 25 segundos à mais.. ;-) mas numa tabela de 50 campos, onde a importação tem que ser feita usando algum tipo de converção/calculo/analise/filtro/etc... eu usaria fieldbyname, o usuario que espera neste caso +25 segundos... (e olha que fica olhando 25 segundos pra tela não é facil não...) agora se for um importação dequelas tipo cópia daqui-pra-li os campos na mesma sequencia tipo xerox um banco do outro vai de fields[] mesmo faço um FOR e poucas linhas eu alimento o outro banco... tipo: while not t1.eof() do begin t2.insert; for x := 0 to t1.fieldcount do t2.fields[x].asvalue := t1.fields[x].asvalue; t2.post; t1.next; end; Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br - Original Message - From: Marcelo To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Friday, December 08, 2006 2:48 PM Subject: [delphi-br] Verdade sobre fieldbyname AMigos da lista, gostaria de saber da experiencia de vcs Vi em uma lista de discussão que o FieldByName deixa o tráfeco mais lento. Isso é verdade? Desde já agradeço a todos [As partes desta mensagem que não continham texto foram removidas] -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Enviar e-mail
Salve Igor então amigo vc quer fazer isso usando o Win32 ou .NET ??? tenho dois exemplos mais não estou aqui comigo... o .NET ta em C# mas eh muito facil... caso queira me envio um email em PVT que disponibilizo para vc mas no historico da lista com certeza deve ter alguma coisa abraço Marcos Bernardo 2006/12/8, Igor Alexandre [EMAIL PROTECTED]: Como posso enviar um e-mail diretamente pelo delphi com um arquivo HTML no corpo da mensagem, ou até mesmo abrir o outlook já com o HTML no corpo da mensagem. -- Um Abraço. Igor Alexandre. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Antivírus de email, como eles f azem?
Voce poderia utilizar um endereço de email, Neste caso você conectaria ao server e verificaria se existem novos pedidos. Por exemplo se os pedidos vem de pessoas de fora da empresa e esta indo pra um email que não é esse vc orienta a todos os usuários que quando quiserem efetuar pedidos que encaminhem para o email tal. É uma solução bem eficiente, bom você consegue trabalha com o sistema que lê os email de forma mais ágil, pois saberá que todos os emails que caem lá são pedidos. Marcelo Hoepfner _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fellipe Henrique Enviada em: sexta-feira, 8 de dezembro de 2006 15:34 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Antivírus de email, como eles fazem? Olá amigos, estou querendo fazer um sistema parecido com um antivirus.. seguinte.. meu programa ficará residente na memória e quando o usuário abrir seu outlook express ou qualquer outro, e mandar baixar os emails, meu programa entra em ação. Identifica o email, e se for um pedido, automaticamente cadastra na base de dados. o meu problema está na primeira parte, como interceptar os emails como um antivirus faz? alguem tem alguma idéia? Desde já agradeço. []s -- _ Fellipe Henrique [EMAIL PROTECTED] mailto:fellipeh%40gmail.com Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Antivírus de email, como eles fazem?
Olá Marcelo, obrigado pela resposta, porém o pedido foi um exemplo, não posso ter apenas uma conta... seria como se fosse um anti-spam... se o email tem uma determinada caracteristica (palavra ou frase), vai pra uma tabela e por aí vai. O que eu precisaria seria mesmo, um anti-spam, porem sem deletar o email... :-) []s Em 08/12/06, Marcelo Hoepfner (SI) [EMAIL PROTECTED] escreveu: Voce poderia utilizar um endereço de email, Neste caso você conectaria ao server e verificaria se existem novos pedidos. Por exemplo se os pedidos vem de pessoas de fora da empresa e esta indo pra um email que não é esse vc orienta a todos os usuários que quando quiserem efetuar pedidos que encaminhem para o email tal. É uma solução bem eficiente, bom você consegue trabalha com o sistema que lê os email de forma mais ágil, pois saberá que todos os emails que caem lá são pedidos. Marcelo Hoepfner _ De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Fellipe Henrique Enviada em: sexta-feira, 8 de dezembro de 2006 15:34 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: [delphi-br] Antivírus de email, como eles fazem? Olá amigos, estou querendo fazer um sistema parecido com um antivirus.. seguinte.. meu programa ficará residente na memória e quando o usuário abrir seu outlook express ou qualquer outro, e mandar baixar os emails, meu programa entra em ação. Identifica o email, e se for um pedido, automaticamente cadastra na base de dados. o meu problema está na primeira parte, como interceptar os emails como um antivirus faz? alguem tem alguma idéia? Desde já agradeço. []s -- _ Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com mailto:fellipeh% fellipeh%25 40gmail.com Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Atualização automática
Valeu pela dica. Vou fazer desse jeito. E é usuário quem fecharia o programa par que a atualização fosse feita. Gostei da idéia, vou implelentar. - Original Message - From: Luiz Escobar To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 4:35 PM Subject: Re: [delphi-br] Atualização automática Bom na logica, antes de fechar,copiar,abrir o executavel, é melhor vc fazer a perguntinha basica pro usuario, vc tem uma atualziação para este software, deseja fazer agora ? e que a pargunta se repita tipo a cada 30 minutos, se não o usuário vai querer te matar... ehhehehe quanto a uma aplicação fechar outra, sei que tem jeito, mas de cabeça agora não lembro desculpe... Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br - Original Message - From: willer To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 3:22 PM Subject: Re: [delphi-br] Atualização automática Só tenho dúvida na lógica. Já consigo verificar se há atualização e até baixar os novos arquivos, só não estou conseguindo fechar o executável e abró-lo novamente com a nova versão. - Original Message - From: Marcelo Hoepfner (SI) To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 1:57 PM Subject: RES: [delphi-br] Atualização automática Cara eu fiz um sistema desses, caso você tenha interesse podemos negociar. Marcelo Hoepfner msn: [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Andrei Luís Enviada em: sexta-feira, 8 de dezembro de 2006 13:22 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Atualização automática Willer, Uma idéia seria você utilizar no seu sistema 2 executáveis: 1 pequeno, que será executado através de ícones na área de trabalho, etc, que faz a atualização quando necessário e chama o 2º executável que é o sistema em si. [] Andrei Em 08/12/06, willer[EMAIL PROTECTED] mailto:willer%40personalcom.com.br escreveu: Como faço para fechar o meu programa após ter aberto outro? Estou implementando uma rotina de atualização automáticxa que deverá fzer isso, baixa um arquivo(.exe), abre um programa auxiliar e fecha. O programa auxiliar exclui o antigo, e renomeia o novo, abre-o e fecha-se; [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1910 (20061208) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1911 (20061208) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Verdade sobre fieldbyname
rsrsrsrsr como diz o prof pasquale trafico de q nesse caso, o certo é dizer: tráfego - Original Message - From: Luiz Escobar To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 4:26 PM Subject: Re: [delphi-br] Verdade sobre fieldbyname ah, desculpa não seria nem trafeco e sim tráfico... foi maus... agora veja bem durante um importação: 500.000 registros com 50 campos na tabela iria demorar +/- uns 25 segundos à mais.. ;-) mas numa tabela de 50 campos, onde a importação tem que ser feita usando algum tipo de converção/calculo/analise/filtro/etc... eu usaria fieldbyname, o usuario que espera neste caso +25 segundos... (e olha que fica olhando 25 segundos pra tela não é facil não...) agora se for um importação dequelas tipo cópia daqui-pra-li os campos na mesma sequencia tipo xerox um banco do outro vai de fields[] mesmo faço um FOR e poucas linhas eu alimento o outro banco... tipo: while not t1.eof() do begin t2.insert; for x := 0 to t1.fieldcount do t2.fields[x].asvalue := t1.fields[x].asvalue; t2.post; t1.next; end; Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br - Original Message - From: Marcelo To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 2:48 PM Subject: [delphi-br] Verdade sobre fieldbyname AMigos da lista, gostaria de saber da experiencia de vcs Vi em uma lista de discussão que o FieldByName deixa o tráfeco mais lento. Isso é verdade? Desde já agradeço a todos [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1911 (20061208) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Firebird no Windows Vista
Prezados(as) Senhores(as), Estou tentando realizar a instalação do Firebird no Windows Vista, porém sem grandes sucessos. Consigo instalar sem problemas a versão Classic, mas não consigo conectar com o banco de dados. Alguém já teve sucesso na instalação? Caso afirmativo, poderia compartilhar o processo que foi seguido? Fico aguardando comentários sobre o assunto. Atenciosamente, Marckson [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Palindromes - Palindromo
Cara, Não acompanhei todo o seu raciocínio mas o mais fácil para comparar palídromes é trabalhar com Strings. Ex: Function IsPalimdrome(strFirst, strSecond: String) : Boolean Var strComp: String; I : Integer; Begin strFirst := Replace(strFirst, ' ', ''); strSecond := Replace(strFirst, ' ', ''); strComp := ''; //Aqui você vai inverter a segunda string For i:= 1 to Length(strSecond) Do strComp := strComp + strSecond[i]; // se ambas as strings foram iguais a palavra é palíndroma Result := (strFirst = strComp); End; jscoutinho1 [EMAIL PROTECTED] escreveu: Bom dia a todos, Palindromes (ARARA, AVIVA, ATOYOTA, 12321, 2A3IEAS), então eu sei o que e um palindrome, so que eu não estou conseguindo fazer esse programa para comparação de palindrome. Eu ate fiz a logica são que não esta rodando em fonte... (Console do Delphi) Gostaria saber quem poderia me ajudar. program Polindromes; {$APPTYPE CONSOLE} uses SysUtils; var n1 :integer; n2 :integer; begin Writeln('Digite dois números de até 3 digitos'); Readln(n1,n2); if (n1 1000) and (n2 1000) then if (n1 100) and (n2 100) then if (n1 / 100 = n2 mod 10) then begin n1 := (n1 / 100); n2 := n2 mod 10; if (n1 / 10 = n2 mod 10) and (n1 mod 10 = n2 / 10) then Writeln('Os numeros são palindromes') else Writeln('Os numeros não são palindromes') end else writeln('Os numeros não são palindromes') end else if (n1 10) and (n2 10) and (n2 100) then if (n1 / 10 = n2 mod 10) and (n1 mod 10 = n2 / 10) then writeln('os numeros são palindromes') else writeln('Os numeors não são palindromes'); end else writeln('Os numeros não são palindromes'); end end end end. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos Valfrid-Ly Silva Couto [EMAIL PROTECTED] [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ 15114646 - Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Criar Função
Boa tarde para todos... Como faço para criar uma função onde o paramentro seja do tipo objeto? Fabiana [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Bloquear alteracao do dia/hora no pc
Alguem sabe como pelo Delphi eu bloqueio o acesso ao relogio do windows ??? Grato - Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Componente - Urgente!
A melhor forma é você montar um servidor Linux com o Asterisk. A parte to telemarketing funciona igual a equipamentos Lucent, com a vantagem de ser muitíssimo mais barato. Para isso você só precisa de uma boa máquina e uma placa Digium (é o único custo). De resto é só instalar o Asterisk. Você também terá o custo do PAP. Quanto ao PAP, sugiro você procurar no site da Lynksys. Existe um PAP que para cada ponto de rede você coloca 2 terminais. O monitoramento é feito por telnet (criei até um objeto em delphi para uma empresa que captura esses dados). Vale cada centavo. [ ]'s - Original Message - From: Ricardo Cesar Cardoso [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 3:48 PM Subject: Re: [delphi-br] Componente - Urgente! Puxa Luiz! Fiquei surpreso, já que nunca tinha reparado nestes componentes. Vou testar aqui tb pq eles me deram uma idéias... Valeu pela dica! Grato, Ricardo Luiz Escobar [EMAIL PROTECTED] escreveu: Te tem e FREE... procura sobre delphi modem VML no google ou no emule... a versão era: vml1.0.4 (acho...) (creio que esse seja o melhor para o que vc quer...) TModemLogFile TModemPort TModemProfile TNoModem TVoiceModem entre outros mas creio que ele vai te ajudar... mas que vai dar trabalho à isso vai ;-) agora acho que tem também o tmsgvoc e commdrv32_261a esse ultimo não sei se vai servir pra isso que vc quer Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br - Original Message - From: Ricardo Cesar Cardoso To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 07, 2006 4:51 PM Subject: Res: [delphi-br] Componente - Urgente! Olha, sem querer desanimar, mas é bastante coisa pra ser desenvolvida. Duvido muito que tenha componente pra estas funções e se tiver vai ser pago e vai custar caro. Mas dá uma procurada por componentes de telefonia em sites como o Torry.net ou Delphi Super Page. Abraços e sucesso, Ricardo. - Mensagem original De: fpsp2000 [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 7 de Dezembro de 2006 15:48:50 Assunto: [delphi-br] Componente - Urgente! Ola! Preciso desenvolver um sistema de telemarkting, onde o operador disque pelo sistema e use headset para falar com o cliente, e que o mesmo sistema seja capaz de disparar uma mensagem gravada. Alguem conhece algum componente que tenha essas funções. Fernanda de Paula !-- #ygrp-mlmsg {font-size:13px;font-family:arial,helvetica,clean,sans-serif;} #ygrp-mlmsg table {font-size:inherit;font:100%;} #ygrp-mlmsg select, input, textarea {font:99% arial,helvetica,clean,sans-serif;} #ygrp-mlmsg pre, code {font:115% monospace;} #ygrp-mlmsg * {line-height:1.22em;} #ygrp-text{ font-family:Georgia; } #ygrp-text p{ margin:0 0 1em 0; } #ygrp-tpmsgs{ font-family:Arial; clear:both; } #ygrp-vitnav{ padding-top:10px; font-family:Verdana; font-size:77%; margin:0; } #ygrp-vitnav a{ padding:0 1px; } #ygrp-actbar{ clear:both; margin:25px 0; white-space:nowrap; color:#666; text-align:right; } #ygrp-actbar .left{ float:left; white-space:nowrap; } .bld{font-weight:bold;} #ygrp-grft{ font-family:Verdana; font-size:77%; padding:15px 0; } #ygrp-ft{ font-family:verdana; font-size:77%; border-top:1px solid #666; padding:5px 0; } #ygrp-mlmsg #logo{ padding-bottom:10px; } #ygrp-vital{ background-color:#e0ecee; margin-bottom:20px; padding:2px 0 8px 8px; } #ygrp-vital #vithd{ font-size:77%; font-family:Verdana; font-weight:bold; color:#333; text-transform:uppercase; } #ygrp-vital ul{ padding:0; margin:2px 0; } #ygrp-vital ul li{ list-style-type:none; clear:both; border:1px solid #e0ecee; } #ygrp-vital ul li .ct{ font-weight:bold; color:#ff7900; float:right; width:2em; text-align:right; padding-right:.5em; } #ygrp-vital ul li .cat{ font-weight:bold; } #ygrp-vital a { text-decoration:none; } #ygrp-vital a:hover{ text-decoration:underline; } #ygrp-sponsor #hd{ color:#999; font-size:77%; } #ygrp-sponsor #ov{ padding:6px 13px; background-color:#e0ecee; margin-bottom:20px; } #ygrp-sponsor #ov ul{ padding:0 0 0 8px; margin:0; } #ygrp-sponsor #ov li{ list-style-type:square; padding:6px 0; font-size:77%; } #ygrp-sponsor #ov li a{ text-decoration:none; font-size:130%; } #ygrp-sponsor #nc { background-color:#eee; margin-bottom:20px; padding:0 8px; } #ygrp-sponsor .ad{ padding:8px 0; } #ygrp-sponsor .ad #hd1{ font-family:Arial; font-weight:bold; color:#628c2a; font-size:100%; line-height:122%; } #ygrp-sponsor .ad a{ text-decoration:none; } #ygrp-sponsor .ad a:hover{ text-decoration:underline; } #ygrp-sponsor .ad p{ margin:0; } o {font-size:0;} .MsoNormal {
[delphi-br] Listbox
Ola Pessoal! Galera seguinte, to tentando criar as colunas dinamicamente assim que houver necessidade em meu listbox desse jeito.. IF ListBox1.Items.Count = 10 Then begin ListBox1.Columns:= +1; ListBox1.Items.Add('teste'); end else ListBox1.Items.Add('teste'); quero que cada coluna me mostre 10 items, quando chegar a dez ele testa e adiciona uma nova coluna, funciona legal. só tem um único problema, quando adiciona a coluna ele ja cria a barra de rolagem em baixo, so que tem espaço para ele me mostrar a duas ate três colunas sem eu mover a barra so que não acontece isso, para eu ver a outra coluna tenho que mover a barra, gostaria de fazer algo que nem no msn que quando acaba uma coluna ele crie outra logo do lado, a minha ocupa toda a area de visualização. OBS. se eu criar as colunas e colocar dados staticos ele funciona desse jeito, tem algo para fazer nesse caso de diminuir o tamanho da coluna de acordo com os items. qualquer coisa se não fui bem claro me questionem ok... abraço. ___ Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Verdade sobre fieldbyname
Só para constar, fiz um teste. Usando uma tabela Paradox com: Total de registros: 202015 Total de Campos...: 94 Instruções 18.989.410 Inicio FieldByName: 16:40:09 Final FieldByName: 16:40:23 Tempo total 14 segundos Instruções 202015 Inicio FieldIndex: 16:40:23 Final FieldIndex: 16:40:29 Tempo total 6 segundos Usando um Select Sum(campo) levou 6 segundos. - Original Message - From: Fellipe Henrique [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 4:39 PM Subject: Re: [delphi-br] Verdade sobre fieldbyname Olá Luiz, na verdade seria Trafego, pois tráfico é crime organizado... :-) Na verdade, o FieldByName, nao gera peso sobre o trafego na rede, e sim de processamento, quando voce informa FieldByName, o delphi percorre todos os campos até achar o que você quer, já você informando o Fields[x] o delphi já vai direto nele. Ou seja, o trafego é de processamento e nao de rede. []s Em 08/12/06, Luiz Escobar [EMAIL PROTECTED] escreveu: ah, desculpa não seria nem trafeco e sim tráfico... foi maus... agora veja bem durante um importação: 500.000 registros com 50 campos na tabela iria demorar +/- uns 25 segundos à mais.. ;-) mas numa tabela de 50 campos, onde a importação tem que ser feita usando algum tipo de converção/calculo/analise/filtro/etc... eu usaria fieldbyname, o usuario que espera neste caso +25 segundos... (e olha que fica olhando 25 segundos pra tela não é facil não...) agora se for um importação dequelas tipo cópia daqui-pra-li os campos na mesma sequencia tipo xerox um banco do outro vai de fields[] mesmo faço um FOR e poucas linhas eu alimento o outro banco... tipo: while not t1.eof() do begin t2.insert; for x := 0 to t1.fieldcount do t2.fields[x].asvalue := t1.fields[x].asvalue; t2.post; t1.next; end; Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br - Original Message - From: Marcelo To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Friday, December 08, 2006 2:48 PM Subject: [delphi-br] Verdade sobre fieldbyname AMigos da lista, gostaria de saber da experiencia de vcs Vi em uma lista de discussão que o FieldByName deixa o tráfeco mais lento. Isso é verdade? Desde já agradeço a todos [As partes desta mensagem que não continham texto foram removidas] -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.432 / Virus Database: 268.15.14/578 - Release Date: 07/12/2006 01:27
Re: [delphi-br] Bloquear alteracao do dia/hora no pc
Bloquear como? O que você quer fazer? Em 08/12/06, Licerio Neto [EMAIL PROTECTED] escreveu: Alguem sabe como pelo Delphi eu bloqueio o acesso ao relogio do windows ??? Grato - Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas! [As partes desta mensagem que não continham texto foram removidas] -- By Maira_LRB [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Verdade sobre fieldbyname
VC leu meus outros emails ??? hehehehe é eu sei... mas vc viu o tempo ??? não acho que compense em um aplicação usar fields[] ao inves de fieldbyname o que facilita durante a programação é como eu disse se vc for fazer um programa para processar em LOTE, varios registros de um vez.. etc... ai TALVEZ, dependendo da maquina que vai executar isso, compence usar fields[] (eca...), mas para à aplicação do dia-a-dia, cadastros, views/dbgrid, relatórios, edição, etc fieldbyname é o melhor e os certos são... tráfico de traficante, drogas, animais, etc.. tráfego de trafegar, trafego de automovel de bicicleta, etc... trafeco ?? bem ai num sei não hehhee abraços... Luiz Escobar Analista/Desenvolvedor: - Original Message - From: Fellipe Henrique To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 4:39 PM Subject: Re: [delphi-br] Verdade sobre fieldbyname Olá Luiz, na verdade seria Trafego, pois tráfico é crime organizado... :-) Na verdade, o FieldByName, nao gera peso sobre o trafego na rede, e sim de processamento, quando voce informa FieldByName, o delphi percorre todos os campos até achar o que você quer, já você informando o Fields[x] o delphi já vai direto nele. Ou seja, o trafego é de processamento e nao de rede. []s Em 08/12/06, Luiz Escobar [EMAIL PROTECTED] escreveu: ah, desculpa não seria nem trafeco e sim tráfico... foi maus... agora veja bem durante um importação: 500.000 registros com 50 campos na tabela iria demorar +/- uns 25 segundos à mais.. ;-) mas numa tabela de 50 campos, onde a importação tem que ser feita usando algum tipo de converção/calculo/analise/filtro/etc... eu usaria fieldbyname, o usuario que espera neste caso +25 segundos... (e olha que fica olhando 25 segundos pra tela não é facil não...) agora se for um importação dequelas tipo cópia daqui-pra-li os campos na mesma sequencia tipo xerox um banco do outro vai de fields[] mesmo faço um FOR e poucas linhas eu alimento o outro banco... tipo: while not t1.eof() do begin t2.insert; for x := 0 to t1.fieldcount do t2.fields[x].asvalue := t1.fields[x].asvalue; t2.post; t1.next; end; Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br - Original Message - From: Marcelo To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Friday, December 08, 2006 2:48 PM Subject: [delphi-br] Verdade sobre fieldbyname AMigos da lista, gostaria de saber da experiencia de vcs Vi em uma lista de discussão que o FieldByName deixa o tráfeco mais lento. Isso é verdade? Desde já agradeço a todos [As partes desta mensagem que não continham texto foram removidas] -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Compara OnClick com NIL
Sim, mas o mais importante vc num mencionou. Esse erro acontece quando compila o projeto ou só na hora que executa? Pq pra essa mensagem num tem nada haver com esse teste que vc tá fazendo! Sds. From: Leodinei Bielak [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br delphi-br@yahoogrupos.com.br Subject: [delphi-br] Compara OnClick com NIL Date: Thu, 7 Dec 2006 16:10:28 -0200 Olá. Tem como eu checar se o evento OnClick é nulo? Eu tentei if OnClick = nil then e está dando a mensagem de Not Enough Actual Parameters. Valeu -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however.. _ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br
RES: [delphi-br] Atualização automática
Para fechar o programa tente desta forma. HNDMens := FindWindowEx(0,0,nil,PChar(fPrograma)); If Not isWindow(HNDMens) then Begin //Senão esta em Execução WinExec(Pchar(fPath+'\'+fPrograma+'.EXE'),0); End Else Begin //Em Execução //FINALIZA PROGRAMA PostMessage(HNDMens,WM_QUIT,0,0); Sleep(1000); Application.ProcessMessages; End; De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de willer Enviada em: sexta-feira, 8 de dezembro de 2006 17:16 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Atualização automática Valeu pela dica. Vou fazer desse jeito. E é usuário quem fecharia o programa par que a atualização fosse feita. Gostei da idéia, vou implelentar. - Original Message - From: Luiz Escobar To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, December 08, 2006 4:35 PM Subject: Re: [delphi-br] Atualização automática Bom na logica, antes de fechar,copiar,abrir o executavel, é melhor vc fazer a perguntinha basica pro usuario, vc tem uma atualziação para este software, deseja fazer agora ? e que a pargunta se repita tipo a cada 30 minutos, se não o usuário vai querer te matar... ehhehehe quanto a uma aplicação fechar outra, sei que tem jeito, mas de cabeça agora não lembro desculpe... Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br http://www.megasistema.com.br - Original Message - From: willer To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, December 08, 2006 3:22 PM Subject: Re: [delphi-br] Atualização automática Só tenho dúvida na lógica. Já consigo verificar se há atualização e até baixar os novos arquivos, só não estou conseguindo fechar o executável e abró-lo novamente com a nova versão. - Original Message - From: Marcelo Hoepfner (SI) To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, December 08, 2006 1:57 PM Subject: RES: [delphi-br] Atualização automática Cara eu fiz um sistema desses, caso você tenha interesse podemos negociar. Marcelo Hoepfner msn: [EMAIL PROTECTED] mailto:mehvsc%40hotmail.com _ De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br ] Em nome de Andrei Luís Enviada em: sexta-feira, 8 de dezembro de 2006 13:22 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Atualização automática Willer, Uma idéia seria você utilizar no seu sistema 2 executáveis: 1 pequeno, que será executado através de ícones na área de trabalho, etc, que faz a atualização quando necessário e chama o 2º executável que é o sistema em si. [] Andrei Em 08/12/06, willer[EMAIL PROTECTED] mailto:willer%40personalcom.com.br mailto:willer%40personalcom.com.br escreveu: Como faço para fechar o meu programa após ter aberto outro? Estou implementando uma rotina de atualização automáticxa que deverá fzer isso, baixa um arquivo(.exe), abre um programa auxiliar e fecha. O programa auxiliar exclui o antigo, e renomeia o novo, abre-o e fecha-se; [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1910 (20061208) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1911 (20061208) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Livro de Multicamada c/ Delphi
Pessoal, Alguém sabe alguma livraria que ainda tem o livro abaixo para vender. Já procurei na internet e não encontrei nada, ou então um outro livro similar para que eu possa começar desenvolver um sistema nesse novo conceito de multicamada. Obrigado a todos, Vantuil. Livro: Sistemas Multicamadas com Delphi( DataSnap e dbExpress) Conceitos, Implementação e Macetes Autor: Anderson Haertel Rodrigues Editora: Visual Books - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Aplicação dxGrid para cxGrid
Pessoal, gostaria de perguntar a todos, se alguém da lista já criou algum programa para varrer os DFMs de uma aplicação para converter o dxGrid para cxGrid da Developer Express. Pra ser mais específico: alguém já fez isso alguma vez e tem isso pronto? A empresa aqui possui um ERP muito grande (é modular e tem mais de 100 bpls), e já adianto o seguinte: Migrar manualmente é impossível, o custo não seria suportado pelos clientes. Pretendemos migrar dos grids DX para os grids CX devido a uma atualização comprada da DevX recentemente. Então a idéia seria que uma aplicação trocasse os componentes nos forms e somente os métodos e outros itens mais difíceis de rastrear seriam feitos manualmente mesmo. []'s a todos Eric D. - Desenvolvimento e Soluções de Tecnologia [EMAIL PROTECTED] Talk is cheap, show me the code... [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Criar Função
Ora, simples: function NomeDaFuncao(ParamObjeto: TObject): TipoDoRetorno; Sds. From: Fabiana [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Criar Função Date: Fri, 8 Dec 2006 13:19:42 -0200 Boa tarde para todos... Como faço para criar uma função onde o paramentro seja do tipo objeto? Fabiana [As partes desta mensagem que não continham texto foram removidas] _ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br
Re: [delphi-br] Aplicação dxGrid para cxGrid
Procure pela Ferramento Gexperts, ela faz isso pra vc num piscar de olhos. Em 08/12/06, Eric D. [EMAIL PROTECTED] escreveu: Pessoal, gostaria de perguntar a todos, se alguém da lista já criou algum programa para varrer os DFMs de uma aplicação para converter o dxGrid para cxGrid da Developer Express. Pra ser mais específico: alguém já fez isso alguma vez e tem isso pronto? A empresa aqui possui um ERP muito grande (é modular e tem mais de 100 bpls), e já adianto o seguinte: Migrar manualmente é impossível, o custo não seria suportado pelos clientes. Pretendemos migrar dos grids DX para os grids CX devido a uma atualização comprada da DevX recentemente. Então a idéia seria que uma aplicação trocasse os componentes nos forms e somente os métodos e outros itens mais difíceis de rastrear seriam feitos manualmente mesmo. []'s a todos Eric D. - Desenvolvimento e Soluções de Tecnologia [EMAIL PROTECTED] ericdesenv%40yahoo.com.br Talk is cheap, show me the code... [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Palindromes - Palindromo
Vc tem que fazer um loop que inverta a string, manja? Vai dando Copy() comecando do fim até o inicio e montando outra frase Ao fim do loop vc vai ter uma string examente ao inverso da original Compara as duas e se for igual é palindromo - Original Message - From: jscoutinho1 To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 10:44 AM Subject: [delphi-br] Palindromes - Palindromo Bom dia a todos, Palindromes (ARARA, AVIVA, ATOYOTA, 12321, 2A3IEAS), então eu sei o que e um palindrome, so que eu não estou conseguindo fazer esse programa para comparação de palindrome. Eu ate fiz a logica são que não esta rodando em fonte... (Console do Delphi) Gostaria saber quem poderia me ajudar. program Polindromes; {$APPTYPE CONSOLE} uses SysUtils; var n1 :integer; n2 :integer; begin Writeln('Digite dois números de até 3 digitos'); Readln(n1,n2); if (n1 1000) and (n2 1000) then if (n1 100) and (n2 100) then if (n1 / 100 = n2 mod 10) then begin n1 := (n1 / 100); n2 := n2 mod 10; if (n1 / 10 = n2 mod 10) and (n1 mod 10 = n2 / 10) then Writeln('Os numeros são palindromes') else Writeln('Os numeros não são palindromes') end else writeln('Os numeros não são palindromes') end else if (n1 10) and (n2 10) and (n2 100) then if (n1 / 10 = n2 mod 10) and (n1 mod 10 = n2 / 10) then writeln('os numeros são palindromes') else writeln('Os numeors não são palindromes'); end else writeln('Os numeros não são palindromes'); end end end end. [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Bloquear alteracao do dia/hora no pc
Vc naum folow a versão .do windows..mais isso vc faz com police . GPO..na que o adm da sua rede não possa fazer... Windows 2000 e XP tem um utilitário chamado GPEDIT.MSC vai no executar e digita isso ai Tome cuidado... Vc pode fazer via AD- Active Directory Abs, Rodrigo Mota. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Licerio Neto Enviada em: sexta-feira, 8 de dezembro de 2006 15:55 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Bloquear alteracao do dia/hora no pc Alguem sabe como pelo Delphi eu bloqueio o acesso ao relogio do windows ??? Grato - Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Conecta a um banco de dados onLine
Que componente(s) eu usaria para fazer a conexão? - Original Message - From: Eduardo Silva dos Santos To: delphi-br@yahoogrupos.com.br Sent: Friday, December 08, 2006 6:41 PM Subject: Re: [delphi-br] Conecta a um banco de dados onLine é perfeitamento possível, e te adianto que mysql funciona muuuito rapido em conexões via internet. de mais detalhes que eu te ajudo. Em 08/12/06, willer [EMAIL PROTECTED] escreveu: Alguém sabe se é possível fazer com que um aplicativo se comunique com um banco de dados onLine, banco de dados MySql.? [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1911 (20061208) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Verdade sobre fieldbyname
--- Luiz Escobar escreveu: ah, desculpa não seria nem trafeco e sim tráfico... foi maus... (...) [--x--] [Welson] Ehehehe... a emenda saiu pior do que o soneto. XD = 'O que me preocupa não é o grito dos maus. É o silêncio dos bons.' Martin Luther King. = Welson de Avelar Soares Filho Analista/Programador Delphi Gemini Sistemas www.geminisistemas.com.br Juiz de Fora - Minas Gerais = ___ Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas ! http://br.answers.yahoo.com/
Re: [delphi-br] Conecta a um banco de dados onLine
Qualquer um, a conexão é feita igual à na rede local. eu uso myDAC www.crlab.com mas também ja usei ZEOS. Em 08/12/06, willer [EMAIL PROTECTED] escreveu: Que componente(s) eu usaria para fazer a conexão? - Original Message - From: Eduardo Silva dos Santos To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Friday, December 08, 2006 6:41 PM Subject: Re: [delphi-br] Conecta a um banco de dados onLine é perfeitamento possível, e te adianto que mysql funciona muuuito rapido em conexões via internet. de mais detalhes que eu te ajudo. Em 08/12/06, willer [EMAIL PROTECTED]willer%40personalcom.com.br escreveu: Alguém sabe se é possível fazer com que um aplicativo se comunique com um banco de dados onLine, banco de dados MySql.? [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1911 (20061208) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Usar ou não usar DBWar es? Eis a questão!
--- mrbar2000 escreveu: Oi bruno concordo contigo. Dephi é RAD, ó OO, é Fantásticô!!! :) O problema nao é o delphi ou a borland, nao me entenda mal, o problema foi que apesar de poder trabalhar delphi OO dificilmente vemos literatura mostrando o uso puramente OO. Seria legal se vc pudesse montar um exemplozinho de como vc tá fazendo ai uma simples agendazinha (pessoa - agenda - compromisso), utilizando os recursos de OO e o RAD do delphi. Será que vc poderia postar este pequeno exemplo para poder a galera começar a ver isso de perto? [--x--] [Welson] Bom, você pode partir pra dois caminhos: um é debulhar material sobre OO e ler no help do Delphi como ele implementa a OO (através de diretivas e outras coisas). Ou debulhar material sobre modelagem de sistemas e a partir dos diagramas em mãos, implementar no Delphi (invariavelmente usando OO). Bom, acaba que no final das contas, esses dois caminhos na verdade formam um mesmo caminho. Cabe aqui uma observação minha: eu acho a implementação de POO muito mais facilitada no Java. Ainda não peguei C#, mas dizem que também é traquilo. []s. = 'O que me preocupa não é o grito dos maus. É o silêncio dos bons.' Martin Luther King. = Welson de Avelar Soares Filho Analista/Programador Delphi Gemini Sistemas www.geminisistemas.com.br Juiz de Fora - Minas Gerais = ___ Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas ! http://br.answers.yahoo.com/
Re: [delphi-br] Criar Função
uma function ou procedure ??? procedure TForm1.Button1Click(Sender: TObject); procedure blabla ( obj1 : tedit; obj2 : tlabel ); begin obj2.Caption := obj1.Text; end; begin blabla( edit1, label1 ); // é igual à label1.caption := edit1.text; end; Luiz Escobar - Segue mensagem original! - De: Fabiana [EMAIL PROTECTED] Data: Fri, 8 Dec 2006 13:19:42 -0200 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Criar Função Boa tarde para todos... Como faço para criar uma função onde o paramentro seja do tipo objeto? Fabiana [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Busca por data
ola pessoal Estou tentando fazer uma bucar por data mais da o seguinte erro conversion error from string 0 alguem saber como posso tratar deste erro, abaixo vai a procedure de busca DM.CDSAgendamento.Close; DM.QryAgendamento.SQL.Clear; // DM.QryAgendamento.SQL.Text:='SELECT * FROM AGENDAMENTO WHERE COD_ALUNO = '+pcod+ ' and DATA Between '+DateToStr(pdtini)+ ' and '+DateToStr(pdtfim)+''; DM.CDSAgendamento.Open; --- no delphi compilando passo a passo ele encontra-se desse jeito DM.QryAgendamento.SQL.Text:='SELECT * FROM AGENDAMENTO WHERE COD_ALUNO = 50 and DATA between (12/06/2006) and (31/12/2006)' [As partes desta mensagem que não continham texto foram removidas]