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

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 3/5 - 1 oy
  • 1
  • 2
  • 3
  • 4
  • 5
sql server resimli veritabanı örneği hakkında
#1
Ben sql server'da 1 tablo açtım adı - soyadi - resim alanları var bu tabloda.

Yapmak istediğim delphi'de projeme resim alanını nasıl göstereceğim yani kayıt girerken image çift tıkladığımda bu field image'e atacağım resim ile kaydetmesini istiyorum bunun için bana örnek verebilir misiniz bu konuda hiç tecrübem yok internet'te bulduğum örneklerden bir şey anlamadım yardımlarınız için şimdiden teşekkürler.
Cevapla
#2
Merhaba,
Eğer fotoğraf boyutu büyük olacak ise kesinlikle önermem tabloya fotoğraf atmanı
Ama boyutu küçük ol olacak ise, bilgisayar başında geçince atarım çok basit
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla
#3
(23-10-2016, Saat: 12:49)yhackup Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlMerhaba,
Eğer fotoğraf boyutu büyük olacak ise kesinlikle önermem tabloya fotoğraf atmanı
Ama boyutu küçük ol olacak ise,  bilgisayar başında geçince atarım çok basit

merhaba hocam ben tablado resmin yolunu tutacağım bu tarzda ufak örnek bir proje hazırlayıp verirseniz çok sevinirim teşekkürler.
Cevapla
#4
(23-10-2016, Saat: 21:22)emrekilinc1984 Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
(23-10-2016, Saat: 12:49)yhackup Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlMerhaba,
Eğer fotoğraf boyutu büyük olacak ise kesinlikle önermem tabloya fotoğraf atmanı
Ama boyutu küçük ol olacak ise,  bilgisayar başında geçince atarım çok basit

merhaba hocam ben tablado resmin yolunu tutacağım bu tarzda ufak örnek bir proje hazırlayıp verirseniz çok sevinirim teşekkürler.



Bununla OpenDialog ile seçilen dosyayı direk tabloya atarsın, ufak tefek profil fotoğraları atılabilir.(tablodaki field LONGBLOB tipinde olmalı)
Dosya yolunu tutmak da bu kodlar içerisinde yatıyor.
  var
    MyQuery1453: TMyQuery;
 begin
   if OpenDialog1.Execute then
   begin
     Image1.Picture.LoadFromFile(OpenDialog1.filename);
     MyQuery1453 := TMyQuery.Create(self);
     MyQuery1453.Connection := ycon;
     try
       with MyQuery1453 do
       begin
         Close;
         sql.Clear;
         sql.Add('INSERT INTO uzaks (s1,jpeg) VALUES (: s1,: jp)');
         ParamByName('s1').AsString := GetUserFromWindows;
         ParamByName('jp').LoadFromFile(OpenDialog1.filename, ftBlob);
         Execute;
       end;
     finally
       MyQuery1453.Free;
     end;
   end;
 end;



sql.Add( ' INSERT INTO uzaks (s1,jpeg) VALUES ( : s1, :jp )' );
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla
#5
hocam ben sql de tutmayacağım resimleri yol göstereceğim buna örnek bir proje yapıp verirmisiniz bana rica etsem örnek adi,soyadi,fotografi field olsun ve \\10.0.0.100\resimler klasörüne kaydetsin yüklediğim resimleri yardımlarınız için şimdiden teşekkürler.
Cevapla
#6
(24-10-2016, Saat: 22:00)emrekilinc1984 Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Olhocam ben sql de tutmayacağım resimleri yol göstereceğim buna örnek bir proje yapıp verirmisiniz bana rica etsem örnek adi,soyadi,fotografi field olsun ve \\10.0.0.100\resimler klasörüne kaydetsin yüklediğim resimleri yardımlarınız için şimdiden teşekkürler.

Oldu canım başka emrin var mı ?
Oltayı verdim mis gibi, balığı da sen tut bir zahmet Wink
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla
#7
(24-10-2016, Saat: 22:00)emrekilinc1984 Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Olhocam ben sql de tutmayacağım resimleri yol göstereceğim buna örnek bir proje yapıp verirmisiniz bana rica etsem örnek adi,soyadi,fotografi field olsun ve \\10.0.0.100\resimler klasörüne kaydetsin yüklediğim resimleri yardımlarınız için şimdiden teşekkürler.

Müşteri adını nasıl kaydediyorsanız mantık aynı mantık

if opendialog1.execute then
begin
benimdatasetimresimyolu.text:=opendialog1.filename
end;

“Do. Or do not. There is no try.”
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Star ıdHTTP Post hakkında? [Çözüldü] Cyber 1 89 06-02-2018, Saat: 13:36
Son Yorum: Cyber
  CRC16 ModBus Örneği dicle_gsm 2 76 04-02-2018, Saat: 22:33
Son Yorum: SimaWB
  WSDL Import Tanımlaması hakkında adelphiforumz 10 260 26-01-2018, Saat: 12:01
Son Yorum: Fesih ARSLAN
  Delphi Eval Hakkında narkotik 8 189 26-01-2018, Saat: 01:46
Son Yorum: narkotik
  Layout View Hakkında (Çözüldü) yhackup 8 571 15-12-2017, Saat: 08:28
Son Yorum: Fesih ARSLAN



Konuyu Okuyanlar: 1 Ziyaretçi