Q&A

  • listbox에 스마트폰에서 mp3파일 불러오게하는방법 .. 도와주세요ㅜㅜ

앱을 실행하면 listbox에 자동으로 스마트폰 내에있는 .mp3파일들을 불러올 수 있게 하고싶은데,,,

초보라 어떻게해야할지 모르겟네요

procedure TForm1.AddListItem(list: array of string; itype: string);

var

  c: integer;

  LItem: TListBoxItem;

   BitmapFile: TBitmap;

begin

  ListBox1.BeginUpdate;


  for c := 0 to Length(list) - 1 do

  begin


    LItem := TListBoxItem.Create(ListBox1);

    begin

      if BitmapFile <> nil then begin

        LItem.ItemData.Bitmap.Assign(BitmapFile);

      end;

    end;


    LItem.ItemData.Text := ExtractFileName(list[c]);

    LItem.ItemData.Detail := list[c];

    LItem.TagString := itype;

    ListBox1.AddObject(LItem);


  end;


  ListBox1.EndUpdate;


end;


0  COMMENTS