Discussion :

[Andry]

Salut à tous,

Je dois effectuer des traitements sur un champs blob de ma table sous Firebird 1.5
Je recupère ce champs grâce à une procedure stocké. Pour plus de clarté

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
 
Type TBlobTraitement = class
   FLines : TStrings
   ....
   ....
   public 
   constructor create(....);
   destructor  Destroy; 
   procedure Traiter;
   ....
end;
 
.....
 
constructor TBlobTraitement.Create(....);
begin
  inherited;
  FLines := TStringList.Create;
end;
detsructor TBlobTraitement.Destroy;
begin
  FLines.Free;
  Inherited; 
end;

Mon problème : comment affecté le text du champs blob recupérer avec la procedure stocké dans le champs FLines;
Si j'utilise un TMemo, j'ai aucun problème à faire comme ceci :

Code :

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

1
2
 
  Memo1.Text := IbProc.paramByName('BLOBFIELD').Asstring;

Si j'applique cette code j'obtiens ceci :

Code :

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

1
2
 
  FLines.text := IbProc.paramByName('BLOBFIELD').Asstring;

Mais je constate que c'est pas la valeur attendu qui est dans FLines car la methode traitement me donne des truc bizarre.

Aidez moi svp

Andry

[Chaps]

Les methodes "AddStrings" ou "assign"
de TStringList
devrait faire l'affaire.

Chaps