Valor Retorno ListBox

Question

Bom dia pessoal...tenho um listbox de multipla sele��o da qual eu carrego de uma tabela de filiais do banco de dados:CodFilial + � - � + Sigla Resultado:1 - Matriz2 - S�o Paulo100 - Rio de Janeiro  Qu...

Massuda · Answer

N�o sei se entendi direito, mas acho que voc� precisa de uma fun��o mais ou menos assim (n�o testado):

function ObtemCodigoSelecionado(LB: TListBox): Integer;
var
  S: string;
  N: Integer;
begin
  Result := 0;
  if LB.ItemIndex >= 0 then begin
    S := LB.Items[LB.ItemIndex];
    N := Pos(� - �, S); // busca pelo espa�o-tra�o-espa�o
    S := Copy(S, 1, N-1);
    Result := StrToInt(S);
  end;
end;

Fabboca · Answer

Blz cara, funcionou perfeitamente...Obrigado....

F�rum Valor Retorno ListBox #265975