summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2010-10-01 12:32:43 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2010-10-01 12:36:07 +0200
commitcf2ba4e5e0ff0ed49b4f1271c8acc27cbde4ee2e (patch)
tree4e3c36fee01c18ce1d5b8167f6397dc0ad304585
parent75da40a254a6d3c44b6d6fec6c4b0c7a96555acc (diff)
downloadfpGUI-cf2ba4e5e0ff0ed49b4f1271c8acc27cbde4ee2e.tar.xz
bugfix: SpinEdit sometimes caused an AV because fpgCaret could not paint
-rw-r--r--src/corelib/fpg_main.pas1
-rw-r--r--src/gui/fpg_spinedit.pas5
2 files changed, 2 insertions, 4 deletions
diff --git a/src/corelib/fpg_main.pas b/src/corelib/fpg_main.pas
index fa6b44d5..faaad5fd 100644
--- a/src/corelib/fpg_main.pas
+++ b/src/corelib/fpg_main.pas
@@ -2215,6 +2215,7 @@ procedure TfpgCaret.UnSetCaret(ACanvas: TfpgCanvas);
begin
if (FCanvas = ACanvas) or (ACanvas = nil) then
begin
+ FTimer.Enabled := False;
FEnabled := False;
FCanvas := nil;
end;
diff --git a/src/gui/fpg_spinedit.pas b/src/gui/fpg_spinedit.pas
index ce768120..52bd7873 100644
--- a/src/gui/fpg_spinedit.pas
+++ b/src/gui/fpg_spinedit.pas
@@ -327,10 +327,7 @@ end;
procedure TfpgAbstractSpinEdit.HandlePaint;
begin
- Canvas.Clear(BackgroundColor);
- if FButtonUp.HasHandle then
- fpgPostMessage(self, FButtonUp, FPGM_PAINT);
-// FButtonDown.Invalidate;
+ Canvas.Clear(BackgroundColor);
end;
procedure TfpgAbstractSpinEdit.HandleResize(AWidth, AHeight: TfpgCoord);