Bonjour, je n'arrive pas à trouver comment je peux spécifier un NULL avec ParamByName pour mon champ img qui est de type BLOB
J'ai raccourci le SQL, merci d'avance à celui qui me sauvera
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29 With DataBase.zqQuery Do Begin Close; SQL.Text := 'INSERT INTO deltaimg ' + '(name, img) ' + 'VALUES ' + '(:name, :img);'; ParamByName('name').AsString := eName.Text; If Assigned(ImagePNG) Then Begin ImageStream := TMemoryStream.Create; Try ImagePNG.SaveToStream(ImageStream); ImageStream.Seek(0, soBeginning); ParamByName('img').LoadFromStream(ImageStream, ftBlob); Finally ImageStream.Free; End; End Else Begin ParamByName('img').AsString := ''; End; Prepare; ExecSQL; End;
Partager