Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Probleme mit Streams

    Delphi
    by Legolas, 28. Sep 2003
  Soooooooooooooo, :-D
  
  an alle die Interesse daran haben, diese Procedure ist jetzt voll funktionstüchtig und tut das was sie soll:
  
  
  procedure StoreJPEGImage(Table: TTable; Field: STRING);
  var s : TBlobStream;
  fs: TFileStream;
  ms: TMemoryStream;
  bmp : TBitmap;
• Forum: Multimedia

  Re: Probleme mit Streams

    Delphi
    by Legolas, 28. Sep 2003
  Hallo sakura,
  
  prima :-D dein Tip hat mir geholfen. Allerdings muß ich gestehen das die Routine noch nicht so ganz ausgereift ist. Sie macht zwar was sie soll (JPEG komprimieren und in der Größe verkleinern) aber sie verkleinert das Bild nicht wirklich sondern zeigt (kopiert?) mir nur einen Bildausschnitt in der Größe die ich angegeben habe (400x250) ausgehend von der oberen rechten Bildecke....
• Forum: Multimedia

  Re: Probleme mit Streams

    Delphi
    by Legolas, 28. Sep 2003
  Hallo,
  
  @Daniel B:
  
  Das ms. habe ich nur zum testen ausprobiert. Hatte ich dann vergessen zu löschen. Hat also keinerlei Bedeutung.
  
  @sakura:
  
  Ich probiere deinen Vorschlag mal aus. Vielleicht hilft es was.
• Forum: Multimedia

  Probleme mit Streams

    Delphi
    by Legolas, 28. Sep 2003
  Hallo alle zusammen,
  
  ich nehme heute das erste mal aktiv an eurem Forum teil :-D und hoffe die richtige Sparte erwischt zu haben. Da es um JPEG-Dateien geht, denke ich das schon. Nun zu meinem Problem:
  
  Ich habe ein JPEG-Bild das ich mit einer Routine in der Größe verkleinern und komprimieren möchte. Dafür habe ich mich einiger Beiträge aus diesem Forum bedient. Folgenden Code habe ich...