TBitmap in ein bliebebiges Format umwandlen

[pluto]

Hallo,
mit theos OpBitmap ist das sehr einfach:

Code: Alles auswählen

procedure BmpSave(bitmap:TBitmap; const aFilename:String);
var
  op:TOPPicture;
begin
  op:=TOpPicture.Create;
  AssignBitmapToOpBitmap(bitmap,op.Bitmap);
  op.SaveToFile(aFilename);
  op.free;
end;

Müsste so Funktionieren.
Außer dem müssen folgende Units noch eingebunden werden:
lazbridge, opbitmapformats
Das Format in das gespeichert wird, wird auto. durch die Datei Endung gewählt !

OpBitMap ist hier zu finden:
viewtopic.php?t=434&start=0

[theo]

TOPPicture hat auch noch ein paar Events:

fOP.OnProgress := @OnProgress; //Progressbar steuern
fOP.OnSaveDetails := @OnSaveDetail; //Formatspezifische Einstellungen

Siehst du alles in lazformatsdemo.

[pluto]

Praktisch ! danke für die Info. Evlt. mache ich mal ein Beispiel dazu(wenn es noch keins gibt) ich dachte halt nur es währe praktisch so eine Funktion hier zu posten..... evlt. brauchst es ja noch jemand.

@monta: Wie mache ich daraus so ein Tutorial wie ihr/du sie machst?
also z.b. das da [KB] vor stehen, gibt es verstekte tags ?

[Christian]

Wozu braucht man denn für die 3 Zeilen Code ein Tuturial ? Was willst da denn reinschreiben ?

[theo]

Praktisch ! danke für die Info. Evlt. mache ich mal ein Beispiel dazu(wenn es noch keins gibt)

Wie ich bereits sagte, das gibt's schon in der lazformatsdemo

[pluto]

Oh ! Gut.....
@Christian
naja das wollte ich einfach allgemein mal wissen..... nicht unbedingt hier für !