separar itens ListBox

Question

:D Bom dia galera,Minha d�vida � a seguinte: Tenho um listbox onde recebo em uma mesma linha as informa��es [b:19f16bee92]TELEFONE IP USER[/b:19f16bee92], gostaria de estar pegando essa linha de infor...

Bruno Belchior · Answer

mas esses dados vem concatenados em uma string?...

Castor Troy · Answer

N�o, eles est�o dentro de um listbox normal. Eu tenho v�rias linhas que cont�m o TELEFONE IP USER, e gostaria de separ�-los, pois pretendo guradar em um banco essas informa��es.

Desde j� muito obrigado

Cabelo · Answer

[quote:80b4d2b406=�Castor Troy�]N�o, eles est�o dentro de um listbox normal. Eu tenho v�rias linhas que cont�m o TELEFONE IP USER, e gostaria de separ�-los, pois pretendo guradar em um banco essas informa��es.

Desde j� muito obrigado[/quote:80b4d2b406]

:shock: ?????

[quote:80b4d2b406=�Bruno Belchior�]mas esses dados vem concatenados em uma string?[/quote:80b4d2b406]

[quote:80b4d2b406=�Castor Troy�]N�o, eles est�o dentro de um listbox normal. Eu tenho v�rias linhas que cont�m o TELEFONE IP USER, e gostaria de separ�-los, pois pretendo guradar em um banco essas informa��es.

Desde j� muito obrigado[/quote:80b4d2b406]

Ent�o eles vem em um s� string..

Se � assim como vc diz.. vc ter� que �fatiar� a string.. para poder armazenar os dados.. ou armazen�-los previamente em tr�s list box distintos..

Castor Troy · Answer

Deixa eu explicar melhor: Imagine um memo com v�rias linhas e com esse 3 dados que citei acima em cada linha. Eu queria realmete �fatiar� os dados das linhas e guardar cada dado desse em uma v�riavel e futuramente cada um em um campo do meu banco (Ex: Campo tel, ip, user).

Muito obrigado pela aten��o

Cabelo · Answer

[quote:bd65801896=�Castor Troy�]Deixa eu explicar melhor: Imagine um memo com v�rias linhas e com esse 3 dados que citei acima em cada linha. Eu queria realmete �fatiar� os dados das linhas e guardar cada dado desse em uma v�riavel e futuramente cada um em um campo do meu banco (Ex: Campo tel, ip, user).

Muito obrigado pela aten��o[/quote:bd65801896]

uma op��o, seria na hora de �popular� o list box, vc colocar os labels..

exe :

Nome : Teste 1 IP : 192.168.1.1 User : T
Nome : Teste2 IP : 192.168.1.2 User : T2

desta forma vc iria ter uma refer�ncia para usar a fun��o POS do delphi..

sen�o.. pq vc n�o �popula� 3 listbox independentes..?

um para cada op��o..

a� quando precisar armazenar os dados.. vc usaria o n�mero do item de cada listbox selecionado.. mas sempre usando a mesma linha nos tr�s list..

espero ter ajudado..

Castor Troy · Answer

E como eu usaria o POS nesse caso que voc� me falou?? � isso que eu quero fazer!!!Muito obrigado...

Bruno Belchior · Answer

acho que seria uma id�ia melhor (e mais confi�vel) na �popula��o� do ListBox, guardar essas informa��es no Tipo [b:aa337f582c]TObject[/b:aa337f582c] que cada n� do [b:aa337f582c]TStrings[/b:aa337f582c] do ListBox cont�m...

Cabelo · Answer

Acho que assim funciona...se n�o funcioner deve ser algum ajuste pequeno..for v_i := 0 to ListBox1.Items.Count - 1 dobeginif POS(�Nome :�, ListBox1.Items.Strings[v_i]) > 0 thenbeginv_nome := Copy(ListBox1.Items.Strings[v_i], POS(�Nome :�, ListBox1.Items.Strings[v_i]) + 7, POS(�IP :�, ListBox1.Items.Strings[v_i]) - POS(�Nome :�, ListBox1.Items.Strings[v_i]));end;if POS(�IP :�, ListBox1.Items.Strings[v_i]) > 0 thenbeginv_nome := Copy(ListBox1.Items.Strings[v_i], POS(�IP :�, ListBox1.Items.Strings[v_i]) + 5, POS(�USER :�, ListBox1.Items.Strings[v_i]) - POS(�IP :�, ListBox1.Items.Strings[v_i]));end;if POS(�USER :�, ListBox1.Items.Strings[v_i]) > 0 thenbeginv_nome := Copy(ListBox1.Items.Strings[v_i], POS(�USER :�, ListBox1.Items.Strings[v_i]) + 7, Length(ListBox1.Items.Strings[v_i]) - POS(�USER :�, ListBox1.Items.Strings[v_i]));end;end;at� +...

Castor Troy · Answer

Galera, muito obrigado pelas dicas, vou test�-las!!!!!Muito obrigado!!...

Cabelo · Answer

[quote:ff40fb7d5c=�Bruno Belchior�]acho que seria uma id�ia melhor (e mais confi�vel) na �popula��o� do ListBox, guardar essas informa��es no Tipo [b:ff40fb7d5c]TObject[/b:ff40fb7d5c] que cada n� do [b:ff40fb7d5c]TStrings[/b:ff40fb7d5c] do ListBox cont�m...[/quote:ff40fb7d5c]

N�o daria certo, pois se a string quando for populada contiver espa�os em branco, seria entendido como �n� no TStrings, e isto iria acarretar um erro de aloca��o de mem�ria..

lembre-se que voc� deve utilizar o TStrings como um vetor, que ocupa posi��es e n�o uma matriz que ocupam linha e posi��es..

Bruno Belchior · Answer

Quando disse isso pensava na seguinte forma... imagino que o colega est� concatenando esses campos antes de adicion�-los no [b:90628e4358]ListBox[/b:90628e4358]... nesse momento ele armazena os valores separados em uma Classe de persist�ncia criada por ele (que contenha as tr�s propriedades que ele deseja separar) e armazene para cada linha do ListBox um objeto associado a ela (com a fun��o [b:90628e4358]AddObject[/b:90628e4358] do objeto TStrings do ListBox)... uma vez precisando dos valores, ele consulta o array de objetos do ListBox fanzendo um [b:90628e4358]TypeCasting[/b:90628e4358] e trabalhando normalmente com o objeto armazenado na mesma...

Bruno Belchior · Answer

Vale lembrar que o Objeto [b:3af807b6cf]TString[/b:3af807b6cf] n�o destr�i os objetos associados a seus n�s... isso dever� ser feito explicitamente antes de liberar o mesmo......

Cabelo · Answer

A� sim.. se for feito antes de �popular� o ListField..

mas daria muito trabalho usar o TObject.

N�o seria mais f�cil armazen�-los em um vetor do tipo record, somente string com o nome, ip e USER, e depois armazenar somente as linhas do vetor que coincidirem com as linhas selecionadas no listBox??

acredito ser mais leve, r�pido e mais f�cil de desenvolver..

Bruno Belchior · Answer

a quest�o �: dessa forma, o record n�o estaria associado com o ListBox, os n�s de ambos n�o teriam associa��o... quanto � complexidade, acho q n�o e t�o invi�vel assim......

Cabelo · Answer

Claro que teria..O vetor tipo record, tem index...assim como o listbox..� s� implementar ele de acordo com o listbox..depois usa o index do listbox, para gravar os dados do record no BD..E fica muito mais leve, pois estaria criando um vetor de string, que seria melhor que mexer com persist�ncias.....

F�rum separar itens ListBox #295419