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
FMX Sqlite İnsert Into Blob Data Örneği
#1
Merhaba arkadaşlar.

bi konuda desteğinize ihtiyaç duyuyorum. baya bir araştırdım ama bi sonuca ulaşamadım.

Bildiğiniz üzere FireDac Bileşenlerinde Sqlite tabanlı çalışırken, params kullanmıyoruz. 

Onun yerine kodları manuel ekliyorum..

Sql:='Insert Into (adi,soyadi,resim) Values ('+QuotedStr(edit1.text)+','+QuotedStr(edit2.text)+RESİM_DATASI');';

şeklinde kullanmamız gerekiyor. 

Fakat BLOB datayı buraya nasıl ekleyeceğimi bulamadım... Fikri olan varmıdır?
WWW
Cevapla
#2
var
  resimblobalan: TStream;
begin

 Query1.Close;
 Query1.Params.Clear;
 Query1.Params.CreateParam(ftstring, 'ID', ptinput);
 Query1.Params.CreateParam(ftblob, 'resim', ptinput);

 Query1.SQL.Text := 'Insert into nsenddata (ID,resim) VALUES (:ID,:resim)';

 Query1.Params.ParamByName('ID').AsString := '1';
 // tek alan olmasın diye ID ekledim ve değer olarak  1 yazdım

 try

   resimblobalan := TMemoryStream.Create;

   // kişinin yüklediği resmi başka tablodan alıp alana ekliyorum

   TBlobField(UniQuery2.FieldByName('dataresim')).SaveToStream(resimblobalan);
   resimblobalan.Position := 0;

   Query1.Params.ParamByName('resim').LoadfromStream(resimblobalan, ftblob);

 finally

   resimblobalan.Free;

 end;

 Query1.Execute;

ben bu şekilde kullanıyordum bir problem olmadı.
Cevapla
#3
Ben MySQL'de Böyle kullanıyorum
Close;
sql.Clear;
sql.Add('INSERT INTO uzaks (s1,jpeg) VALUES (:s1,:jp)');
ParamByName('s1').AsString := GetUserFromWindows;
ParamByName('jp').LoadFromFile(OpenDialog1.filename, ftBlob);
Execute;
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Combobox database insert hido 4 101 08-02-2018, Saat: 03:42
Son Yorum: dilo
  unidac image insert sorunu erdogan 1 358 25-04-2017, Saat: 09:04
Son Yorum: erdogan
  Sqlite Kullanımı Hakkında Görüşünüz beklentili 5 483 24-02-2017, Saat: 08:54
Son Yorum: yhackup
  Facebook Login Örneği death_claws 8 716 09-01-2017, Saat: 08:03
Son Yorum: Fesih ARSLAN



Konuyu Okuyanlar: 1 Ziyaretçi