Delphi-PRAXiS
Seite 2 von 4     12 34      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Jpg in Delphi?! (https://www.delphipraxis.net/3079-jpg-delphi.html)

citybreaker 24. Feb 2003 19:01

Liste der Anhänge anzeigen (Anzahl: 1)
Also bei mir geht es nicht.
Hier mal nen Bild was man
bei mir öffnen kann. Oder
gibt es noch mehr Timages?

cYa Citybreaker :D

citybreaker 24. Feb 2003 19:06

@sakura sorry hab dich zuspät gesehen, wie macht
man das den? :?:

cYa Citybreaker :D

RomanK 24. Feb 2003 19:12

Hoi,
e-dancer hat das oben schoneinmal gezeigt!

citybreaker 24. Feb 2003 19:14

Zitat:

Zitat von e-dancer
Delphi-Quellcode:
uses jpeg;

procedure bgbgb();
begin
aaaa := jpeg.create()

// usw...

end;
end.
Wir haben auch Code-tags - Luckie

Kann ich nichts mit anfangen, kann
halt noch nicht lange Delphi.

cYa Citybreake :D

CalganX 24. Feb 2003 19:17

STOP!
Delphi 3 Profesional unterstützt keine JPEGs!!! Quelle: :roll:

Chris

RomanK 24. Feb 2003 19:20

Hoi,
kein Problem, wir können dir ja helfen.
So sieht doch dein "normaler" Quellcode aus:
Delphi-Quellcode:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation
...
jetzt musst du Jpeg einfügen:
Delphi-Quellcode:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Jpeg,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation
...

d3g 24. Feb 2003 19:43

IIRC habe ich aber mal mit Delphi 3 über das Einbinden der Unit JPEG mit JPEGs gearbeitet...

Marco Haffner 24. Feb 2003 22:45

Ich glaub' auch das ich bei Delphi 3 erst die jpeg.dcu registrieren mußte um in der IDE auch Jpeg nutzen zu können.
Die ist zumindest bei Delphi 3 Pro vorhanden.

citybreaker 25. Feb 2003 18:50

So da bin ich wieder!
Wenn ich bei Uses Jpg
hinschreibe erscheint
eine neue Unit in der
steht:

Code:
procedure Jpg2Bmp(FileName: String; Bmp: TBitmap);
var
  Jpg : TJpegImage;
begin
  Jpg := TJpegImage.Create;
  try
    Jpg.LoadFromFile(ExtractFilePath(ParamStr(0))+'\Image\int2.jpg');
    Bmp.Assign(Jpg);
  finally Jpg.Free end;
end;
Und dann Undifinirter bezeichner TJpegImage !
Was nun?
cYa Citybreaker :D

Marco Haffner 25. Feb 2003 20:22

Zitat:

Zitat von citybreaker
Wenn ich bei Uses Jpg...

Nicht jpg, sondern jpeg.
Die mußte aber, glaube ich, noch als Komponente registriert werden, um sie auch in der IDE verwenden zu können.
Die jpeg.dcu befindet sich im Delphi\Lib Verzeichnis.

Die Prozedur Jpg2Bmp gibt es doch garnicht bei Delphi. :?


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:15 Uhr.
Seite 2 von 4     12 34      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz