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
  Puanların Önemi Hakkında... Tuğrul HELVACI 20 6.773 Dün, Saat: 17:42
Son Yorum: Tuğrul HELVACI
Question SFTP Hakkında elixir84 3 138 25-06-2018, Saat: 10:02
Son Yorum: SimaWB
  Veritabanı hakkında mehmetalpgozbasi 4 217 19-06-2018, Saat: 12:57
Son Yorum: mehmetalpgozbasi
  Veritabanı güncelleme malitutuncu 9 340 19-06-2018, Saat: 09:50
Son Yorum: malitutuncu
  DbBrowser-Veritabanı kilitlenme sorunu ? BY-HAYALET 2 127 08-06-2018, Saat: 21:13
Son Yorum: BY-HAYALET



Konuyu Okuyanlar: 1 Ziyaretçi