changed sample density editbox to combobox
This commit is contained in:
parent
c38e73d2c2
commit
3e29c70519
@ -262,7 +262,7 @@ object RenderForm: TRenderForm
|
||||
Enabled = False
|
||||
ParentBiDiMode = False
|
||||
ReadOnly = True
|
||||
TabOrder = 2
|
||||
TabOrder = 1
|
||||
Text = '2'
|
||||
OnChange = txtOversampleChange
|
||||
end
|
||||
@ -273,18 +273,8 @@ object RenderForm: TRenderForm
|
||||
Height = 21
|
||||
BiDiMode = bdRightToLeft
|
||||
ParentBiDiMode = False
|
||||
TabOrder = 1
|
||||
OnChange = txtFilterRadiusChange
|
||||
end
|
||||
object txtDensity: TEdit
|
||||
Left = 112
|
||||
Top = 20
|
||||
Width = 57
|
||||
Height = 21
|
||||
BiDiMode = bdRightToLeft
|
||||
ParentBiDiMode = False
|
||||
TabOrder = 0
|
||||
OnChange = txtDensityChange
|
||||
OnChange = txtFilterRadiusChange
|
||||
end
|
||||
object udOversample: TUpDown
|
||||
Left = 169
|
||||
@ -295,7 +285,24 @@ object RenderForm: TRenderForm
|
||||
Min = 1
|
||||
Max = 4
|
||||
Position = 2
|
||||
TabOrder = 2
|
||||
end
|
||||
object txtDensity: TComboBox
|
||||
Left = 112
|
||||
Top = 20
|
||||
Width = 57
|
||||
Height = 21
|
||||
ItemHeight = 13
|
||||
ItemIndex = 0
|
||||
TabOrder = 3
|
||||
Text = '200'
|
||||
OnChange = txtDensityChange
|
||||
Items.Strings = (
|
||||
'200'
|
||||
'500'
|
||||
'1000'
|
||||
'2000'
|
||||
'4000')
|
||||
end
|
||||
end
|
||||
object GroupBox4: TGroupBox
|
||||
|
@ -46,7 +46,6 @@ type
|
||||
Label4: TLabel;
|
||||
txtOversample: TEdit;
|
||||
txtFilterRadius: TEdit;
|
||||
txtDensity: TEdit;
|
||||
GroupBox4: TGroupBox;
|
||||
lblApproxMem: TLabel;
|
||||
lblPhysical: TLabel;
|
||||
@ -69,6 +68,7 @@ type
|
||||
cbPostProcess: TCheckBox;
|
||||
edtNrThreads: TEdit;
|
||||
Label6: TLabel;
|
||||
txtDensity: TComboBox;
|
||||
procedure FormCreate(Sender: TObject);
|
||||
procedure FormDestroy(Sender: TObject);
|
||||
procedure btnRenderClick(Sender: TObject);
|
||||
@ -378,6 +378,7 @@ begin
|
||||
cbHeight.Text := IntToStr(MainForm.Image.Height);
|
||||
ImageWidth := StrToInt(cbWidth.Text);
|
||||
ImageHeight := StrToInt(cbHeight.Text);
|
||||
sample_density:=renderDensity;
|
||||
txtDensity.Text := FloatToStr(renderDensity);
|
||||
ShowMemoryStatus;
|
||||
Ratio := ImageWidth / ImageHeight;
|
||||
|
Loading…
Reference in New Issue
Block a user