Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Logo yolu
#1
Hayırlı günler;



Açık kaynak olan PasLibVlcPlayer ile projeme devam ediyorum. Çözemediğim bir sorunla karşılaştım.
Videonun üzerine gelen png formatındaki logonun yolunu belirlemek istiyorum.
Fakat  yolunu belirlediğim logo bir türlü video üstüne çıkmıyor.
Benim kodlarla var olan kodları showmessage ile karşılaştırdığımda arada ki farklı anlayamadım. Bu sorunu nasıl çözebilirim?



Adresini gösterdiğim kodlar logo yolu:
procedure TMainForm.BtnLogo1Click(Sender: TObject);
var
  yLogo, yApplPath, yLogoPath: String;
begin
  yApplPath := 'C:\Users\Yeliz\Documents\YelizTV\logo';
  yLogoPath := yApplPath + '..' + PathDelim + '..' + PathDelim + '..' + PathDelim + '..' + PathDelim;
  yLogo := yLogoPath + 'Logo.png';
  if (Fileexists(yLogo)) then
  begin
    PasLibVlcPlayer.LogoShowFiles([yLogo]);
  end;
end;

Mevcut logo adresi:
procedure TMainForm.Btnlogo2Click(Sender: TObject);
var
  Logo, ApplPath, LogoPath: String;
begin
  ApplPath := ExtractFilePath(Application.ExeName);
  LogoPath := ApplPath + '..' + PathDelim + '..' + PathDelim + '..' + PathDelim + '..' + PathDelim;
  Logo := LogoPath + 'Logo.png';
  if (Fileexists(Logo)) then
  begin
    PasLibVlcPlayer.LogoShowFiles([Logo]);

    showmessage(Logo);
  end;
end;


Showmessage ile baktığımda logolar başka yerde ama adres faklı (\..\..\..\Logo.png) ???

4jpXjY.png
Cevapla
#2
yApplPath sonunda pathdelimiter unutulmuş sanırım.

bir önceki klasör seviyesine çıkmadan direkt resimlerşn yolunu verince görebiliyor musunuz. Önce logoların sağlam olduğunu teyid edip, sonra path dinamizmime geçmekte fayda var. 
Saygılarımla
Muharrem ARMAN

guplouajuixjzfm15eqb.gif


Cevapla
#3
Teşekkür ederim.

Bazen insan gözünün önünü göremiyor!
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Tablet yolu gonulali 4 473 13-09-2018, Saat: 12:04
Son Yorum: gonulali



Konuyu Okuyanlar: 1 Ziyaretçi