hallo marabu,
dein code:
Delphi-Quellcode:
procedure TDemoForm.SaveButtonClick(Sender: TObject);
var
s: TStream;
begin
s := TMemoryStream.Create;
Image.Picture.Bitmap.SaveToStream(s);
with Query do
begin
SQL.Text := '
update biotest set graphic = :graphic where speciesno = :speciesno';
ParamByName('
speciesno').Value := Table.FieldByName('
SpeciesNo').Value;
ParamByName('
graphic').LoadFromStream(s, ftGraphic);
ExecSQL;
Table.Refresh;
end;
s.Free;
end;
ich versteh die welt nicht mehr ??
1.was bedeutet "speciesno" ist das der feldname wo die fotos rein müssen ?
2.biotest ist das der name der datenbankdatei ?
3.warum brauche ich die tablekomponente wenn ich
query und updatequery habe ?
mfg vader