Paulo Nobre Postado Abril 9, 2004 Denunciar Share Postado Abril 9, 2004 Prezados amigos,Como se abre um txt diretamente sem ser no memo?Vi uma resposta em que a pessoa sugeria abrir no memo, fazendo:Memo1.Lines.LoadFromFile('caminho_do_arquivo');Uma outra resposta sugeria um canhão para matar uma mosca, ou seja, usar API:ShellExecute (0,'open',PChar('Nome do Arquivo.DOC'),nil,nil,SW_SHOW);EXISTE UMA MANEIRA DE ABRIR DIRETO, OU SEJA, SEM MEMO,MAS SEM API?ObrigadoPaulo Nobre Link para o comentário Compartilhar em outros sites More sharing options...
0 AnaoScript Postado Abril 9, 2004 Denunciar Share Postado Abril 9, 2004 Ae veio primeiro você tem que declarar uma variavel do tipo TextFile que contera o texto aberto ex: Texto: TextFile;e depois você usa esse codigoAssignFile(Texto, piadas.txt);Reset(Texto);Aqui você meche no texto e depois tire o da memoria assimCloseFile(Texto);so isso mas se você for usar arquivos docs vai ser meio complicado pois docs usam algumes codigos e configuração e se você abrir dessa manaira você tera mais que os textos digitados tera cofigurações tipicas de docsT++ Link para o comentário Compartilhar em outros sites More sharing options...
0 Paulo Nobre Postado Abril 9, 2004 Autor Denunciar Share Postado Abril 9, 2004 Valeu a dica, anao!Paulo Nobre Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Paulo Nobre
Prezados amigos,
Como se abre um txt diretamente sem ser no memo?
Vi uma resposta em que a pessoa sugeria abrir no memo, fazendo:
Memo1.Lines.LoadFromFile('caminho_do_arquivo');
Uma outra resposta sugeria um canhão para matar uma mosca, ou seja, usar API:
ShellExecute (0,'open',PChar('Nome do Arquivo.DOC'),nil,nil,SW_SHOW);
EXISTE UMA MANEIRA DE ABRIR DIRETO, OU SEJA, SEM MEMO,MAS SEM API?
Obrigado
Paulo Nobre
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados