Changeset 311 for branches/2.19_branch/NewView/SettingsUnit.pas

Timestamp:

Jul 31, 2008, 8:08:50 PM (17 years ago)

Author:

RBRi

Message:

more verbose output

File:

• branches/2.19_branch/NewView/SettingsUnit.pas (modified) (1 diff)

branches/2.19_branch/NewView/SettingsUnit.pas

@@ -641 +641 @@
     aStrings.Add('');
     aStrings.Add('---- Settings ----');
-    aStrings.Add('info: ' + IntToStr(WinQuerySysValue(HWND_DESKTOP, SV_CXSCREEN)));
-    aStrings.Add('info: ' + IntToStr(Screen.Width));
+    aStrings.Add('info WinQuerySysValue(HWND_DESKTOP, SV_CXSCREEN): ' + IntToStr(WinQuerySysValue(HWND_DESKTOP, SV_CXSCREEN)));
+    aStrings.Add('info Screen.Width: ' + IntToStr(Screen.Width));
 
     // some tests