From d84334d76416be8eadc20aa8edcfeaea35d4c62a Mon Sep 17 00:00:00 2001
From: MageSlayer <MageSlayer@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Thu, 1 Jan 2009 21:41:48 +0000
Subject: [PATCH] Patch to prevent TDBEdit exception

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@648 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 examples/germesorders/uorder.pas | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/examples/germesorders/uorder.pas b/examples/germesorders/uorder.pas
index bc0e00448..9dbc07539 100644
--- a/examples/germesorders/uorder.pas
+++ b/examples/germesorders/uorder.pas
@@ -121,6 +121,9 @@ begin
   dsOrder.TableName:='Orders';
   dsOrder.PrimaryKey:='ID';
 
+  //workaround to prevent mask exception :(
+  DBEdit1.EditMask:='';
+
   BaseConnect.ConnectToBase(dsOrgs);
   dsOrgs.SQL:='select ID, Name from Orgs order by Name';
   dsOrgs.Open;