1. Para abrir um arquivo de texto em um componente TMemo, utilize o seguinte código:
Memo1.Lines.LoadFromFile(''caminho do arquivo\arquivo.txt'');
O caminho do arquivo deve ser completo, exemplo: (''C:\Agenda\teste.txt'') e sempre deverá estar entre aspas simples.
2. Selecionando uma linha com apenas um clique, num componente TMemo:
Crie primeiramente a seguinte procedure na unit onde se encontra o TMemo. Está é a procedure que fará com que a linha do memo seja inteira selecionada.
procedure SelecionarLinha(Memo: TCustomMemo);
var Linha: integer;
begin
with Memo do
begin
Linha := Perform(EM_LINEFROMCHAR, SelStart, 0);
SelStart := Perform(EM_LINEINDEX, Linha, 0);
SelLength := Length(Lines[Linha]);
end;
end;
Depois no evento onClick do TMemo insira a seguinte instrução:
SelecionarLinha(NomeDoMemo);
Colocando este código no evento onClick você estará dizendo ao seu programa: "Quando houver um clique no memo, selecione a completamente a linha que o usuário escolheu".
3. Quebra de linha no TMemo.
Para quebra de linha em um TMemo basta alterar a propriedade WantReturns para True. Está é uma configuração pré-definida deste componente.
4. Evitar que o usuário altere os dados de um TMemo
Para evitar que o usuário possa alterar os dados de um TMemo basta alterar a sua propriedade ReadOnly (Apenas Leitura) para true, destá forma os dados do seu memo estão seguros.
Bom pessoal, é isso.
Espero ter ajudado pelo menos um pouquinho aos novatos.
