Tüm Platformlar için Hızlı Uygulama Geliştirme --->    Kitabımız...      Delphi

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Video Screenshot sorunu
#1
Merhaba arkadaşlar

Android Projemde aşağıdaki kod ile video ekran resmi almak istiyorum. Kodlar düzgün bir şekilde derleniyor fakat alınan image siyah bir resimden ibaret oluyor. Windowsa derlediğimde de kodu aynı sorunu veriyor. Bir çok deneme ve araştırma yapmama rağmen sorunu çözemedim. Yardımlarınızı bekliyorum. Şimdiden herkese teşekkürler.

(Not : Delphi 10.1.2 Berlin Kullanıyorum.)

procedure TForm1.Button1Click(Sender: TObject); //Video Başlat
begin
FORM1.MediaPlayer1.FileName:='C:\Users\CKRAL\Videos\VID_20140815_194107.3gp';
form1.MediaPlayer1.Play;

end;

procedure TForm1.Button2Click(Sender: TObject);//Video Durdur ve resimi kaydet.
begin
form1.MediaPlayer1.Stop;
form1.MediaPlayer1.Media.Control.MakeScreenshot.SaveToFile('c:\capture.jpg');

end;
end.
Cevapla
#2
Merhaba,
MediaPlayerControl nesnesinin MakeScreenshot metodunu kullanın veya MediaPlayerControl'ü bir Layout içerisine yerleştirdikten sonra, Layout'un MakeScreenshot metodu ile o anki karenin ekran görüntüsünü alın.
While true do; Hayat döngüsü, kısır değildir! Yapılan bir yanlış, o döngünün dışına çıkmanızı sağlayacaktır.
WWW
Cevapla
#3
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Bu linke de bakabilirsiniz.
Cevapla
#4
(24-01-2018, Saat: 12:11)Fesih ARSLAN Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlMerhaba,
MediaPlayerControl nesnesinin MakeScreenshot metodunu kullanın veya MediaPlayerControl'ü bir Layout içerisine yerleştirdikten sonra, Layout'un MakeScreenshot metodu ile o anki karenin ekran görüntüsünü alın.

Merhabalar

Fesih Hocam cevabınız için teşekkür ederim yalnız sorunu çözemedim. Aynı sıkıntıyı tekrarlıyor maalesef.

(24-01-2018, Saat: 12:17)klavye Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlLinkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Bu linke de bakabilirsiniz.

Merhabalar hocam

Linki inceledim burada anlattığına göre bu yöntemle alma şansımız yokmuş ve windows apileriyle çözmeye çalışmışlar. Bir kaç video capture kodu denedim ama başarılı olamadım. Aslında amacım thumbnail yapmaktı ama olmuyor maalesef Sad
Cevapla
#5
(24-01-2018, Saat: 01:23)codder71 Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlMerhaba arkadaşlar

Android Projemde aşağıdaki kod ile video ekran resmi almak istiyorum. Kodlar düzgün bir şekilde derleniyor fakat alınan image siyah bir resimden ibaret oluyor. Windowsa derlediğimde de kodu aynı sorunu veriyor. Bir çok deneme ve araştırma yapmama rağmen sorunu çözemedim. Yardımlarınızı bekliyorum. Şimdiden herkese teşekkürler.

(Not : Delphi 10.1.2 Berlin Kullanıyorum.)

procedure TForm1.Button1Click(Sender: TObject); //Video Başlat
begin
FORM1.MediaPlayer1.FileName:='C:\Users\CKRAL\Videos\VID_20140815_194107.3gp';
form1.MediaPlayer1.Play;

end;

procedure TForm1.Button2Click(Sender: TObject);//Video Durdur ve resimi kaydet.
begin
form1.MediaPlayer1.Stop;
form1.MediaPlayer1.Media.Control.MakeScreenshot.SaveToFile('c:\capture.jpg');

end;
end.

FMX'den pek anlamam, ancak; MediaPlayer.Stop kodu bana biraz garip göründü. Video'yu durdurduğunuzda mantıken zaten ekranda bir image kalmaz. Acaba Stop yerine Pause'mu yapmalıydınız ;-)
Mal sahibi, mülk sahibi
Hani bunun ilk sahibi ?
Mal da yalan mülk de yalan
Var biraz da sen oyalan...
WWW
Cevapla
#6
(24-01-2018, Saat: 23:46)Tuğrul HELVACI Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
(24-01-2018, Saat: 01:23)codder71 Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlMerhaba arkadaşlar

Android Projemde aşağıdaki kod ile video ekran resmi almak istiyorum. Kodlar düzgün bir şekilde derleniyor fakat alınan image siyah bir resimden ibaret oluyor. Windowsa derlediğimde de kodu aynı sorunu veriyor. Bir çok deneme ve araştırma yapmama rağmen sorunu çözemedim. Yardımlarınızı bekliyorum. Şimdiden herkese teşekkürler.

(Not : Delphi 10.1.2 Berlin Kullanıyorum.)

procedure TForm1.Button1Click(Sender: TObject); //Video Başlat
begin
FORM1.MediaPlayer1.FileName:='C:\Users\CKRAL\Videos\VID_20140815_194107.3gp';
form1.MediaPlayer1.Play;

end;

procedure TForm1.Button2Click(Sender: TObject);//Video Durdur ve resimi kaydet.
begin
form1.MediaPlayer1.Stop;
form1.MediaPlayer1.Media.Control.MakeScreenshot.SaveToFile('c:\capture.jpg');

end;
end.

FMX'den pek anlamam, ancak; MediaPlayer.Stop kodu bana biraz garip göründü. Video'yu durdurduğunuzda mantıken zaten ekranda bir image kalmaz. Acaba Stop yerine Pause'mu yapmalıydınız ;-)

Hocam o banada garip geldi. Stop kaldırdım denedim genede olmadı. Smile Yalnız söyle bir durumda var. Stop dememe rağmen ekranda resim karesi görünüyor ama yinede siyah bir resim alıyor. Aynı zamanda akan bir görüntüde de denedim aynı sorunu alıyorum. Yinede pauseyide denerim hocam olacak mı ? Smile
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  datasnap Mobil İnternet bağlantı sorunu hakanharbeli 7 169 Dün, Saat: 12:02
Son Yorum: hakanharbeli
  Uygulama linki paylaşma sorunu [ÇÖZÜLDÜ] codder71 2 98 30-01-2018, Saat: 23:38
Son Yorum: codder71
  Listview image değiştirme sorunu serhat 6 207 28-01-2018, Saat: 13:01
Son Yorum: serhatil
Question başka APK dosyasının üzerine yükleme sorunu BY-HAYALET 7 121 26-01-2018, Saat: 13:15
Son Yorum: BY-HAYALET
Question proje dosya boyutu sorunu BY-HAYALET 9 209 23-01-2018, Saat: 14:21
Son Yorum: BY-HAYALET



Konuyu Okuyanlar: 1 Ziyaretçi