Einzelnen Beitrag anzeigen

Vader

Registriert seit: 6. Mai 2003
804 Beiträge
 
Delphi 6 Enterprise
 
#16

Re: Bilder in die Paradoxtabelle speichern ?

  Alt 3. Apr 2006, 19:15
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
  Mit Zitat antworten Zitat