opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-26 11:17:57 +08:00
Code Issues Packages Projects Releases Wiki Activity

Find a better fix for the black focus rectangle plus fix another graphical glitch for MEMO and BLOB cells, which didn't get covered completely by the (NULL). This fix just leaves the (MEMO) and only uses the grey color for it.

Browse Source
This commit is contained in:
Ansgar Becker
2007-12-05 00:36:03 +00:00
parent 367cb4cc40
commit db48c82110
2 changed files with 7 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/heidisql/include/const.inc
View File

@ -79,7 +79,7 @@ const
// Used by ListViews and Grids // Used by ListViews and Grids
COLOR_SORTCOLUMN_ASC = $00F7F7F7; // light grey COLOR_SORTCOLUMN_ASC = $00F7F7F7; // light grey
COLOR_SORTCOLUMN_DESC = $00EEEEEE; // medium grey COLOR_SORTCOLUMN_DESC = $00EEEEEE; // medium grey
COLOR_NULLVALUE = $00A0A0A0; // darker gray COLOR_NULLVALUE = $00707070; // darker gray
ORDER_ASC = 0; // Used for tag-value of "Direction"-button ORDER_ASC = 0; // Used for tag-value of "Direction"-button
ORDER_DESC = 1; // dito ORDER_DESC = 1; // dito
TXT_ASC = 'ASC'; // Used for caption of "Direction"-button TXT_ASC = 'ASC'; // Used for caption of "Direction"-button

9
source/childwin.pas
View File

@ -4920,9 +4920,12 @@ begin
if (Grid.Fields[DataCol] <> nil) and Grid.Fields[DataCol].IsNull then if (Grid.Fields[DataCol] <> nil) and Grid.Fields[DataCol].IsNull then
begin begin
Grid.Canvas.Font.Color := COLOR_NULLVALUE; Grid.Canvas.Font.Color := COLOR_NULLVALUE;
Grid.Canvas.TextOut(Rect.Left+2, Rect.Top+2, '(NULL)'); // Just use the changed font color for (MEMO) and (BLOB) cells
// Reset font color, so the focus rectangle in this cell displays as dotted rectangle if Grid.Fields[DataCol].DataType in [ftMemo, ftBlob] then
Grid.Canvas.Font.Color := clWindowText; Grid.DefaultDrawColumnCell(Rect, DataCol, Grid.Columns[DataCol], State)
// ... while the natively displayed datatypes get a grey (NULL)
else
Grid.Canvas.TextOut(Rect.Left+2, Rect.Top+2, '(NULL)');
end; end;
end; end;