Entwickler-Ecke

Datenbanken - TADOBlobStream Komponente nicht vorhanden


Arne Danikowski - Mo 07.06.10 14:31
Titel: TADOBlobStream Komponente nicht vorhanden
Ich möchte ein Bild als Strem in eine Accessdatenbank speichern.
Dazu wollte ich mit TADOBlobStream Arbeiten. Nur irgendwie kennt mein System diese Komponente nicht.
Muss dazu was extra installiert werden?


Moderiert von user profile iconNarses: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Mo 07.06.2010 um 20:39


Arne Danikowski - Fr 11.06.10 11:51

Hat niemand eine Idee?


Magic J - Fr 11.06.10 11:59

hi

versuchs mal mit dieser Unit


Delphi-Quelltext
1:
uses ADODB;                    


Gruß,


bummi - Fr 11.06.10 12:13

oder so ....


Delphi-Quelltext
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:
procedure TForm2.Button1Click(Sender: TObject);
var
  s:TMemoryStream;
begin
  s:=TMemoryStream.Create;
  image1.Picture.Bitmap.SaveToStream(s);
  a.Edit;
  s.Seek(0,0);
  aBild.LoadFromStream(s);
  a.Post;
  s.Free;
end;

procedure TForm2.Button2Click(Sender: TObject);
var
  s:TMemoryStream;
begin
  s:=TMemoryStream.Create;


  aBild.SaveToStream(s);
  s.Seek(0,0);
  image2.Picture.Bitmap.LoadFromStream(s);
  image2.Invalidate;
  s.Free;
end;