Changeset 213 for oup/current/Tools

Timestamp:

Jun 12, 2007, 7:00:48 PM (18 years ago)

Author:

alloc

Message:

 

File:

• oup/current/Tools/MetaEditor.pas (modified) (1 diff)

oup/current/Tools/MetaEditor.pas

@@ -205 +205 @@
         begin
           if Data.Field is TFile then
+          begin
             if Length(TFile(Data.Field).FileName) = 0 then
-              TargetCanvas.Font.Color := $000060;
+              TargetCanvas.Font.Color := $C06060;
+            if TFile(Data.Field).FileSize = 0 then
+              TargetCanvas.Font.Color := $2020A0;
+          end;
         end;
     end;