Lista de valores

Question

Queria ter uma variavel com um lista de valores.

ex.:

lista:= [�CLIENTE�,�VENDEDOR�,�FUNCIONARIO�,�FORNCEDOR�];

Todos os valores seriam do tipo string.

Para que depois eu fa�a

[codeif tabela.tipo.asstring in lista then
begin
....

Massuda · Answer

Voc� poderia usar um TStringList para isso.

Adicione as strings usando o m�todo Add.

Para saber se uma determinada string est� na lista, use o m�todo IndexOf.

Se sua lista puder ser ordenada alfabeticamente (voc� n�o precisa preservar a ordem de inser��o, por exemplo), fa�a a propriedade Sorted = True antes de incluir as strings. Isso diminuir� o tempo gasto pelo m�todo IndexOf.

Marcelo Saviski · Answer

Bem assim, bem assim como vc quer n�o d� (com conjuntos)

poderia usar uma StringList

var
StringList: TStringList;

No OnCreate

  StringList := TStringList.Create;

No OnDestroy

  Stringlist.Free;

Adicionana os clientes

  Stringlist.Add(�CLIENTE�);
Stringlist.Add(�VENDEDOR�);
Stringlist.Add(�FUNCIONARIO�);
Stringlist.Add(�FORNCEDOR�);

e o [i:da47427b09][color=green:da47427b09]tabela.tipo.asstring in lista [/color:da47427b09][/i:da47427b09] ficaria como:

if StringList.IndexOf(Tabela.Tipo.AsString) <> -1 then
begin
...

se os tipos n�o fossem strings, fossem numeros poderia usar conjuntos

Sistemald · Answer

valeu galera, este recurso ja conhecia, mas se podesse trabalhor como se fosse n�meros seria mais facil.Valeu pela aten��o, vou usar Stringlist....

Sistemald · Answer

valeu galera, este recurso ja conhecia, mas se podesse trabalhor como se fosse n�meros seria mais facil.Valeu pela aten��o, vou usar Stringlist....

Salsa · Answer

como assim trabalhar com numeros? vc tah dizendo a posi�ao? ueh ... qndo vc vai inserindo vc pode pegar a posi�ao dela na lista ou sei la...
ou colocar ex ... Add(1#teste);

e depois usar copy pra pegar oq vc quer.... :P

falowz :P

Salsa · Answer

como assim trabalhar com numeros? vc tah dizendo a posi�ao? ueh ... qndo vc vai inserindo vc pode pegar a posi�ao dela na lista ou sei la...
ou colocar ex ... Add(1#teste);

e depois usar copy pra pegar oq vc quer.... :P

falowz :P

Andremuller · Answer

voc� poderia ser um pouco mais espec�fico na sua necessidade?...