fix, DCD get doc only called for D sources

This commit is contained in:
Basile Burg 2015-02-16 02:42:28 +01:00
parent 1b56c75ca1
commit 804dff87d1
1 changed files with 1 additions and 1 deletions

View File

@ -854,7 +854,7 @@ procedure TCEMainForm.ApplicationProperties1ShowHint(var HintStr: string;
begin begin
// TODO-crefactor: move this to TCESynMemo or TCEEditorWidget. // TODO-crefactor: move this to TCESynMemo or TCEEditorWidget.
// TODO-cbugfix: first DDoc hint, window rect is wrong. // TODO-cbugfix: first DDoc hint, window rect is wrong.
if fDoc <> nil then if fDoc.Focused then if (fDoc <> nil) and fDoc.Focused and fDoc.isDSource then
begin begin
TCEEditorHintWindow.FontSize := fDoc.Font.Size; TCEEditorHintWindow.FontSize := fDoc.Font.Size;
HintInfo.HintWindowClass := TCEEditorHintWindow; HintInfo.HintWindowClass := TCEEditorHintWindow;