ich gebe zu, ich gehöre eher zur datenbank-fraktion und nicht zum GAS-Bereich (GrafikAnimationSound).
hier mein Codeschnipsel: (das ergebnis ist aber PNG und nciht BMP aber ich will BMP ...)
Danke schon im Voraus für jede Hilfe!!!
thomas
Delphi-Quellcode:
procedure TWFConvert.Button1_Click(sender: System.object;
e: System.EventArgs);
var
t: TiffManager;
i: Image;
bmp: Bitmap;
g: Graphics;
begin
if ParamCount > 0 then
begin
try
t := TiffManager.Create(TextBox1.Text);
i := t.GetSpecificPage(0);
bmp := Bitmap.Create(i.Width, i.Height);
g := Graphics.FromImage(bmp);
g.DrawImage(i, 0, 0, i.Width, i.Height);
bmp.Save(TextBox2.Text); // >> wird aber nur PNG
//bmp.Save('bb',System.Drawing.Imaging.ImageFormat.BMP);
finally
t.Free;
i.Free;
g.Free;
bmp.Free;
end;
end;
end;