opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-03-13 09:24:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

Avoid a follow-up AV when seeing unknown data types.

Browse Source
This commit is contained in:
rosenfield
2007-08-21 19:35:14 +00:00
parent 45cc29269e
commit 2b8a75b61c
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
source/childwin.pas
View File

@@ -4942,7 +4942,7 @@ begin
background := clInfoBK;
afont.Color := clInfoText;
end;
if field.IsNull then background := mainform.DataNullBackground;
if (field <> nil) and field.IsNull then background := mainform.DataNullBackground;
end;
procedure TMDIChild.DBMemo1Exit(Sender: TObject);