Memo, RichEdit?!

Question

Ol� Galera... postei faz um tempo, mas n�o obtive resposta ainda...Estou com um problema.. (pra variar...) preciso que quando ao clicar em uma linha de um RichEdit, ou Memo, a linha inteira seja selec...

Caninha51 · Answer

dhigo, fiz uma gambiarra aki e funcionou.
Olha se eh isso q vc quer!:D

No Onclick do memo...

var
  Linha: Integer;
begin
  with Memo1 do
    begin
      Linha:= Perform(EM_LINEFROMCHAR,SelStart, 0);
      SelStart := Perform(EM_LINEINDEX, Linha, 0);
      SelLength := Length(Lines[Linha]);
    end;
end;

Dhiogosilva · Answer

poxa caninha... vlw... n�o estou com o meu sistema aqui comigo, mas soh pra deixar a coisa mais clara e eu n�o precisar ficar postando novamente aqui...

o que o �Perform� significa?!
e o que o �EM_LINEFROMCHAR� significa?!

acho que o resto eu peguei legal...

e vlw mais uma vez... :-D

[]s

Caninha51 · Answer

O comando Perform envia a mensagem EM_LINEFROMCHAR ao memo.A mensagem EM_LINEFROMCHAR eh para retornar o �ndice da linha....

Dhiogosilva · Answer

ah... saquei... vlw Caninha... vou tentar em casa a noite e te dou um retorno se funcionou...vlw ...[]s...

Nildo · Answer

[quote:e28745728f=�caninha51�]O comando Perform envia a mensagem EM_LINEFROMCHAR ao memo.A mensagem EM_LINEFROMCHAR eh para retornar o �ndice da linha.[/quote:e28745728f]RichEdit1.CaretPos.Y tb retorna a linha :D...

Dhiogosilva · Answer

Caninha, testei e funcionou legal...MUITO obrigado pela for�a... []s...

F�rum Memo, RichEdit?! #307692