FileListBox1

[dreamsoft_PR]

Ola , como faço um "locate"  

no FileListBox1 (delphi)

[EMBarbosa]

Da mesma maneira que faria com outros TListBox não funciona?

Usar a propriedade Items e o método IndexOf.

[dreamsoft_PR]

 FileListBox1.Directory := DirectoryListBox1.Directory;
  if FileListBox1.Items.IndexOf('AUTOEXEC.BAT') > -1 then
  begin
    Color := clYellow;
    Label1.Caption := 'You are in the root directory!';
  end
  else
  begin
    Color := clBtnFace;
    Label1.Caption := '';
  end;

[dreamsoft_PR]

    with FileListBox1 do begin
    if Items.IndexOf('NFSE1223.tx2' ) > -1 then
      begin
        ItemIndex := Items.IndexOf( 'NFSE1223.tx2' );
        SetFocus;
        ShowMessage('Pedido já Adicionado'); abort;
        exit;
      end;
    end;

deu certo .. obrigado

[Felipe E. Resende Mesquita]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.