Merhaba.
- Uzun bir cevap yazdım ama sorunuzu yanlış anlamışım. Ben izletilen video linkini nasıl buluruz gibi algılamışım. Telefondan bakınca öyle oldu. Şimdi bilgisayar başında farkına vardım. Sonra konu başlığını da okuyunca yanlış anladığımı anladım. "
Caption alnındaki text kurtulma"
- Aşağıdaki yazılanları dikkate almayın ihtiyacı olan olur diye dursun diye blok içine alıp bıraktım.
- Sorunuzun cevabı için de CAPTION kelimesini arayın. Formun caption'una yazılan yazılar bu anahtar ile eklenir.
örneğin
procedure TMainForm.PasLibVlcPlayerMediaPlayerMediaChanged(Sender: TObject;
mrl: String);
begin
Caption := mrl;
end;
Alıntı:- Kaynak kodunuzdan bir kuple görseydim daha yardımcı olurdum.
- Delphi içinden video seçimini yapıp izlmeye başladığınıza göre eşitlik nerede ise oraya bakarak başlayabilirsiniz.
- Projenizde VLCMediaList kullanıyorsunuzdur. Bu listeye eklenen ITEM'lerin her biri birer video dosyasıdır, ya da yerel veya WEB url üzerinden M3U8 şeklinde bir playlistdir.
- VLCMediaList.GetItemAtIndex(0) dediğinizde ilk çalmakta olan video/ses/url kaynağından nesneyi pointer olarak alırsınız.
- VLCMediaList.Get(0) dediğinizde de WideString olarak URL/FilePath-Name bilgisini alırsınız.
Diğer yandan bu sadece ilk satırdakini verir, siz her video yüklemede içeriği sildiyseniz ilk satır hep play edilendir.
- Ama diyorsanız ki ben medya listesini peşin peşin dolduruyorum biraz bilgi birikiminizi zorlayarak, bir pointer dizisi oluşturup her eklediğiniz videoyu PasLibVlcMediaList'in onMediaListItemAdded eventinde bu diziye eklemelisiniz.
- Ya da ListBox, ListView, StringList gibi bir listede video listesi tutuyorsanız buraya linki eklerken aynı zamanda her eklenen media list nesnesinin item pointerini AddObject ile ekleyip arayıp bulmanız kolay olur.