From da82735e8a20ab8633fb1bbff6d401d4031a7110 Mon Sep 17 00:00:00 2001 From: zueuk Date: Fri, 6 Jan 2006 17:57:37 +0000 Subject: [PATCH] ...hope I haven't "fixed" anything too much :) --- 2.10/Source/About.dfm | 4 ++-- 2.10/Source/Editor.pas | 5 ++++- 2.10/Source/formPostProcess.dfm | 19 +++++++++++-------- 3 files changed, 17 insertions(+), 11 deletions(-) diff --git a/2.10/Source/About.dfm b/2.10/Source/About.dfm index 0fd2085..cf745d3 100644 --- a/2.10/Source/About.dfm +++ b/2.10/Source/About.dfm @@ -1969,9 +1969,9 @@ object AboutForm: TAboutForm object Label6: TLabel Left = 120 Top = 92 - Width = 86 + Width = 110 Height = 13 - Caption = 'Copyright '#169' 2005 ' + Caption = 'Copyright '#169' 2005-2006' end object Label7: TLabel Left = 140 diff --git a/2.10/Source/Editor.pas b/2.10/Source/Editor.pas index 5ef01b5..a45d707 100644 --- a/2.10/Source/Editor.pas +++ b/2.10/Source/Editor.pas @@ -2532,7 +2532,10 @@ end; procedure TEditForm.scrlXFormColorScroll(Sender: TObject; ScrollCode: TScrollCode; var ScrollPos: Integer); begin - if ScrollCode = scEndScroll then UpdateFlame(True); + if ScrollCode = scEndScroll then begin + MainForm.UpdateUndo; + UpdateFlame(True); + end; end; procedure TEditForm.scrlXFormColorChange(Sender: TObject); diff --git a/2.10/Source/formPostProcess.dfm b/2.10/Source/formPostProcess.dfm index baf2898..162d50b 100644 --- a/2.10/Source/formPostProcess.dfm +++ b/2.10/Source/formPostProcess.dfm @@ -5,6 +5,8 @@ object frmPostProcess: TfrmPostProcess Height = 534 Caption = 'Post Render' Color = clBtnFace + Constraints.MinHeight = 200 + Constraints.MinWidth = 600 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 @@ -36,7 +38,7 @@ object frmPostProcess: TfrmPostProcess end object Label2: TLabel Left = 12 - Top = 32 + Top = 34 Width = 24 Height = 13 Caption = 'Filter' @@ -50,7 +52,7 @@ object frmPostProcess: TfrmPostProcess end object Label4: TLabel Left = 332 - Top = 32 + Top = 34 Width = 45 Height = 13 Caption = 'Vibrancy:' @@ -64,7 +66,7 @@ object frmPostProcess: TfrmPostProcess end object Label6: TLabel Left = 172 - Top = 32 + Top = 34 Width = 50 Height = 13 Caption = 'Brightness' @@ -84,6 +86,7 @@ object frmPostProcess: TfrmPostProcess Top = 8 Width = 57 Height = 21 + Cursor = crHandPoint BevelOuter = bvLowered TabOrder = 0 OnClick = pnlBackColorClick @@ -109,7 +112,7 @@ object frmPostProcess: TfrmPostProcess end object txtFilterRadius: TEdit Left = 104 - Top = 28 + Top = 30 Width = 57 Height = 21 TabOrder = 2 @@ -123,10 +126,10 @@ object frmPostProcess: TfrmPostProcess end object txtVib: TEdit Left = 424 - Top = 28 + Top = 30 Width = 57 Height = 21 - TabOrder = 4 + TabOrder = 6 end object txtContrast: TEdit Left = 424 @@ -137,10 +140,10 @@ object frmPostProcess: TfrmPostProcess end object txtBrightness: TEdit Left = 264 - Top = 28 + Top = 30 Width = 57 Height = 21 - TabOrder = 6 + TabOrder = 4 end end object ScrollBox1: TScrollBox