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
İ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
  Listview image değiştirme serhat 1 84 30-01-2018, Saat: 13:12
Son Yorum: brs
  Listview image değiştirme sorunu serhat 6 211 28-01-2018, Saat: 13:01
Son Yorum: serhatil
  Listview seçili satır image - Çözüldü serhat 4 145 24-01-2018, Saat: 18:45
Son Yorum: brs
  unidac image insert sorunu erdogan 1 362 25-04-2017, Saat: 09:04
Son Yorum: erdogan
  Image Parçalama dnzmobile 2 365 07-04-2017, Saat: 09:19
Son Yorum: dnzmobile



Konuyu Okuyanlar: 1 Ziyaretçi