Fórum Obtendo determinadas linhas de um memo.... #522987

16/06/2015

0

Delphi

tenho um memo com 100 nomes...como selecionar de 30 em 30 sem clikcar nos nomes....e passando a quantidade de nomes a selecionar dentro de um Edit..... Agradeço a atençao :P
Bruno

Bruno

Responder

Post mais votado

19/06/2015

os nomes estao cada um em uma linha ?

Dorivan Sousa

Dorivan Sousa
Responder

Gostei + 1

Mais Posts

19/06/2015

Bruno

simmm
Responder

Gostei + 0

19/06/2015

Dorivan Sousa

quando voce fala selecionar, vc quer selecao do texto ou vc quer o texto na edit...

pq pra pegar o texto 

var
  i: integer; 
  q: integer;
  s: string;
begin
  q:=30; // quantidade de linha
  s:=''; //inicia a variavel 
  for i:=0 to q-1 do
  begin  
     s:=s+memo1.lines[i]
  end;

  edit1.text:=s;
end;


ou se vc quer de uma determina linha

var
  l, i: integer; 
  q: integer;
  s: string;
begin 
  l:=10; //inicia da décima linha
  q:=30; // quantidade de linha
  s:=''; //inicia a variavel 
  for i:=l to q-1 do
  begin
     s:=s+memo1.lines[i]
  end;

  edit1.text:=s;
end;
Responder

Gostei + 1

19/06/2015

Bruno

amigo aqui esta meu problema......

https://www.sendspace.com/file/5ksb8y

fiz um pequeno prejeto mostrando o meu problema....abaixe o codigo fonte para avaliar.....

preencha o edit : Quant: com numeros 2 ou 3 e vai ver o pequeno erro...


grato pela atençao..........
Responder

Gostei + 0

19/06/2015

Bruno

preciso que começe a pegar os nomes desde a primeira linha.....ate a ultima..
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar