Filipe;

bah...ninguem havia pensado e olhe que foi ums 5 msg
ficou parecido com aquele ditado...."quem mente por ultimo mente melhor"
...rs

Atenc.
Elazar

-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Filipe
Enviada em: quarta-feira, 1 de fevereiro de 2006 12:21
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Exportação TXT


dah pra ser mais simples ainda...  StringList.SaveToFile();


[]'s

Filipe Geyer

  ----- Original Message ----- 
  From: Elazar 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 01, 2006 9:44 AM
  Subject: RES: [delphi-br] Exportação TXT


  Dir;

  bah meu, trabalha com arquivo texto é básico!!!!

  Olha tirei do help do delphi, nem pensei em buscar no google pois iria
  achar muuuuuuuita coisa.


  ----
  AssignFile procedure
  See also       Example

  Associates the name of an external file with a file variable.

  Unit

  System

  Category

  file management routines

  procedure AssignFile(var F; FileName: string);

  Description

  Call AssignFile to initialize a file variable. F is a file variable of
  any file type. FileName is a string-type expression or an expression
of
  type PChar if extended syntax is enabled. 

  After calling AssignFile, F is associated with the external file until
F
  is closed.  All further operations on the file variable F operate on
the
  external file named by FileName.

  When the FileName parameter is empty, AssignFile associates F with the
  standard input or standard output file. If assigned an empty name,
after
  a call to Reset (F), F refers to the standard input file, and after a
  call to Rewrite (F), F refers to the standard output file.

  Do not use AssignFile on a file variable that is already open.

  Note:      To avoid scope conflicts, AssignFile replaces the Assign
  procedure that was available in previous versions of Delphi. However,
  for backward compatibility Assign is still available.


  Example:

  var 
    F: TextFile;
    S: string;
  begin
    if OpenDialog1.Execute then          { Display Open dialog box }
    begin
      AssignFile(F, OpenDialog1.FileName);   { File selected in dialog
box
  }
      Reset(F);
      Readln(F, S);                          { Read the first line out
of
  the file }
                                             (Use write (F, S) para
  escrever no arquivo )  
      Edit1.Text := S;                       { Put string in a TEdit
  control }
      CloseFile(F);
    end;
  end;

  ...ai voce usa a imaginação da um loop na tabela e escreve neh!!!

  Atenc.
  Elazar


  -----Mensagem original-----
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  Em nome de Dir
  Enviada em: terça-feira, 31 de janeiro de 2006 11:07
  Para: grupo2
  Assunto: [delphi-br] Exportação TXT





  Pessoal preciso exportar dados de uma consulta(consulta esta pronta)
  para um arquivo .txt, mas como nunca fiz isso, alguém poderia me dar
uma
  dica.

  Cadanos

  [As partes desta mensagem que não continham texto foram removidas]





  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





  Yahoo! Grupos, um serviço oferecido por:
  PUBLICIDADE





  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:
  [EMAIL PROTECTED]
    
  O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço
  do Yahoo!. 


        

        
              
  _______________________________________________________ 
  Yahoo! doce lar. Faça do Yahoo! sua homepage. 
  http://br.yahoo.com/homepageset.html 



  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





        Yahoo! Grupos, um serviço oferecido por: 
              PUBLICIDADE
                
       


------------------------------------------------------------------------
------
  Links do Yahoo! Grupos

    a.. Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/
      
    b.. Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]
      
    c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
 




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:
[EMAIL PROTECTED]
  
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço
do Yahoo!. 


        

        
                
_______________________________________________________ 
Yahoo! doce lar. Faça do Yahoo! sua homepage. 
http://br.yahoo.com/homepageset.html 



-- 
<<<<< 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:
    [EMAIL PROTECTED]
 
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:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a