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

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
İmage'yi kaydetmek
#1
İmage nesnesi içerisine aktarılan fotoyu telefona kayıt etme nasıl olur ?
Cevapla
#2
Merhaba,

Örnek bir kullanım;
Image1.Bitmap.SaveToFile(TPath.Combine(TPath.GetSharedPicturesPath,'Deneme1.jpg'));
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
Image1.Bitmap.SaveToFile(TPath.Combine(GetSharedDocumentsPath,'Deneme1.jpg'));

olarak kullanıcam hocam Documents ' klasörünün içerisin de YeniKlasör adındakı klasörün içerisine kayıt edebilir miyim ?   Documents / YeniKlasor / Deneme1.jpg tarzında


ImgCameraview.Bitmap.SaveToFile(TPath.Combine(Tpath.GetSharedDocumentsPath(),'/YeniKlasor/'+'Deneme1.jpg'));

kodunu kullandım java.io.FileNotFoundException  /YeniKlasor/Deneme1.jpg : open failed : ENOENT ( no such file or directory ) 

hatası geldi hocalar
Cevapla
#4
kaydetmeden önce klasör varmı/yokmu kontrol etmelisin, yoksa klasörü create etmelisin
Cevapla
#5
(09-05-2017, Saat: 23:33)meko Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Olkaydetmeden önce klasör varmı/yokmu kontrol etmelisin, yoksa klasörü create etmelisin

Dosyayı FormCreate olayında oluşturuyorum hocam
Cevapla
#6
showmessage ile
TPath.Combine(Tpath.GetSharedDocumentsPath(),'/YeniKlasor/'+'Deneme1.jpg')
kontrol et belki orda olması/olmaması gereken bir karakter vardır

IncludeTrailingPathDelimiter(DirPath)
fonksiyonunu bir incele, işine yarayabilir.
Cevapla
#7
Merhaba,
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol üyemizin de belirttiği gibi IncludeTrailingPathDelimiter fonksiyonu, parametrik olarak göndermiş olduğunuz metinsel ifade içerisinde geçen tüm dizin ayıraçlarını, tüm platform (Win, OS X, Linux, iOS ve Android) hassasiyetlerine dikkat ederek, yeniden biçimlendirir ve size yeni bir sonuç döndürür.
Aşağıda sorununuzun çözümüne yönelik bir örnek yer almaktadır.

procedure TForm1.Button1Click(Sender: TObject);
var
 strDosyaKonumu: String;
const
 strYeniKlasor = 'Yeni Klasör';
begin
 strDosyaKonumu := IncludeTrailingPathDelimiter(TPath.GetSharedDocumentsPath +
   '/' + strYeniKlasor + '/');
{$REGION 'Yada'}
 {
   strDosyaKonumu := TPath.GetSharedDocumentsPath + PathDelim + strYeniKlasor +
   PathDelim;
 }
{$ENDREGION}
 if not TDirectory.Exists(strDosyaKonumu) then
   TDirectory.CreateDirectory(strDosyaKonumu);
 ImgCameraview.Bitmap.SaveToFile(TPath.Combine(strDosyaKonumu, 'Deneme1.jpg'));
end;

Bu metod yerine, her bir ayıraç için PathDelim fonksiyonunu da kullanabilirsiniz.
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
#8
(10-05-2017, Saat: 08:33)Fesih ARSLAN Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlMerhaba,
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol üyemizin de belirttiği gibi IncludeTrailingPathDelimiter fonksiyonu, parametrik olarak göndermiş olduğunuz metinsel ifade içerisinde geçen tüm dizin ayıraçlarını, tüm platform (Win, OS X, Linux, iOS ve Android) hassasiyetlerine dikkat ederek, yeniden biçimlendirir ve size yeni bir sonuç döndürür.
Aşağıda sorununuzun çözümüne yönelik bir örnek yer almaktadır.

procedure TForm1.Button1Click(Sender: TObject);
var
 strDosyaKonumu: String;
const
 strYeniKlasor = 'Yeni Klasör';
begin
 strDosyaKonumu := IncludeTrailingPathDelimiter(TPath.GetSharedDocumentsPath +
   '/' + strYeniKlasor + '/');
{$REGION 'Yada'}
 {
   strDosyaKonumu := TPath.GetSharedDocumentsPath + PathDelim + strYeniKlasor +
   PathDelim;
 }
{$ENDREGION}
 if not TDirectory.Exists(strDosyaKonumu) then
   TDirectory.CreateDirectory(strDosyaKonumu);
 ImgCameraview.Bitmap.SaveToFile(TPath.Combine(strDosyaKonumu, 'Deneme1.jpg'));
end;

Bu metod yerine, her bir ayıraç için PathDelim fonksiyonunu da kullanabilirsiniz.

Allah razı olsun hocam çözüldü : )
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  FMX Background Image mcuyan 3 96 17-10-2018, Saat: 16:00
Son Yorum: Fesih ARSLAN
  Image Index numarasını alma ahmetb 3 144 24-09-2018, Saat: 11:36
Son Yorum: ahmetb
  Buton image sorunu (style) ahmetb 4 162 31-08-2018, Saat: 14:40
Son Yorum: mrmarman
  image processing pro_imaj 3 360 06-06-2018, Saat: 22:47
Son Yorum: pro_imaj
  Listview image değiştirme serhat 1 447 30-01-2018, Saat: 13:12
Son Yorum: brs



Konuyu Okuyanlar: 1 Ziyaretçi