Re: [delphi-br] Qual o limite para cada linha de um StringList?
2008/12/18 Fellipe Henrique felli...@gmail.com: Amigos, existe um limite de caracteres por linha de um StringList? estou pensando em por um texto que tem no minimo uns 6000 caracteres, daí pra mais... A dúvida deve estar mais do que resolvida, mas vai a informação assim mesmo: um StringList armazena uma lista de ansi strings. Uma ansi string pode ter até 2Gb, ou pouco mais de 2 bilhões de caracteres ansi. Uma StringList pode ter tantas ansi strings quanto sua máquina e seu SO suportarem. -- Joao Morais
Re: [delphi-br] Gostaria de uma idéia para trabalhar com pacotes
2008/12/19 Fellipe Henrique felli...@gmail.com: Bom, o que me fez desistir dos BPLs foi justamente o problema de, vamos supor, você tem sua tela Basic, e mais 10 telas herdadas dela... se você modificar o pacote do Basic, você terá que recompilar todos os BPLs que usam ela...o que a frase BPL dinâmico fica a desejar... como assim dinâmico se tenho que recompilar a maioria dos BPLs?!?! Dinâmico porque linkado com seu .exe tempo de execução, e não porque é mágico. Agora imagina você ter um BPL com várias classes de funções e etc. usada em TODOS os seus BPLs... você modifica sua BPL de funções e teria que recompilar TODAS as BPLs e enviar para o cliente, olha a trabalheira! Bom, até o momento não descobri um jeito de não cair neste problema, se alguém souber passo a gostar novamente de BPLs.. :o).. até lá, não vejo muita vantagem em usar BPLs... Enquanto você não mudar a interface das suas units, você não terá problema. A interface da unit é justamente aquela parte entre o interface e o implementation. Se você mudar apenas código, você provavelmente conseguirá compatibilidade. -- Joao Morais
Re: [delphi-br] Usando Indy - SMTP
A porta do yahoo é 587. --- Em sáb, 27/12/08, Dener (SOFTClass) lis...@softclass.com.br escreveu: De: Dener (SOFTClass) lis...@softclass.com.br Assunto: Re: [delphi-br] Usando Indy - SMTP Para: delphi-br@yahoogrupos.com.br Data: Sábado, 27 de Dezembro de 2008, 14:19 Amarra o IdSMTP com um componente IdSSLIOHandlerSocke tOpenSSL (Indy 10) no Indy 9 eu tentei e não consegui fazer funcionar, segue o meu código, testei com gmail, terra e uol. // Conecta with IdSMTP do begin Host := SMTPServidor; Username := SMTPUsuario; Password := SMTPSenha; Port := SMTPPorta; AuthType := satNone; if SMTPAutenticar = 'S' then AuthType := satDefault; IdSMTP.IOHandler := nil; if SMTPSSL = 'S' then begin IdSMTP.IOHandler := IdSSL; UseTLS := utUseRequireTLS; end; with IdLog do begin Filename := 'C:\LOG.LOG' ; IdSMTP.Intercept := IdLog; Active := (SMTPLog='S' ); end; try Connect; if SMTPAutenticar = 'S' then Authenticate; except on Erro:Exception do begin MsgMensagem := 'Não foi possível conectar ao servidor'; MsgAjuda := 'Erro informado:'+ #13+#10+Erro. Message; MsgError; Exit; end; end; end; // Envia o email try with IdSMTP do begin try Send(IdSMTPMessage) ; finally Disconnect; end; end; except on Erro:Exception do begin MsgMensagem := 'Erro no envio das informações'; MsgAjuda := 'Erro informado:'+ #13+#10+Erro. Message; MsgError; Exit; end; end; Tenta aí, se não der te mando o pedaço do código que controlo isso. Dener Coutinho - Yahoo escreveu: Pessoal Tenho feito meus envios de e-mail, usando o componente da Jedi... agora, tenho tentado usar a Indy. Quando uso o servidor de smtp do provedor Terra, com a porta 25, funciona que é uma beleza, mas quando uso o do yahoo, ou gmail, etc... porta 465 a coisa pega... dá um erro de socket, e aí fiquei vendido, pois tentei achar pelo google e até no próprio site da Indy sobre envio de e-mail para servidores com conexão segura, e dei com os burros n'água. Alguém já conseguiu fazer isso, e pode me dar uma LUZ? Desde já agradeço. Emanuel Coutinho Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Erro ao registrar dll
Bom dia. Feliz Natal e Feliz Ano Novo ...rsss bom, era demais esperar passar o ano novo sem um problema nhe!!!..rss bom estou tentando registrar uma dll usando o regsrv32 e me retorna um 'erinho'..rsss DllRegisterServer em caminho para DLL falha. Return código foi: 0 x 80004005 Já procurei no google e este erro tem as pencas, mas solução nenhuma encontrei. se alguem já passou por isto agradeço a sugestão. Atenc Elazar Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com
RE: [delphi-br] Qual o limite para cada linha de um StringList?
Não poderia ter respondido melhor, mestre João! Excelente explanação! Sds. To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Mon, 29 Dec 2008 08:27:13 -0200 Subject: Re: [delphi-br] Qual o limite para cada linha de um StringList? 2008/12/18 Fellipe Henrique: Amigos, existe um limite de caracteres por linha de um StringList? estou pensando em por um texto que tem no minimo uns 6000 caracteres, daí pra mais... A dúvida deve estar mais do que resolvida, mas vai a informação assim mesmo: um StringList armazena uma lista de ansi strings. Uma ansi string pode ter até 2Gb, ou pouco mais de 2 bilhões de caracteres ansi. Uma StringList pode ter tantas ansi strings quanto sua máquina e seu SO suportarem. -- Joao Morais _ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! http://video.msn.com/?mkt=pt-br
Re: [delphi-br] Usando Indy - SMTP
AGRADECIMENTOS Quero empenhadamente agradecer aos colegas que me ajudaram. FUNCIONOU!!! Consegui passar a mensgem usando o servidor do Yahoo!!! A Propósito, no site eles informam porta 465, mas a que funcionou foi a 587.. Desta forma, agora é só ver como será com o GMAIL e Ig.. aí meu programinha estará prontinho... Brigadão Gente... FELIZ 2009 PRÁ TODO MUNDO Emanuel coutinho
[delphi-br] TreeView
Pessoal, tenho um componente TreeView, e toda vez que clico em cima dele do Node a descrição fica em modo editavel? como eu poderia resolver isso para nao acontecer mais? Valeu
[delphi-br] Re: TreeView
É só você colocar a Propriedade ReadOnly do Componente TreeView para False. Abraços. --- Em delphi-br@yahoogrupos.com.br, dhsb dionata...@... escreveu Pessoal, tenho um componente TreeView, e toda vez que clico em cima dele do Node a descrição fica em modo editavel? como eu poderia resolver isso para nao acontecer mais? Valeu
[delphi-br] Ultimos lançamentos
Boa tarde minha dúvida e a seguinte ao fazer uma consulta ao banco de dados SQL Server atraves de uma query tem como no dbgrid aparecer apenas os 10 ultimos lançamentos??? Pois na abertura do formulários trago os movimentos do mês e esta ficando grande a quantidade de itens Sergio Jundiai -- 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-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: TreeView
Me Desculpe mas acho que deve ser para True... Wesley From: denilsonass2008 Sent: Monday, December 29, 2008 4:03 PM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Re: TreeView É só você colocar a Propriedade ReadOnly do Componente TreeView para False. Abraços. --- Em delphi-br@yahoogrupos.com.br, dhsb dionata...@... escreveu Pessoal, tenho um componente TreeView, e toda vez que clico em cima dele do Node a descrição fica em modo editavel? como eu poderia resolver isso para nao acontecer mais? Valeu __ Information from ESET NOD32 Antivirus, version of virus signature database 3721 (20081229) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Dúvida com TStringList
Outra alternativa, é antes de adicionar o texto no StringList você pode verificar se a função POS retornar maior que zero, caso sim é porque o texto já existe no StringList, então você não adiciona, o StringList tem a propriedade Text, então você faz o seguinte, IF Pos(Edit1.Text, StringList.text) 0 THEN Begin ShowMessage(Existe...) End; De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Guionardo Furlan Enviada em: sábado, 27 de dezembro de 2008 11:15 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Dúvida com TStringList Usar a propriedade Duplicates do TStringList não resolve teu problema? 2008/12/15 deco0_07 andre.alme...@medicator.com.br mailto:andre.almeida%40medicator.com.br : Tem como eu descobrir o indice de um determinada linha do StringList? ex... tenho um edit com as linha que nao quero copiar usar um for pra percorrer todas as linhas e num if verificar se a linha que esta no stringlist é igual a que esta no edit o problema é que nao consigo pegar o indice dessa linha... ja usei indexof, mas se tenho linhas com valores repetidos ele ignora tbm... vlww's -- Timeo hominem unius libri Cogito ergo sum - Carpe diem []s Guionardo Furlan http://guionardo.blogspot.com __ Informação do NOD32 IMON 3719 (20081227) __ 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] Problema com Objetos da classe TInterfacedObject + uma interface
Boa noite pessoal estou tendo problemas com uma classe que estou desenvolvendo a partir de um curso de OO. Neste curso é criado algumas interfaces e alguns objetos que implementam as mesmas. Uma das Interface é como se fosse uma entidade a ser persistida no banco de dados e uma outra é a classe responsável por persistir (DAO). O problema que estou encontrando é que após o dao persistir o objeto, ele chama o destructor do objeto persistido, mas eu não destrui o mesmo. Debugando descobri que o campo que conta as referencias do objeto fica com valor 0 (zero) após a persistencia, mas ainda existe uma variavel local que está fazendo referencia ao meu objeto. alguém sabe como me ajudar nisso? desde já agradeço -- Thales Eduardo Barros de Oliveira Desenvolvedor Delphi / Firebird / Java Emails: tebosoftw...@gmail.com (GoogleTalk) thales_...@hotmail.com (MSN) Blog: http://tebosoftware.blogspot.com/ Tente ser uma pessoa de valor, não de sucesso Albert Einstein [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Problema com Objetos da classe TInterfacedObject + uma interface
2008/12/29 Thales (Shubacca) - Tebo Software tebosoftw...@gmail.com: O problema que estou encontrando é que após o dao persistir o objeto, ele chama o destructor do objeto persistido, mas eu não destrui o mesmo. Debugando descobri que o campo que conta as referencias do objeto fica com valor 0 (zero) após a persistencia, mas ainda existe uma variavel local que está fazendo referencia ao meu objeto. alguém sabe como me ajudar nisso? Parece que você está misturando ponteiros para objetos e ponteiros para interface. O gerenciamento de memória do Delphi, no que tange interfaces, é feito com contagem de referência: associação conta mais um, alteração do ponteiro ou saída de escopo conta menos um. Mas se você faz com que um ponteiro para objeto aponte para objetos que também tem interfaces apontando, tão logo as interfaces saiam de escopo e o objeto será destruído, deixando aquele ponteiro referenciando uma área de memória inválida. Mais ou menos assim: var VObjI: IObj; // interface VObjO: TObj; // TObj implementa IObj begin VObjO := TObj.Create; VObjI := VObjO; VObjI := nil; VObjO.Free; // erro end; Caso o problema seja este, então ou você não mistura ponteiros para objeto com ponteiros para interface, ou contorna da mesma forma que eu contornei: http://blog.joaomorais.com.br/2008/09/06/objetos-contagem-ref.html Se não for, detalhe melhor a sua implementação. -- Joao Morais
[delphi-br] File not found: proxies.dcu
Pessoal, Ao compilar o projeto que usa um componente por mim desenvolvido dá esse erro. Essa unit Proxies está incluída na unit DesignEditors. O mais estranho é que o projeto nao compila em uma máquina, mas compila em outra, e em nenhuma delas existe a unit proxies. Tem mais um fato muito estranho: Se eu compilar com a opçao ´Build with runtimes packages´, o projeto compila. Alguém pode me dar uma luz? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Ultimos lançamentos
Nao sei a sintaxe no SQL server, mas no Firebird voce pode selecionar os 100 primeiros da seguinte forma: SELECT first 100 Campo1, Campo2, Campo3... FROM Tabela Voce pode também fazer a consulta e jogar os 100 primeiros registros para um clientdataset __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/ -- 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-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RE: RES: [delphi-br] Dúvida com TStringList
Ou então usar algo mais elegante através de métodos do próprio TStringList. if StringList1.IndexOf(Edit1.Text) 0 then { seu código aqui! } Outra sugestão é usar a propriedade Duplicates para simplificar ainda mais o tratamento de duplicidades quando adicionar strings a um TStringList. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: smjjuli...@yahoo.com.br Date: Mon, 29 Dec 2008 10:36:18 -0300 Subject: RES: [delphi-br] Dúvida com TStringList Outra alternativa, é antes de adicionar o texto no StringList você pode verificar se a função POS retornar maior que zero, caso sim é porque o texto já existe no StringList, então você não adiciona, o StringList tem a propriedade Text, então você faz o seguinte, IF Pos(Edit1.Text, StringList.text) 0 THEN Begin ShowMessage(Existe...) End; De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Guionardo Furlan Enviada em: sábado, 27 de dezembro de 2008 11:15 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Dúvida com TStringList Usar a propriedade Duplicates do TStringList não resolve teu problema? 2008/12/15 deco0_07 : Tem como eu descobrir o indice de um determinada linha do StringList? ex... tenho um edit com as linha que nao quero copiar usar um for pra percorrer todas as linhas e num if verificar se a linha que esta no stringlist é igual a que esta no edit o problema é que nao consigo pegar o indice dessa linha... ja usei indexof, mas se tenho linhas com valores repetidos ele ignora tbm... vlww's -- Timeo hominem unius libri Cogito ergo sum - Carpe diem []s Guionardo Furlan http://guionardo.blogspot.com __ Informação do NOD32 IMON 3719 (20081227) __ 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] _ Organize seus contatos! O jeito mais fácil de manter a sua lista de amigos sempre em ordem! http://www.microsoft.com/windows/windowslive/events.aspx
RE: RES: [delphi-br] Dúvida com TStringList
Ou então usar algo mais elegante através de métodos do próprio TStringList. if StringList1.IndexOf(Edit1.Text)= 0 then { seu código aqui! } Outra sugestão é usar a propriedade Duplicates para simplificar ainda mais o tratamento de duplicidades quando adicionar strings a um TStringList. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: smjjuli...@yahoo.com.br Date: Mon, 29 Dec 2008 10:36:18 -0300 Subject: RES: [delphi-br] Dúvida com TStringList Outra alternativa, é antes de adicionar o texto no StringList você pode verificar se a função POS retornar maior que zero, caso sim é porque o texto já existe no StringList, então você não adiciona, o StringList tem a propriedade Text, então você faz o seguinte, IF Pos(Edit1.Text, StringList.text) 0 THEN Begin ShowMessage(Existe...) End; De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Guionardo Furlan Enviada em: sábado, 27 de dezembro de 2008 11:15 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Dúvida com TStringList Usar a propriedade Duplicates do TStringList não resolve teu problema? 2008/12/15 deco0_07 : Tem como eu descobrir o indice de um determinada linha do StringList? ex... tenho um edit com as linha que nao quero copiar usar um for pra percorrer todas as linhas e num if verificar se a linha que esta no stringlist é igual a que esta no edit o problema é que nao consigo pegar o indice dessa linha... ja usei indexof, mas se tenho linhas com valores repetidos ele ignora tbm... vlww's -- Timeo hominem unius libri Cogito ergo sum - Carpe diem []s Guionardo Furlan http://guionardo.blogspot.com __ Informação do NOD32 IMON 3719 (20081227) __ 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] _ Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o Messenger! É GRÁTIS! http://www.msn.com.br/emoticonpack
[delphi-br] Re: Problema com Objetos da classe TInterfacedObject + uma interface
Pelo que entendi João, todas as classes, eu deveria mudar para esta que sugere e quando fosse apontado a uma variavel, ou adicionado a uma lista, deferia executar a função addRef, e quando não mais fosse usar, deveria executar o FreeInstance? um pouco diferente, mas muito interessante. obrigado pela dica