Fórum Ajuda com passar um texto para listbox #190497
23/10/2003
0
Eu tenhu uma lista de produtos dividida assim...
Arroz, Feijão, Bife... em um editbox normal...
Gostaria de passar apenas os nomes dos produtos para um listbox... achu que deu pra exlicar +- hehehe.. se pudessem e ajudar eu agradeceria mt...!
Vlwwwwwww!
[/b]
Xblackoutx
Curtir tópico
+ 0Posts
23/10/2003
Osocram
listBox.iten:=EditBox.iten
Gostei + 0
24/10/2003
Xblackoutx
Gostei + 0
24/10/2003
Dahud
Clica no listbox e procura ´Itens´, depois que achou, clica nele, vai aparecer um botãozinho com (...), vc clica nele, daí é só digitar o conteúdo que vc quer no listbox.
Gostei + 0
24/10/2003
Xblackoutx
Eu tenhu um texto... Tipo ´Arroz, feijão, seilaoquemais...´ eu quero pegar só as palavras e passa-las pra um listbox... entendeu?
Gostei + 0
24/10/2003
Beppe
procedure SeparaString(Items: TStrings; const S: String);
var
I: Integer;
T: String;
begin
T := S;
while T <> ´´ do
begin
I := Pos(´,´, T);
if I = 0 then I := MaxInt;
Items.Add(Trim(Copy(T, 1, I - 1)));
Delete(T, 1, I);
end;
end;Chama SeparaString(ListBox1.Items, Edit1.Text);
Ataliba
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)