Discussion :

[Ol']

Bonjour,

Je voudrais savoir s'il est possible de lire des champs BLOB au travers d'une connexion ADO.

J'ai vu qu'il était possible de les éditer dans un TRichEdit mais je ne sais pas comment.

Merci d'avance

Olivier

[nil]

certe c'est possible avec ado il est meme favorable qu'avec les composants de la bde
bain dis moi dabord c koi comme type ton blob si c une image tu pouras utiliser un dbimage ou si c un text tu pouras utiliser un dbmemo.

[Ol']

En fait, le problème est que quand je mets un ADODataSet sur la connextion ADO, Delphi me dit que le type de champ n'est pas reconnu

Pour info, le champ BLOB contient du texte

Merci quand même

Ol'

[Bidouille]

En fait, le problème est que quand je mets un ADODataSet sur la connextion ADO, Delphi me dit que le type de champ n'est pas reconnu

Pour info, le champ BLOB contient du texte'

C'est quoi comme base ?

[Ol']

Merci pour vos réponses, la base est sous Oracle 8 (servaur AIX)

[alexmorel]

Tiens j'ai traité plusieurs fois le sujet, regarde sous mon nom //

J'ai pour les BMP !! Pour insere les images

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
With requete_query do
  Begin
     Active:=False;
     Sql.clear;
     Sql.Add('Insert into ta_table(id_ta_table, images) ' 
              +' Values(3, :mon_image));
                     {On lui donne le chemin de l'image a charger dans la base}
      Parameters.ParaByName('mon_image').LoadFromFile(le_chemin, ftBlob);
       ExecSql;
   End;

Et pour la recupere

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
 
Var MS:TMemoryStream;
Begin
MS:=TMemoryStream.Create;
 
With Query_recupere Do
  Begin
      Active:=false;
      Sql.Clear;
      SQl.Add('Select image from ta_table where id_ta_table=3');
      ExecSql;
      Active:=True
   End;
Try
              {On auve dans leStream}
  TBlobField(Query_recupere .FieldByName('image')).saveToStream(MS);
               {On se déplace au début du Stream}   
  MS.Position:=0;
                 {On affiche l'image}
  DBImage.Picture.Bitmap.LoadFromStream(MS);
Finally
  MS.Free;   {On libere la memoire du Stream}
End;

Si tu trouve pour les JPG previens Moi j'en ai aussi besoin

[Ol']

Je vais essayer

Merci pour votre aide

Ol'