| T O P I C R E V I E W |
| kelong |
Posted - Jun 26 2013 : 09:00:05
How to keep ImageEnView.Select size of the constituency, whether as ImageEnView zoom in or out, ImageEnView.Select are kept size width 307 pixels and height 378 pixels? thank's
I LOVE IMAGEEN |
| 9 L A T E S T R E P L I E S (Newest First) |
| kelong |
Posted - Jul 03 2013 : 03:39:43
thank's.
I LOVE IMAGEEN |
| klausdoege |
Posted - Jun 30 2013 : 00:59:45
I am not sure whether I understand it right.
But you can cut a solid selection with:
ImageEnView1.Select(0, 0, 307, 378);
ImageEnView1.Proc.CropSel;
Klaus
www.klausdoege.de |
| kelong |
Posted - Jun 29 2013 : 07:02:27
Depending on the photo size lock Crop Proportions?
I LOVE IMAGEEN |
| kelong |
Posted - Jun 28 2013 : 20:35:24
How to cut the lock according to the proportion of sheet sizes? Crop specifications width = 307, Height = 378
I LOVE IMAGEEN |
| klausdoege |
Posted - Jun 27 2013 : 12:21:13
Hello,
try this.
(* If SelectionAspectRatio is -1, the aspect ratio is active only when user press the ALT key, and it is automatically calculated.
If SelectionAspectRatio is 0, the size of the selection is fixed and determined by SelectionAbsWidth and SelectionAbsHeight properties.
If SelectionAspectRatio is >0, ImageEn maintains the specified aspect.*)
ImageEnView1.SelectionAspectRatio:=0;
ImageEnView1.Select(0, 0, 307, 378);
ImageEnview1.MouseInteract := [ miSelect ];
Klaus
www.klausdoege.de |
| kelong |
Posted - Jun 27 2013 : 10:04:23
//==================================================================
//1#12289;Save size width = 307 pixels, height = 378 ,DPI = 350??????
//2, how to select Width = 307, Height = 378 to select?
//3, in the ImageEnView.MouseInteract select move select, how to remain Width = 307, Height = 378 ratio of the size?
//==================================================================
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ieview, imageenview, imageenproc, StdCtrls,imageenio;
type
TForm1 = class(TForm)
ImageEnView1: TImageEnView;
ImageEnView2: TImageEnView;
Btn_LoadJpg: TButton;
Button1: TButton;
Button2: TButton;
procedure Btn_LoadJpgClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Btn_LoadJpgClick(Sender: TObject);
begin
ImageEnview1.IO.LoadFromFileJpeg('C:\pic\DSC00564.jpg');
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
//1#12289;Save size width = 307 pixels, height = 378 ,DPI = 350??????
ImageEnView2.IO.SaveToFileJpeg('JPG0001.JPG');
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
//2, how to select Width = 307, Height = 378 to select?
//3, in the ImageEnView.MouseInteract select move select, how to remain Width = 307, Height = 378 ratio of the size?
ImageEnView1.Proc.SelCopyToClip(true); // copy select
ImageEnView2.Proc.SelPasteFromClip(true); //pate form ImageEnView select
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
ImageEnview1.MouseInteract := [ miSelect ]; //select
end;
end.
I LOVE IMAGEEN |
| fab |
Posted - Jun 26 2013 : 23:21:13
I cannot understand this last question. Please add details. |
| kelong |
Posted - Jun 26 2013 : 18:13:54
If you zoom the view or zoom out, the "displayed" selection must change, after changing the constituency, the captured image holding area 307 pixels wide, 378 pixels high. Can you?
I LOVE IMAGEEN |
| fab |
Posted - Jun 26 2013 : 12:31:41
I'm sorry, but I think it is not possible what you need.
Selections selects a region of pixels. If you zoom the view, the "displayed" selection must change, otherwise you are no more selecting the same original pixels. |
|
|
Search
