[delphi-br] BDE x Windows 7
Boa noite amigos, Nem o windows 7 foi lançado direito e os problemas ja começaram. Estou usando o windows 7 profesional na minha maquina e tentando configurar as ferramentas de desenvolvimento delphi/bde. O Delphi 7 funciona blz e o Interbase 6, porem o BDE (5.x) abre e cria novas databases. Ate ai td bem, mas quando tento logar na base de dados criada do interbase ele apresentaa a seguinte mensagem: O Borland Database Engine parou de funcionar e pede para fechar. alguem tem noção do q possa ser ? ja adicionei todas as permissoes possiveis de execução, porem esta do mesmo jeito Fico grato por uma resposta Hugo _ Acesse o Portal MSN do seu celular e se mantenha sempre atualizado. Clique aqui. http://www.windowslive.com.br/celular/home.asp?utm_source=MSN_Hotmailutm_medium=Taglineutm_campaign=MobileServices200908 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] VAGA Delphi
Olá pessoal, A MSI Soluções, desenvolvedora de soluções ERP está com vaga aberta para analista/desenvolvedor Delphi. A MSI utiliza PostgreSQL com Delphi 2010. A empresa está situada em Ourinhos/SP, com franquia em Santa Rita do Sapucaí/MG e São Paulo/SP. Interessados por favor encaminhar currículo para: clau...@msisolucoes.com.br Para maiores detalhes sobre a empresa, favor verificar o site: www.msisolucoes.com.br
Re: [delphi-br] BDE x Windows 7
Caro Hugo, Duas Dicas: 1 - Desabilite o UAC. 2 - Redirecione o NETDIR para outro diretório que não o C:\ ou C:\Arquivo de Programas. Tenho uma aplicação feita utilizando Paradox(por favor não critiquem.é antiga e está sendo migrada para FB) e funciona beleza no Windows 7 com as 2 dicas acima. []´s João Carlos Hugo Vieira escreveu: Boa noite amigos, Nem o windows 7 foi lançado direito e os problemas ja começaram. Estou usando o windows 7 profesional na minha maquina e tentando configurar as ferramentas de desenvolvimento delphi/bde. O Delphi 7 funciona blz e o Interbase 6, porem o BDE (5.x) abre e cria novas databases. Ate ai td bem, mas quando tento logar na base de dados criada do interbase ele apresentaa a seguinte mensagem: O Borland Database Engine parou de funcionar e pede para fechar. alguem tem noção do q possa ser ? ja adicionei todas as permissoes possiveis de execução, porem esta do mesmo jeito Fico grato por uma resposta Hugo _ Acesse o Portal MSN do seu celular e se mantenha sempre atualizado. Clique aqui. http://www.windowslive.com.br/celular/home.asp?utm_source=MSN_Hotmailutm_medium=Taglineutm_campaign=MobileServices200908 [As partes desta mensagem que não continham texto foram removidas] -- ADAPT, ENGAGE, DOMINATE (Sgt. Sykes)
Re: [delphi-br] Detalhe do processo em tempo real
Vou fazer aqui, obrigado a todos. - Original Message - From: Rafael Jorge To: delphi-br@yahoogrupos.com.br Sent: Monday, October 26, 2009 6:38 PM Subject: Re: [delphi-br] Detalhe do processo em tempo real cara um simples Application.ProcessMessages na tua rotina vai evitar do form icar branco e travado. so isso. ai tu pode escrever nos labels e o usuario vai ver tudo. t+ 2009/10/26 Marcelo Luiz Onhate marc...@systempro.com.br Não consigo enviar arquivo... então segue o código direto mesmo... aheuaheua Tenta usar esta classe que fiz para exibir mensagens durante processos longos... {Classe para exibição de Mensagens Informativas durante a execução de algum processo. Exemplo: var fMsg: TInfoMessage; begin fMsg:=TInfoMessage.Create(Self,'Primeira Mensagem...'); ou fMsg:=TInfoMessage.Create(Self); ... fMesg.Text:='Segunda Mensagem...'; ... fMesg.Text:='Terceira Mensagem...'; ... fMsg.Free; end;} type TInfoMessage = class(TObject) private FMemo: TMemo; FText: String; FForm: TForm; procedure setText(const Value: String); property Form: TForm read FForm write FForm; property Memo: TMemo read FMemo write FMemo; public property Text: String read FText write setText; destructor Destroy; override; constructor Create(AOwner: TComponent); overload; constructor Create(AOwner: TComponent; sMsg: String); overload; end; { TInfoMessage } constructor TInfoMessage.Create(AOwner: TComponent); begin inherited Create; FForm:=TForm.Create(AOwner); if AOwnernil then FForm.Position:=poOwnerFormCenter else begin FForm.Position:=poScreenCenter; end; FForm.Height:=23; {$IFDEF MSWINDOWS} FForm.BorderStyle:=bsNone; {$ENDIF} {$IFDEF LINUX} FForm.BorderStyle:=fbsNone; {$ENDIF} FForm.BorderIcons:=[]; Memo:=TMemo.Create(FForm); Memo.Parent:=FForm; Memo.Align:=alClient; Memo.Alignment:=taCenter; Memo.ReadOnly:=True; {$IFDEF MSWINDOWS} Memo.Color:=$00985632; Memo.Font.Color:=clWhite; {$ENDIF} {$IFDEF LINUX} Memo.Color:=$00E3E0DF; Memo.Font.Color:=clBlack; {$ENDIF} Memo.Font.Size:=10; Memo.Font.Style:=[fsBold]; Application.ProcessMessages; end; constructor TInfoMessage.Create(AOwner: TComponent; sMsg: String); begin Create(AOwner); Text:=sMsg; end; destructor TInfoMessage.Destroy; begin if (Selfnil)then begin if(Assigned(FForm))and(FForm.Showing)then begin FForm.Close; Application.ProcessMessages; end; if(Assigned(FMemo))then FreeAndNil(FMemo); if(Assigned(FForm))then FreeAndNil(FForm); end; inherited; end; procedure TInfoMessage.setText(const Value: String); var iLen: Integer; begin FText := StringReplace(StringReplace(Value,#13,'',[]),#10,'',[]); iLen:=Length(FText); Memo.Lines.Clear; Memo.Lines.Add(FText); FForm.Width:=iLen*8; if FForm.Ownernil then FForm.Position:=poOwnerFormCenter else begin FForm.Position:=poScreenCenter; end; if FText'' then FForm.Show else if FForm.Showing then begin FForm.Close; end; Application.ProcessMessages; end; -- _ Rafael jorge alves Desenvolvedor/analista Ativa Soluções em TI. Recife - PE [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Atualizar apenas um registro de um CDS
entao cara ... deveria fazer ... configurei os providers flags, os options do datasetprovider, mas nada ... --- Em delphi-br@yahoogrupos.com.br, berdamzinho berdamzi...@... escreveu o refreshrecord n faz isso ??
[delphi-br] Tratamento de erro no Provider usando ErrorCode
Senhores bom dia, gostaria de pedir o auxílio dos senhores para a questão do tratamento de error que o ADO retorna para o Delphi, estou usando uma validação no evento OnUpdateError, porém não estou tendo sucesso, pois vários erros são detectados e a minha validação está falha. Sei que meu código está incompleto, pois não está trabalhando corretamente a exceção retornada. Eis o código:procedure TClasseBasica.prvBasicoUpdateError(Sender: TObject; DataSet: TCustomClientDataSet; E: EUpdateError; UpdateKind: TUpdateKind; var Response: TResolverResponse); var I: Integer; NomeCampo : string; mensagem : string; begin if e.ErrorCode = -2147217873 then begin for I := 0 to qryBasica.Fields.Count - 1 do begin if StrUtils.ContainsStr(e.Message,DataSet.Fields[i].FullName) then begin NomeCampo := qryBasica.Fields[i].DisplayLabel; Break; end; end; mensagem := 'O campo +NomeCampo+' não pode ter seu valor duplicado na base!'+#13#10+ 'Por favor altere o valor fornecido para esse campo.'; raise Exception.Create(mensagem); end else raise Exception.Create(E.OriginalException.Message); end; Minha intenção era de filtrar os erros do tipo: Índice único, campo não pode ser null, etc... Minha dúvida está em como detectar esses erros, quais são e como trabalhar corretamente esses códigos retornados pelo ADO. Se alguém puder me ajudar ficarei muito grato! [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Detalhe do processo em tempo real
vi que o pessoal falou aqui sobre por o método application.processmessages dentro de um while. Mas e quando o a query (com muitos dados) é usada através do método Open, oque o pessoal sugere ?? Uberdam Cavaletti Programador Delphi Formado em Tecnologia da Informação Pós-graduado em desenvolvimento Java. Professor Tópicos Especias em BD - Unoesc Xanxerê Professor Estruturas de Dados- Unoesc Xanxerê http://buscatextual.cnpq.br/buscatextual/visualizacv.jsp?id=K4251629Y0 De: Claiton Bortolin clai...@impactocontabil.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Ter, Outubro 27, 2009 8:42:18 AM Assunto: Re: [delphi-br] Detalhe do processo em tempo real Vou fazer aqui, obrigado a todos. - Original Message - From: Rafael Jorge To: delphi...@yahoogrup os.com.br Sent: Monday, October 26, 2009 6:38 PM Subject: Re: [delphi-br] Detalhe do processo em tempo real cara um simples Application. ProcessMessages na tua rotina vai evitar do form icar branco e travado. so isso. ai tu pode escrever nos labels e o usuario vai ver tudo. t+ 2009/10/26 Marcelo Luiz Onhate marc...@systempro. com.br Não consigo enviar arquivo... então segue o código direto mesmo... aheuaheua Tenta usar esta classe que fiz para exibir mensagens durante processos longos... {Classe para exibição de Mensagens Informativas durante a execução de algum processo. Exemplo: var fMsg: TInfoMessage; begin fMsg:=TInfoMessage. Create(Self, 'Primeira Mensagem...' ); ou fMsg:=TInfoMessage. Create(Self) ; ... fMesg.Text:= 'Segunda Mensagem...' ; ... fMesg.Text:= 'Terceira Mensagem...' ; ... fMsg.Free; end;} type TInfoMessage = class(TObject) private FMemo: TMemo; FText: String; FForm: TForm; procedure setText(const Value: String); property Form: TForm read FForm write FForm; property Memo: TMemo read FMemo write FMemo; public property Text: String read FText write setText; destructor Destroy; override; constructor Create(AOwner: TComponent); overload; constructor Create(AOwner: TComponent; sMsg: String); overload; end; # # # # # # # # # ### { TInfoMessage } constructor TInfoMessage. Create(AOwner: TComponent); begin inherited Create; FForm:=TForm. Create(AOwner) ; if AOwnernil then FForm.Position: =poOwnerFormCent er else begin FForm.Position: =poScreenCenter; end; FForm.Height: =23; {$IFDEF MSWINDOWS} FForm.BorderStyle: =bsNone; {$ENDIF} {$IFDEF LINUX} FForm.BorderStyle: =fbsNone; {$ENDIF} FForm.BorderIcons: =[]; Memo:=TMemo. Create(FForm) ; Memo.Parent: =FForm; Memo.Align:= alClient; Memo.Alignment: =taCenter; Memo.ReadOnly: =True; {$IFDEF MSWINDOWS} Memo.Color:= $00985632; Memo.Font.Color: =clWhite; {$ENDIF} {$IFDEF LINUX} Memo.Color:= $00E3E0DF; Memo.Font.Color: =clBlack; {$ENDIF} Memo.Font.Size: =10; Memo.Font.Style: =[fsBold] ; Application. ProcessMessages; end; constructor TInfoMessage. Create(AOwner: TComponent; sMsg: String); begin Create(AOwner) ; Text:=sMsg; end; destructor TInfoMessage. Destroy; begin if (Selfnil)then begin if(Assigned( FForm))and( FForm.Showing) then begin FForm.Close; Application. ProcessMessages; end; if(Assigned( FMemo))then FreeAndNil(FMemo) ; if(Assigned( FForm))then FreeAndNil(FForm) ; end; inherited; end; procedure TInfoMessage. setText(const Value: String); var iLen: Integer; begin FText := StringReplace( StringReplace( Value,#13, '',[]),#10, '',[]); iLen:=Length( FText); Memo.Lines.Clear; Memo.Lines.Add( FText); FForm.Width: =iLen*8; if FForm.Owner nil then FForm.Position: =poOwnerFormCent er else begin FForm.Position: =poScreenCenter; end; if FText'' then FForm.Show else if FForm.Showing then begin FForm.Close; end; Application. ProcessMessages; end; -- _ Rafael jorge alves Desenvolvedor/ analista Ativa Soluções em TI. Recife - PE [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] 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] intervalo entre duas datas
alguem sabe como eu faço para saber a quantidade de dias entre um determinado intervalo entre duas datas -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] intervalo entre duas datas
use a unit dateutils, se n me engano a função é daybetween Uberdam Cavaletti Programador Delphi Formado em Tecnologia da Informação Pós-graduado em desenvolvimento Java. Professor Tópicos Especias em BD - Unoesc Xanxerê Professor Estruturas de Dados- Unoesc Xanxerê http://buscatextual.cnpq.br/buscatextual/visualizacv.jsp?id=K4251629Y0 De: Leonardo Baldino portaldoinfe...@gmail.com Para: Grupo_Delphi delphi-br@yahoogrupos.com.br Enviadas: Ter, Outubro 27, 2009 3:04:38 PM Assunto: [delphi-br] intervalo entre duas datas alguem sabe como eu faço para saber a quantidade de dias entre um determinado intervalo entre duas datas -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] 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 estranho usando um Strings.LoadFromFile
Amigos, estou usando um StringList para carregar um arquivo texto, porém alguns arquivos textos, que abrem normalmente no Notepad, abrem assim pelo Delphi: 'ÿþ'#0'?'#0'x'#0'm'#0'l'#0' '#0'v'#0'e'#0'r'#0's'#0'i'#0'o'#0'n'#0'='#0''#0'1'#0'.'#0'0'#0''#0' '#0'e'#0'n'#0'c'#0'o'#0'd'#0'i'#0'n'#0'g'#0'='#0''#0'U'#0'T'#0'F'#0'-'#0'8'#0''#0'?'#0''#0''#0'N'#0'F'#0'e'#0' '#0'x'#0'm'#0'l'#0'n'#0's'#0'='#0''#0'h'#0't'#0't'#0'p'#0':'#0'/'#0'/'#0'w'#0'w'#0'w'#0'.'#0'p'#0'o'#0'r'#0't'#0'a'#0'l'#0'f'#0'i'#0's'#0'c'#0'a'#0'l'#0'.'#0'i'#0'n'#0'f'#0'.'#0'b'#0'r'#0'/'#0'n'#0'f'#0'e'#0''#0''#0''#0'i'#0'n'#0'f'#0'N'#0'F'#0'e'#0' '#0'I'#0'd'#0'='#0''#0'N'#0'F'#0'e'#0'3'#0'1'#0'0'#0'9'#0'0'#0'9'#0'2'#0'0'#0'9'#0'0'#0'9'#0'2'#0'9'#0'7'#0'0'#0'0'#0'0'#0'1'#0'1'#0'0'#0'5'#0'5'#0'0'#0'0'#0'1'#0'0'#0'0'#0'0'#0'0'#0'0'#0'0'#0'1'#0'5'#0'1'#0'0'#0'0'#0'0'#0'0'#0'0'#0'0'#0'1'#0'5'#0'0'#0'0'#0''#0' '#0'v'#0'e'#0'r'#0's'#0'a'#0'o'#0'='#0''#0'1'#0'.'#0'1'#0'0'#0''#0''#0''#0'i'#0'd'#0'e'#0''#0''#0'c'#0'U'#0'F'#0''#0'3'#0'1'#0''#0'/'#0'c'#0'U'#0'F'#0''#0''#0'c'#0'N'#0'F'#0''#0'0'#0'0'#0'0'#0'0'#0'0'#0'0'#0'1'#0'5'#0'0'#0''#0'/'#0'c'#0'N'#0'F'#0''#0''#0'n'#0'a'#0't'#0'O'#0'p'#0''#0'V'#0'e'#0'n'#0'd'#0'a'#0' '#0'd'#0'e'#0' '#0'm'#0'e'#0'r'#0'c'#0'a'#0'd'#0'o'#0'r'#0'i'#0'a'#0' '#0'a'#0'd'#0'q'#0'u'#0'i'#0'r'#0'i'#0'd'#0'a'#0' '#0'o'#0'u'#0' '#0'r'#0'e'#0'c'#0'e'#0'b'#0'i'#0'd'#0'a'#0' '#0'd'#0'e'#0' '#0't'#0'e'#0'r'#0'c'#0'e'#0'i'#0'r'#0'o'#0's'#0''#0'/'#0'n'#0'a'#0't'#0'O'#0'p'#0''#0''#0'i'#0'n'#0'd'#0'P'#0'a'#0'g'#0''#0'1'#0''#0'/'#0'i'#0'n'#0'd'#0'P'#0'a'#0'g'#0''#0''#0'm'#0'o'#0'd'#0''#0'5'#0'5'#0''#0'/'#0'm'#0'o'#0'd'#0''#0''#0's'#0'e'#0'r'#0'i'#0'e'#0''#0'1'#0''#0'/'#0's'#0'e'#0'r'#0'i'#0'e'#0''#0''#0'n'#0'N'#0'F'#0''#0'1'#0'5'#0'1'#0''#0'/'#0'n'#0'N'#0'F'#0''#0''#0'd'#0'E'#0'm'#0'i'#0''#0'2'#0'0'#0'0'#0'9'#0'-'#0'0'#0'9'#0'-'#0'2'#0'4'#0''#0'/'#0'd'#0'E'#0'm'#0'i'#0''#0''#0'd'#0'S'#0'a'#0'i'#0'E'#0'n'#0't'#0''#0'2'#0'0'#0'0'#0'9'#0'-'#0'0'#0'9'#0'-'#0'2'#0'4'#0''#0'/'#0'd'#0'S'#0'a'#0'i'#0'E'#0'n'#0't'#0''#0''#0't'#0'p'#0'N'#0'F'#0''#0'1'#0''#0'/'#0't'#0'p'#0'N'#0'F'#0''#0''#0'c'#0'M'#0'u'#0'n'#0'F'#0'G'#0''#0'3'#0'1'#0'4'#0'3'#0'9'#0'0' Até aí, achei que o problema era do StringList, troquei por uma função que le usando ReadLn, linha a linha, e mesma coisa... nada... e o mais estranho é que tem arquivos que le normalmente... Alguém já passou por isso? O que pode ser? -- _ T.·.F.·.A.·. Fellipe Henrique --- CAMPANHA POR UMA INTERNET SEGURA Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar mensagens use SEMPRE o Cco (cópia oculta). Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar um e-mail, delete todas as informações que apareçam no corpo do e-mail e que possam ser usadas por hackers. ### [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Ajuda
Galera, boa tarde Estou com uma dificuldade, quando chamo um form, eu crio um datamodulo(Tdmexemplo.Create(Self);). E quando fecho o meu formulário, eu faço o seguinte comando: FreeAndNil(exemplo); Eu reparei, que não esta fechando porque quando eu abro novamente esse form, os dados nos datasets estão desatualizados. Eles so atualizam quando eu termino o programa e abro novamente. Alguém pode me ajudar? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] intervalo entre duas datas
DaysBetween Dirlei. Leonardo Baldino escreveu: alguem sabe como eu faço para saber a quantidade de dias entre um determinado intervalo entre duas datas -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] intervalo entre duas datas
Use a função DaysBetween(), da unit DateUtils. Faça um teste, pois não sei se retorna todos os dias, ou somente os dias úteis... Att, Edelson. 2009/10/27 Leonardo Baldino portaldoinfe...@gmail.com alguem sabe como eu faço para saber a quantidade de dias entre um determinado intervalo entre duas datas -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] fechando aplicação.
Galera esperta, estava eu aqui programando, sem mais nem menos minha aplicação simplesmente não fecha. Alias ele fecha, mas fica o processo aberto dele. Faz algumas horas que estou googando pela rede vendo as formas de fechar sistema e mesmo assim do jeito que fecho e do jeito que outros fecha o aplicativo não funcionou até agora.. O galera da uma ajuda ai, esgotei as fontes de pesquisas, e só me restou vocês. Uso Delphi 7, S.O Windows Vista Home Basic. Abraço. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] intervalo entre duas datas
Leonardo, Faça a diferença entre as datas, o retorno é o número de dias em tipo float Dias := DataFinal - DataInicial; Abraço Samuca - Original Message - From: Leonardo Baldino To: Grupo_Delphi Sent: Tuesday, October 27, 2009 2:04 PM Subject: [delphi-br] intervalo entre duas datas alguem sabe como eu faço para saber a quantidade de dias entre um determinado intervalo entre duas datas -- Leonardo Carlos Baldino - The Highlander [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] BDE x Windows 7
Grande João! Funcionou perfeitamente de acordo com o que você disse! valeu meu irmao! qualquer coisas estamos as ordens! Hugo To: delphi-br@yahoogrupos.com.br From: jcp...@gmail.com Date: Tue, 27 Oct 2009 08:31:05 -0200 Subject: Re: [delphi-br] BDE x Windows 7 Caro Hugo, Duas Dicas: 1 - Desabilite o UAC. 2 - Redirecione o NETDIR para outro diretório que não o C:\ ou C:\Arquivo de Programas. Tenho uma aplicação feita utilizando Paradox(por favor não critiquem.é antiga e está sendo migrada para FB) e funciona beleza no Windows 7 com as 2 dicas acima. []´s João Carlos Hugo Vieira escreveu: Boa noite amigos, Nem o windows 7 foi lançado direito e os problemas ja começaram. Estou usando o windows 7 profesional na minha maquina e tentando configurar as ferramentas de desenvolvimento delphi/bde. O Delphi 7 funciona blz e o Interbase 6, porem o BDE (5.x) abre e cria novas databases. Ate ai td bem, mas quando tento logar na base de dados criada do interbase ele apresentaa a seguinte mensagem: O Borland Database Engine parou de funcionar e pede para fechar. alguem tem noção do q possa ser ? ja adicionei todas as permissoes possiveis de execução, porem esta do mesmo jeito Fico grato por uma resposta Hugo __ Acesse o Portal MSN do seu celular e se mantenha sempre atualizado. Clique aqui. http://www.windowslive.com.br/celular/home.asp?utm_source=MSN_Hotmailutm_medium=Taglineutm_campaign=MobileServices200908 [As partes desta mensagem que não continham texto foram removidas] -- ADAPT, ENGAGE, DOMINATE (Sgt. Sykes) _ Acesse seu Hotmail de onde quer que esteja através do celular. Clique aqui. http://www.windowslive.com.br/celular/home.asp?utm_source=MSN_Hotmailutm_medium=Taglineutm_campaign=MobileServices200908 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Detalhe do processo em tempo real
Vc pode exibir um panel escrito aguarde, e colocar o processo da query numa thread, isso irá impedir que a aplicação fique congelada []'s William C. Brazilino [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro estranho usando um Strings.LoadFromFile
Felipe, pelo fato de ter dado erro em duas estruturas distintas (TStringList e TextFile) é muito provável que o erro esteja no arquivo. Tente gerar outro arquivo texto de teste. Abraço, Júlio César Santiago Guiótti 2009/10/27 Fellipe Henrique felli...@gmail.com Amigos, estou usando um StringList para carregar um arquivo texto, porém alguns arquivos textos, que abrem normalmente no Notepad, abrem assim pelo Delphi: 'ÿþ'#0'?'#0'x'#0'm'#0'l'#0' '#0'v'#0'e'#0'r'#0's'#0'i'#0'o'#0'n'#0'='#0''#0'1'#0'.'#0'0'#0''#0' '#0'e'#0'n'#0'c'#0'o'#0'd'#0'i'#0'n'#0'g'#0'='#0''#0'U'#0'T'#0'F'#0'-'#0'8'#0''#0'?'#0''#0''#0'N'#0'F'#0'e'#0' '#0'x'#0'm'#0'l'#0'n'#0's'#0'='#0''#0'h'#0't'#0't'#0'p'#0':'#0'/'#0'/'#0'w'#0'w'#0'w'#0'.'#0'p'#0'o'#0'r'#0't'#0'a'#0'l'#0'f'#0'i'#0's'#0'c'#0'a'#0'l'#0'.'#0'i'#0'n'#0'f'#0'.'#0'b'#0'r'#0'/'#0'n'#0'f'#0'e'#0''#0''#0''#0'i'#0'n'#0'f'#0'N'#0'F'#0'e'#0' '#0'I'#0'd'#0'='#0''#0'N'#0'F'#0'e'#0'3'#0'1'#0'0'#0'9'#0'0'#0'9'#0'2'#0'0'#0'9'#0'0'#0'9'#0'2'#0'9'#0'7'#0'0'#0'0'#0'0'#0'1'#0'1'#0'0'#0'5'#0'5'#0'0'#0'0'#0'1'#0'0'#0'0'#0'0'#0'0'#0'0'#0'0'#0'1'#0'5'#0'1'#0'0'#0'0'#0'0'#0'0'#0'0'#0'0'#0'1'#0'5'#0'0'#0'0'#0''#0' '#0'v'#0'e'#0'r'#0's'#0'a'#0'o'#0'='#0''#0'1'#0'.'#0'1'#0'0'#0''#0''#0''#0'i'#0'd'#0'e'#0''#0''#0'c'#0'U'#0'F'#0''#0'3'#0'1'#0''#0'/'#0'c'#0'U'#0'F'#0''#0''#0'c'#0'N'#0'F'#0''#0'0'#0'0'#0'0'#0'0'#0'0'#0'0'#0'1'#0'5'#0'0'#0''#0'/'#0'c'#0'N'#0'F'#0''#0''#0'n'#0'a'#0't'#0'O'#0'p'#0''#0'V'#0'e'#0'n'#0'd'#0'a'#0' '#0'd'#0'e'#0' '#0'm'#0'e'#0'r'#0'c'#0'a'#0'd'#0'o'#0'r'#0'i'#0'a'#0' '#0'a'#0'd'#0'q'#0'u'#0'i'#0'r'#0'i'#0'd'#0'a'#0' '#0'o'#0'u'#0' '#0'r'#0'e'#0'c'#0'e'#0'b'#0'i'#0'd'#0'a'#0' '#0'd'#0'e'#0' '#0't'#0'e'#0'r'#0'c'#0'e'#0'i'#0'r'#0'o'#0's'#0''#0'/'#0'n'#0'a'#0't'#0'O'#0'p'#0''#0''#0'i'#0'n'#0'd'#0'P'#0'a'#0'g'#0''#0'1'#0''#0'/'#0'i'#0'n'#0'd'#0'P'#0'a'#0'g'#0''#0''#0'm'#0'o'#0'd'#0''#0'5'#0'5'#0''#0'/'#0'm'#0'o'#0'd'#0''#0''#0's'#0'e'#0'r'#0'i'#0'e'#0''#0'1'#0''#0'/'#0's'#0'e'#0'r'#0'i'#0'e'#0''#0''#0'n'#0'N'#0'F'#0''#0'1'#0'5'#0'1'#0''#0'/'#0'n'#0'N'#0'F'#0''#0''#0'd'#0'E'#0'm'#0'i'#0''#0'2'#0'0'#0'0'#0'9'#0'-'#0'0'#0'9'#0'-'#0'2'#0'4'#0''#0'/'#0'd'#0'E'#0'm'#0'i'#0''#0''#0'd'#0'S'#0'a'#0'i'#0'E'#0'n'#0't'#0''#0'2'#0'0'#0'0'#0'9'#0'-'#0'0'#0'9'#0'-'#0'2'#0'4'#0''#0'/'#0'd'#0'S'#0'a'#0'i'#0'E'#0'n'#0't'#0''#0''#0't'#0'p'#0'N'#0'F'#0''#0'1'#0''#0'/'#0't'#0'p'#0'N'#0'F'#0''#0''#0'c'#0'M'#0'u'#0'n'#0'F'#0'G'#0''#0'3'#0'1'#0'4'#0'3'#0'9'#0'0' Até aí, achei que o problema era do StringList, troquei por uma função que le usando ReadLn, linha a linha, e mesma coisa... nada... e o mais estranho é que tem arquivos que le normalmente... Alguém já passou por isso? O que pode ser? -- _ T.·.F.·.A.·. Fellipe Henrique -- CAMPANHA POR UMA INTERNET SEGURA Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar mensagens use SEMPRE o Cco (cópia oculta). Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar um e-mail, delete todas as informações que apareçam no corpo do e-mail e que possam ser usadas por hackers. ### [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] Ajuda
Oi Felipe, pelo que vi você está precisando atualizar os seus datasets, há outras maneiras de você fazer isso. Mas no caso de fechar o data module não funciona porque você não está atribuindo a instância criada a nenhuma variável. Você tem que fazer: exemplo := Tdmexemplo.Create(Self); E para destruir: FreeAndNil(exemplo); ou exemplo.Free; Abraço, Júlio César Santiago Guiótti 2009/10/27 Felipe Lopes felipearaujolo...@yahoo.com.br Galera, boa tarde Estou com uma dificuldade, quando chamo um form, eu crio um datamodulo(Tdmexemplo.Create(Self);). E quando fecho o meu formulário, eu faço o seguinte comando: FreeAndNil(exemplo); Eu reparei, que não esta fechando porque quando eu abro novamente esse form, os dados nos datasets estão desatualizados. Eles so atualizam quando eu termino o programa e abro novamente. Alguém pode me ajudar? [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] Erro estranho usando um Strings.LoadFromFile
O texto está provavelmente em UTF-8 com um indicador no início do arquivo informando que é UTF-8 (BOM). Tente um save as no notepad e grave em ISO, CP1252 ou algo que o Delphi entenda. Joao Morais 2009/10/27 Fellipe Henrique felli...@gmail.com: Amigos, estou usando um StringList para carregar um arquivo texto, porém alguns arquivos textos, que abrem normalmente no Notepad, abrem assim pelo Delphi: 'ÿþ'#0'?'#0'x'#0'm'#0'l'#0' '#0'v'#0'e'#0'r'#0's'#0'i'#0'o'#0'n'#0'='#0''#0'1'#0'.'#0'0'#0''#0' [snip]
Re: [delphi-br] fechando aplicação.
Já tentou o óbvio? reinicar o PC? Att, ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... 2009/10/27 Cleiton - Yahoo cleiton.mac...@yahoo.com.br Galera esperta, estava eu aqui programando, sem mais nem menos minha aplicação simplesmente não fecha. Alias ele fecha, mas fica o processo aberto dele. Faz algumas horas que estou googando pela rede vendo as formas de fechar sistema e mesmo assim do jeito que fecho e do jeito que outros fecha o aplicativo não funcionou até agora.. O galera da uma ajuda ai, esgotei as fontes de pesquisas, e só me restou vocês. Uso Delphi 7, S.O Windows Vista Home Basic. 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] BDE x Windows 7
A não ser que tenha uma urgência / pendência muito grande, planeje uma migração da plataforma do BDE para DBExpress (no mínimo). O BDE já está descontinuado há algum tempo, não é culpa do Windows 7 não... 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 seg, 26/10/09, Hugo Vieira hugoviei...@hotmail.com escreveu: De: Hugo Vieira hugoviei...@hotmail.com Assunto: [delphi-br] BDE x Windows 7 Para: Grupo Delphi BR delphi-br@yahoogrupos.com.br Data: Segunda-feira, 26 de Outubro de 2009, 22:04 Boa noite amigos, Nem o windows 7 foi lançado direito e os problemas ja começaram. Estou usando o windows 7 profesional na minha maquina e tentando configurar as ferramentas de desenvolvimento delphi/bde. O Delphi 7 funciona blz e o Interbase 6, porem o BDE (5.x) abre e cria novas databases. Ate ai td bem, mas quando tento logar na base de dados criada do interbase ele apresentaa a seguinte mensagem: O Borland Database Engine parou de funcionar e pede para fechar. alguem tem noção do q possa ser ? ja adicionei todas as permissoes possiveis de execução, porem esta do mesmo jeito Fico grato por uma resposta Hugo _ _ _ _ _ _ Acesse o Portal MSN do seu celular e se mantenha sempre atualizado. Clique aqui. http://www.windowsl ive.com.br/ celular/home. asp?utm_source= MSN_Hotmail utm_medium= Taglineutm_ campaign= MobileServices20 0908 [As partes desta mensagem que não continham texto foram removidas] 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] Instalação Componentes Delphi 7
Boa noite pessoal, Como faço pra instalar um componente na maquina do meu estagiário e esse componente nao possa ser instalado em mais nenhuma maquina??? Eduardo Suruagy Net System - (82) 9117-0204 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] fechando aplicação.
Já expirementou usar Application.Terminate ? Att, Eliézer Pimentel C.C.O. +55(16)3722-3154 - office +55(16)9228-1168 - mobile msn: eliezer_pimen...@hotmail.com skype: eliezer_pimentel 2009/10/27 Eduardo Silva dos Santos eduardo@gmail.com Já tentou o óbvio? reinicar o PC? Att, ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com eduardo.drd%40gmail.com Site: http://www.drdsistemas.com.br/ ... 2009/10/27 Cleiton - Yahoo cleiton.mac...@yahoo.com.brcleiton.maciel%40yahoo.com.br Galera esperta, estava eu aqui programando, sem mais nem menos minha aplicação simplesmente não fecha. Alias ele fecha, mas fica o processo aberto dele. Faz algumas horas que estou googando pela rede vendo as formas de fechar sistema e mesmo assim do jeito que fecho e do jeito que outros fecha o aplicativo não funcionou até agora.. O galera da uma ajuda ai, esgotei as fontes de pesquisas, e só me restou vocês. Uso Delphi 7, S.O Windows Vista Home Basic. 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]
Re: [delphi-br] fechando aplicação.
Vc usa os comandos : Action := Cafree; Formulario := nill; no close do formulario? --- Em ter, 27/10/09, Cleiton - Yahoo cleiton.mac...@yahoo.com.br escreveu: De: Cleiton - Yahoo cleiton.mac...@yahoo.com.br Assunto: [delphi-br] fechando aplicação. Para: delphi-br@yahoogrupos.com.br Data: Terça-feira, 27 de Outubro de 2009, 16:08 Galera esperta, estava eu aqui programando, sem mais nem menos minha aplicação simplesmente não fecha. Alias ele fecha, mas fica o processo aberto dele. Faz algumas horas que estou googando pela rede vendo as formas de fechar sistema e mesmo assim do jeito que fecho e do jeito que outros fecha o aplicativo não funcionou até agora.. O galera da uma ajuda ai, esgotei as fontes de pesquisas, e só me restou vocês. Uso Delphi 7, S.O Windows Vista Home Basic. Abraço. [As partes desta mensagem que não continham texto foram removidas] 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]
RES: [delphi-br] fechando aplicação.
Rafael, passei pelo mesmo problema e não consegui resolver. O que consegui identificar é que isso acontece somente no Windows vista. No XP, o sistema não fica na memória. O meu fica aproximadamente 20 segundos na memória no Windows vista. No XP é fechado no ato Procura testar sua aplicação no Windows XP e posta o resultado. Abs De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Rafael Enviada em: terça-feira, 27 de outubro de 2009 20:23 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] fechando aplicação. Vc usa os comandos : Action := Cafree; Formulario := nill; no close do formulario? --- Em ter, 27/10/09, Cleiton - Yahoo cleiton.mac...@yahoo.com.br mailto:cleiton.maciel%40yahoo.com.br escreveu: De: Cleiton - Yahoo cleiton.mac...@yahoo.com.br mailto:cleiton.maciel%40yahoo.com.br Assunto: [delphi-br] fechando aplicação. Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Data: Terça-feira, 27 de Outubro de 2009, 16:08 Galera esperta, estava eu aqui programando, sem mais nem menos minha aplicação simplesmente não fecha. Alias ele fecha, mas fica o processo aberto dele. Faz algumas horas que estou googando pela rede vendo as formas de fechar sistema e mesmo assim do jeito que fecho e do jeito que outros fecha o aplicativo não funcionou até agora.. O galera da uma ajuda ai, esgotei as fontes de pesquisas, e só me restou vocês. Uso Delphi 7, S.O Windows Vista Home Basic. Abraço. [As partes desta mensagem que não continham texto foram removidas] __ 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] [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] fechando aplicação.
Felipe lopes escreveu: Rafael, passei pelo mesmo problema e não consegui resolver. O que consegui identificar é que isso acontece somente no Windows vista. No XP, o sistema não fica na memória. O meu fica aproximadamente 20 segundos na memória no Windows vista. No XP é fechado no ato Procura testar sua aplicação no Windows XP e posta o resultado. Abs Galera, eu já tive problemas com forms pq eu tinha muitos e não sabia gerenciá-los (na verdade foi um sistema enorme que peguei para dar manutenção), depois que passei a usar dessa maneira [http://blog.joaomorais.com.br/2008/08/31/dica-gerenciamento-form.html] não me perdi com tantos forms. Desculpem por eu não ter feito o teste no vista, para opinar com mais detalhes, pois tenho apenas o XP e o Linux(Ubuntu). Façam o teste aí, quem criou a rotina entende muito sobre gerenciamento de memória. ;) -- Silvio Clecio -- Ninguém é tão ignorante que não tenha algo a ensinar; e ninguém é tão sábio que não tenha algo a aprender. Blaise Pascal.