[delphi-br] Problemas quando aplicativo roda do windows server 2003
Tenho um cliente com problemas, e estou tentando ajudar. Na rede, com 6 maquinas cliente xp, e 1 server 2003. nos xp roda que é uma beleza o programa o banco de dados é firebird e esta' no server 2003. o bicho pego é quando tenta rodar no server 2003. simplesmente, o negocio dá um erro, 216 at 00404A36, rodei o debug , procurei o erro, que mostrou uma sequencia de erro no arquivo system. numa pequena função que libera algo da memória. no arquivo delphi7\source\rtl\system.pas procedure TObject.Free; begin if Self nil then Destroy;= ///erro aqui end; Como resolver essa pedencia, o negocio mais complicado que achei seria encontrar o endereço do erro, agora que achei , o negócio na prática está meio obscuro. Alguem já passou por isso, numa maquina roda o negocio e outra náo, no meu caso aqui é muito especifico,, xp roda, w2003, nao roda. -- Leonardo Quinino [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Problemas quando aplicativo roda do windows server 2003
Usa esta unit em anexo no .dpr, ve se resolve... leia mais em http://www.codexterity.com º.·´¯`·. º.·´¯`·. º.·´¯`·. Omar L. M. Rosa º.·´¯`·. º.·´¯`·. º.·´¯`·. o...@conesul.inf.br - Original Message - From: Leonardo Quinino To: delphi-br@yahoogrupos.com.br ; delphitodel...@yahoogrupos.com.br ; delphi_soprogramado...@yahoogrupos.com.br ; delphi-oop...@yahoogrupos.com.br Sent: Friday, July 24, 2009 9:16 AM Subject: [delphi-br] Problemas quando aplicativo roda do windows server 2003 Tenho um cliente com problemas, e estou tentando ajudar. Na rede, com 6 maquinas cliente xp, e 1 server 2003. nos xp roda que é uma beleza o programa o banco de dados é firebird e esta' no server 2003. o bicho pego é quando tenta rodar no server 2003. simplesmente, o negocio dá um erro, 216 at 00404A36, rodei o debug , procurei o erro, que mostrou uma sequencia de erro no arquivo system. numa pequena função que libera algo da memória. no arquivo delphi7\source\rtl\system.pas procedure TObject.Free; begin if Self nil then Destroy; = ///erro aqui end; Como resolver essa pedencia, o negocio mais complicado que achei seria encontrar o endereço do erro, agora que achei , o negócio na prática está meio obscuro. Alguem já passou por isso, numa maquina roda o negocio e outra náo, no meu caso aqui é muito especifico,, xp roda, w2003, nao roda. -- Leonardo Quinino [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] Problemas quando aplicativo roda do windows server 2003
A lista não aceita anexos, use a seção de arquivos do Grupo Yahoo e deixe o arquivo lá, quem tiver interesse faz o download. omar l m rosa escreveu: Usa esta unit em anexo no .dpr, ve se resolve... .
Re: [delphi-br] Problemas quando aplicativo roda do windows server 2003
Olha Leonardo, dei uma conferida aqui no Delphi 2005 com Update2 e o código bate com o que vc passou. O detalhe é que logo acima de TObject.Free existe um destructor chamado... Destroy! Veja se o código bate com o que vc tem aí: [ início ] destructor TObject.Destroy; begin end; [ final ] Não sei, mas tenho a leve impressão de que é algo no seu software... qual é a instrução ou o contexto do teu software onde o problema aparece? É ao finalizar o programa, ao iniciar, ao executar alguma rotina em especial? Abraço, Ricardo. 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS. 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor compreendida. 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em sex, 24/7/09, Leonardo Quinino leonardo.quin...@gmail.com escreveu: Tenho um cliente com problemas, e estou tentando ajudar. Na rede, com 6 maquinas cliente xp, e 1 server 2003. nos xp roda que é uma beleza o programa o banco de dados é firebird e esta' no server 2003. o bicho pego é quando tenta rodar no server 2003. simplesmente, o negocio dá um erro, 216 at 00404A36, rodei o debug , procurei o erro, que mostrou uma sequencia de erro no arquivo system. numa pequena função que libera algo da memória. no arquivo delphi7\source\ rtl\system. pas procedure TObject.Free; begin if Self nil then Destroy;= ///erro aqui end; Como resolver essa pedencia, o negocio mais complicado que achei seria encontrar o endereço do erro, agora que achei , o negócio na prática está meio obscuro. Alguem já passou por isso, numa maquina roda o negocio e outra náo, no meu caso aqui é muito especifico,, xp roda, w2003, nao roda. -- Leonardo Quinino 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]
Re: [delphi-br] Problemas quando aplicativo roda do windows server 2003
Exatamente o que vc disse Ricardo, [ início ] destructor TObject.Destroy; begin end; [ final ] Só que no windows xp (em todos os terminais do cliente onde é XP) rodou apenas no server 2003, que não roda. Na verdade, se rodar roda algo... Eu até coloquei um negocio meio tosco... No meu arquivo .dpr..PROGRAMA.DPR Segue um trecho... o pau que ocorre no 2003, não roda nenhuma linha, do aplicativo, qdo clika já retorna com o erro. try _msg_ := 'Abertura de Sistema #1'; Application.Initialize; _msg_ := 'Inicializou seguir com os procedimentos...'; Application.CreateForm(TFrmPrincipal, FrmPrincipal); _msg_ := 'Antes de Run Aplication'; Application.Run; except on E: Exception do begin ShowMessage(E.message +^M+_msg_); end; end; 2009/7/24 Ricardo César Cardoso ricardo_engs...@yahoo.com.br Olha Leonardo, dei uma conferida aqui no Delphi 2005 com Update2 e o código bate com o que vc passou. O detalhe é que logo acima de TObject.Free existe um destructor chamado... Destroy! Veja se o código bate com o que vc tem aí: [ início ] destructor TObject.Destroy; begin end; [ final ] Não sei, mas tenho a leve impressão de que é algo no seu software... qual é a instrução ou o contexto do teu software onde o problema aparece? É ao finalizar o programa, ao iniciar, ao executar alguma rotina em especial? Abraço, Ricardo. 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS. 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor compreendida. 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em sex, 24/7/09, Leonardo Quinino leonardo.quin...@gmail.comleonardo.quinino%40gmail.com escreveu: Tenho um cliente com problemas, e estou tentando ajudar. Na rede, com 6 maquinas cliente xp, e 1 server 2003. nos xp roda que é uma beleza o programa o banco de dados é firebird e esta' no server 2003. o bicho pego é quando tenta rodar no server 2003. simplesmente, o negocio dá um erro, 216 at 00404A36, rodei o debug , procurei o erro, que mostrou uma sequencia de erro no arquivo system. numa pequena função que libera algo da memória. no arquivo delphi7\source\ rtl\system. pas procedure TObject.Free; begin if Self nil then Destroy; = ///erro aqui end; Como resolver essa pedencia, o negocio mais complicado que achei seria encontrar o endereço do erro, agora que achei , o negócio na prática está meio obscuro. Alguem já passou por isso, numa maquina roda o negocio e outra náo, no meu caso aqui é muito especifico,, xp roda, w2003, nao roda. -- Leonardo Quinino __ 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] -- Leonardo Quinino [As partes desta mensagem que não continham texto foram removidas]