| T O P I C R E V I E W |
| Kuri |
Posted - Nov 08 2012 : 10:33:11
Hello
TImageEnView
how can you read out the resolution?
how can the resolution changeable? (Antialias effect possible?)
Thank you
Greetings Kuri |
| 3 L A T E S T R E P L I E S (Newest First) |
| xequte |
Posted - Nov 09 2012 : 00:40:38
Hi Kuri
TImageEnView.SetDPI will change the DPI without affecting the size of the image:
http://www.imageen.com/help/TIEView.SetDPI.html
Naturally you will need to save the image afterwards.
Nigel
Xequte Software
www.xequte.com
nigel@xequte.com |
| Kuri |
Posted - Nov 09 2012 : 00:16:56
Hello
Thank you
we Found it.
The magic words are
ImageEnView.DPIY and ImageEnView.ChangeResolution
problem:
If the resolution is changed (for example, 600 to 300 dpi)
internally - the image size is expected to bottom (filesize).
How can I change the resolution - without changing the image dimensions?
ImageEnVie.Proc.Resample after ImageEnView.ChangeResolution is not the solution
Thank you very much
Kuri |
| Boban |
Posted - Nov 08 2012 : 15:59:56
Hi Kuri
Maybe this can help.
(Resolution)=>
procedure TMainForm.Open1Click(Sender: TObject);
var
filename: string;
begin
with ImageEnView1.IO do
begin
filename := ExecuteOpenDialog('', '', false, 1, '');
if filename <> '' then
begin
ImageEnView1.IO.LoadFromFile(filename);
Label1.Caption := IntToStr(ImageEnView1.IEBitmap.Width);
Label2.Caption := IntToStr(ImageEnView1.IEBitmap.Height);
end;
end;
end;
(Changing the resolution)=>
Edit place two components and the events OnChange connect both component with this code:
procedure TMainForm.Edit1Change(Sender: TObject);
begin
ImageEnView1.Proc.ImageResize(StrToInt(Edit1.Text), StrToInt(Edit1.Text), iehLeft, ievTop);
end;
Edit components can connect with UpDown components.
|
Search
