Anvendelse af Blob-felt

Du bruger en TBlobStream

du kan se i hjælpen hvordan, det er ikke så svært

Martin> 30 point plejer at kunne give lidt kode ;-))

var
  S : TStream;

begin
  S := MyTable.CreateBlobStream(MyTable.FieldByName(\'MyField\'),bmReadWrite);
  // Så kan du bruge streamen som man gør med en alm stream
  S.Free;
end;

/Martin

Martin> lad os lige tage det fra bunden.

jeg har et antal tekststrenge som jeg gerne vil gemme i db\'en i blob feltet.

De kan jo feks se sådan her ud:

String1 := \'Dette er streng nr 1, den skal gemmes i et blob felt sammen med et på designtime ukendt antal andre strenge\';

String2 := \'Streng 2 gemmes i blob felt med streng1\';
String3 :=...
String4:= ..
osv.

Feltet er oprettet i db en, så vi skal bare have puttet strengene derned med noget SQL haløj

QueryBlob.SQL.Add(\'INSERT into BlobDB \'+
                  \'(NextId, BlobFelt) \'+
                  \' VALUES (7, blob?????????)\';

noget i den stil må da kunne lade sig gøre ?


                                     

Så putter du dem ind i en TStringList (add(tekst1), add(tekst2) osv. ) og så gemmer du Listens Text property i blobfeltet og læser ud fra blob\'en til Text property\'en på en createt tstringlist, så kører det *S*

Jeg har ikke helt styr på hvordan du gør det med SQL.text, men du kan bruge ParamByName(\'Blobfelt\').ASString

:Blobdata i din sql laver et parameter der heder blobdata

/Martin

Er der slet ingen som har prøvet dette og har lidt eksempel kode på lager ?

Brug en Parameter, det er det nemeste