retornar aquivos para memo
veja este codigo:
[color=red:61e2878969]var
i : integer;
b : integer;
begin
b:= FileListBox1.Items.Count;
for i := 0 to b do
Memo1.Lines.Add(FileListBox1.Items.Strings[i]);
end;[/color:61e2878969]
Estou tentando retornar o conteudo de uma pasta selecionada no objeto directorylistbox para um Memo. ele retorna os arquivos mas dar um erro ´list index out off bounds´, ja tentei resolver de todas as formas, mas ta dificil... alguem pode ajudar?
[color=red:61e2878969]var
i : integer;
b : integer;
begin
b:= FileListBox1.Items.Count;
for i := 0 to b do
Memo1.Lines.Add(FileListBox1.Items.Strings[i]);
end;[/color:61e2878969]
Estou tentando retornar o conteudo de uma pasta selecionada no objeto directorylistbox para um Memo. ele retorna os arquivos mas dar um erro ´list index out off bounds´, ja tentei resolver de todas as formas, mas ta dificil... alguem pode ajudar?
Dpinho
Curtidas 0
Respostas
Dpinho
03/04/2005
Problema resolvido alterei a seguinte linha:
[color=red:b23af6302c]for i := 0 to b-1 do[/color:b23af6302c]
beleza, fica a dica pra quem quizer...
[color=red:b23af6302c]for i := 0 to b-1 do[/color:b23af6302c]
beleza, fica a dica pra quem quizer...
GOSTEI 0
Marcelo Saviski
03/04/2005
vc também poderia fazer:
Memo1.Lines.AddStrings(FileListBox1.Items);
GOSTEI 0