there was a bug when flame was rendered with previously-selected sample density value...

This commit is contained in:
zueuk 2005-12-31 08:19:46 +00:00
parent 31a28c9e2a
commit f4a6ab8f7a
2 changed files with 6 additions and 7 deletions

View File

@ -290,10 +290,9 @@ object RenderForm: TRenderForm
Height = 21 Height = 21
AutoComplete = False AutoComplete = False
ItemHeight = 13 ItemHeight = 13
ItemIndex = 0
TabOrder = 3 TabOrder = 3
Text = '200'
OnChange = txtDensityChange OnChange = txtDensityChange
OnCloseUp = txtDensityChange
Items.Strings = ( Items.Strings = (
'200' '200'
'500' '500'

View File

@ -25,9 +25,9 @@ uses
ExtCtrls, ExtCtrls,
Render; // 'use'd only for SizeOf() Render; // 'use'd only for SizeOf()
const //const
WM_THREAD_COMPLETE = WM_APP + 5437; // WM_THREAD_COMPLETE = WM_APP + 5437;
WM_THREAD_TERMINATE = WM_APP + 5438; // WM_THREAD_TERMINATE = WM_APP + 5438;
type type
TRenderForm = class(TForm) TRenderForm = class(TForm)
@ -401,8 +401,8 @@ begin
cbHeight.Text := IntToStr(MainForm.Image.Height); cbHeight.Text := IntToStr(MainForm.Image.Height);
ImageWidth := StrToInt(cbWidth.Text); ImageWidth := StrToInt(cbWidth.Text);
ImageHeight := StrToInt(cbHeight.Text); ImageHeight := StrToInt(cbHeight.Text);
sample_density:=renderDensity; sample_density := renderDensity;
txtDensity.Text := FloatToStr(renderDensity); txtDensity.Text := FloatToStr(sample_density);
ShowMemoryStatus; ShowMemoryStatus;
Ratio := ImageWidth / ImageHeight; Ratio := ImageWidth / ImageHeight;
end; end;