分享资源!!让你的vfp代码编辑器变身C#风格。

fojiao8745 2017-11-28 06:35:45
代码贴在下面了,就是利用注册表修改vfp9的一系列键值,自己感觉增强了可读性,效果如下图,道友可以拿去自行研究:

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Desktop]
"Zoomed"="0"
"Row"="57"
"Column"="129"
"Height"="750"
"Width"="1527"
"FontName"="Consolas, 13, N, 1"
"PrtFontName"="Consolas, 9, N, 1"

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Fonts]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options]
"LastProject"="0"
"TALK"="ON"
"StatusBar"="1"
"NOTIFY"="ON"
"CLOCK"="OFF"
"RecentlyUsedFiles"="1"
"DisplayCount"="15"
"COMPATIBLE"="OFF"
"PALETTE"="ON"
"BELL"="ON"
"SAFETY"="ON"
"ESCAPE"="ON"
"LOGERRORS"="ON"
"DEVELOPMENT"="ON"
"KEYCOMP"="WINDOWS"
"CARRY"="OFF"
"CONFIRM"="OFF"
"BROWSEIMECONTROL"="OFF"
"STRICTDATE"="1"
"TabOrdering"="0"
"GridShow"="1"
"GridSnap"="1"
"GridShowPos"="0"
"BuilderLock"="0"
"ResWidth"="-1"
"ResHeight"="-1"
"GridHorz"="12"
"GridVert"="12"
"ScaleUnits"="0"
"FormSetLib"=""
"FormSetClass"=""
"FormsLib"=""
"FormsClass"=""
"PromptBeforeRun"="1"
"EXACT"="OFF"
"NEAR"="OFF"
"ANSI"="OFF"
"LOCK"="OFF"
"EXCLUSIVE"="ON"
"MULTILOCKS"="OFF"
"HEADINGS"="ON"
"DELETED"="OFF"
"OPTIMIZE"="ON"
"UNIQUE"="OFF"
"CPDIALOG"="OFF"
"BrowseRefresh"="0"
"TableRefresh"="5.000000"
"ODOMETER"="100"
"BLOCKSIZE"="64"
"REPROCESS"="0"
"COLLATE"="PINYIN"
"ProjectClick"="0"
"WizardPrompt"="1"
"UseContainerIcons"="0"
"SCCCheckOutOnModify"="1"
"SCCAddFileOnAdd"="1"
"SCCRemoveFileOnRemove"="1"
"SCCUseSCCOnPjxCreate"="0"
"SCCContextDialogsOn"="1"
"SCCProvider"=""
"ProjectHookLib"=""
"ProjectHookClass"=""
"CrsBuffering"="1"
"CrsFetchMemo"="1"
"CrsShareConnection"="0"
"CrsMethodUsed"="1"
"CrsWhereClause"="3"
"CrsFetchSize"="100"
"CrsMaxRows"="-1"
"CrsNumBatch"="1"
"CrsUseMemoSize"="255"
"SQLAsynchronous"="0"
"SQLBatchMode"="1"
"SQLDispWarnings"="0"
"SQLDispLogin"="1"
"SQLTransactions"="1"
"SQLConnectTimeOut"="15"
"SQLIdleTimeOut"="0"
"SQLQueryTimeOut"="0"
"SQLWaitTime"="100"
"SetDefault"="0"
"PATH"=""
"HelpOn"="1"
"HelpCollection"=""
"HelpSystem"="0"
"ResourceOn"="1"
"ShowVCXs"="1"
"ShowOLEInsertable"="1"
"ShowOLEControls"="1"
"SYSFORMATS"="OFF"
"SECONDS"="ON"
"CENTURY"="ON"
"CurrLeft"="1"
"CurrSymbol"="$"
"HOURS"="24"
"DATE"="ANSI"
"DECIMALS"="2"
"FDOW"="1"
"FWEEK"="1"
"MARK"="\".\""
"SEPARATOR"="\",\""
"POINT"="\".\""
"DebugEnvironment"="0"
"DebugTimerEvents"="0"
"CallstackOrder"="0"
"CallstackCurrentLine"="1"
"CallstackStackPos"="1"
"TraceLineNumbers"="0"
"TRBETWEEN"="OFF"
"_THROTTLE"=" 0.00"
"DebugOutputAppend"="1"
"DebugOutputFileName"=""
"TraceFontName"="Consolas, 8, N, 134"
"WatchFontName"="Consolas, 9, N, 1"
"LocalsFontName"="Consolas, 9, N, 1"
"OutputFontName"="Consolas, 9, N, 1"
"CallstackFontName"="Consolas, 9, N, 1"
"TraceNormalColor"="RGB(0,0,0,255,255,255), Auto, Auto"
"TraceExecutingColor"="RGB(255,255,0,0,0,0), NoAuto, Auto"
"TraceCallstackColor"="RGB(0,0,0,240,240,240), Auto, Auto"
"TraceBreakpointColor"="RGB(255,0,0,0,0,0), NoAuto, Auto"
"TraceSelectedColor"="RGB(255,255,255,0,0,0), Auto, Auto"
"WatchNormalColor"="RGB(0,0,0,255,255,255), Auto, Auto"
"WatchSelectedColor"="RGB(255,255,255,0,0,0), Auto, Auto"
"WatchChangedColor"="RGB(255,0,0,255,255,255), NoAuto, Auto"
"LocalsNormalColor"="RGB(0,0,0,255,255,255), Auto, Auto"
"LocalsSelectedColor"="RGB(255,255,255,0,0,0), Auto, Auto"
"OutputNormalColor"="RGB(0,0,0,255,255,255), Auto, Auto"
"OutputSelectedColor"="RGB(255,255,255,0,0,0), Auto, Auto"
"CallstackNormalColor"="RGB(0,0,0,255,255,255), Auto, Auto"
"CallstackSelectedColor"="RGB(255,255,255,0,0,0), Auto, Auto"
"BookmarkColor"="RGB(0,255,255,0,0,0), NoAuto, Auto"
"ShortcutColor"="RGB(0,0,255,0,0,0), NoAuto, Auto"
"EditorCommentColor"="RGB(124,250,0,255,255,255), NoAuto, Auto"
"EditorKeywordColor"="RGB(65,176,255,255,255,255), NoAuto, Auto"
"EditorConstantColor"="RGB(0,210,210,255,255,255), NoAuto, Auto"
"EditorNormalColor"="RGB(0,0,0,32,32,32), Auto, NoAuto"
"EditorOperatorColor"="RGB(192,192,192,255,255,255), NoAuto, Auto"
"EditorStringColor"="RGB(250,128,114,255,255,255), NoAuto, Auto"
"EditorVariableColor"="RGB(192,192,192,255,255,255), NoAuto, Auto"
"EditorCommentStyle"="-1"
"EditorKeywordStyle"="-1"
"EditorConstantStyle"="-1"
"EditorNormalStyle"="-1"
"EditorOperatorStyle"="-1"
"EditorStringStyle"="-1"
"EditorVariableStyle"="-1"
"EditorCommentString"="*!*"
"EditorSelectionMarginFlag"="1"
"BackgroundCompile"="3"
"ParensHighlightDuration"="1500"
"DragDropBetweenWords"="0"
"Hyperlinks"="0"
"RptPrivateDataSession"="0"
"RptSavePrinterEnv"="0"
"RptUseDBCCaptions"="1"
"RptGridShow"="0"
"RptGridSnap"="1"
"RptGridShowPos"="0"
"RptGridHorz"="12"
"RptGridVert"="12"
"RptScaleUnits"="255"
"RptExprBuilderAlias"="1"
"RptBehavior"="80"
"RptFont"="Consolas, 9, N, 1"

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IDE]
"Program"="011000110011000404"
"ProgramExtension"="PRG;MPR;QPR;SPR"
"ProgramFont"="Consolas, 9, N, 1"

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\Blob]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\Varbinary]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\Varchar]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\Varchar (二进制)]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\双精度型]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\备注型]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\备注型 (二进制)]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\多用途型]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\字符型]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\字符型 (二进制)]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\数值型]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\整型]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\日期型]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\日期时间型]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\标签]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\浮点型]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\货币型]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\通用型 ]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\IntelliDrop\FieldTypes\逻辑型]

[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options\VCXList]

[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\VisualFoxPro]

[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\VisualFoxPro\9.0]

[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\VisualFoxPro\9.0\Registration]
"UserName"="微软用户"
"PIDKey"=""
"ProductID"="76683-335-1738797-18184"
...全文
745 14 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
14 条回复
切换为时间正序
请发表友善的回复…
发表回复
都市夜猫 2017-11-30
  • 打赏
  • 举报
回复
win7 和 win10 也一样
都市夜猫 2017-11-30
  • 打赏
  • 举报
回复
我这里是空的
fojiao8745 2017-11-30
  • 打赏
  • 举报
回复
引用 8 楼 dkfdtf 的回复:
我的能选

版主大大,能不能拜托你看一下你的VFP注册表,在[HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Fonts]这个位置的键值是怎样的?
fojiao8745 2017-11-30
  • 打赏
  • 举报
回复
见鬼了,是我的设置有问题吗,我的就没这些第三方字体。。。
都市夜猫 2017-11-30
  • 打赏
  • 举报
回复

我的能选


不过我还是喜欢用 Consolas
fojiao8745 2017-11-30
  • 打赏
  • 举报
回复
安装完了,这个地方根本看不到字体,不知道为何
fojiao8745 2017-11-30
  • 打赏
  • 举报
回复
@十豆三
@都市夜猫
@silandn
@wwle
个人特别喜欢下图的这种字体,用来码代码还是很爽的,但是在系统里面安装完了,在vfp的选项里面根本没有这种字体,修改注册表让XXXFont = "DejaVu Sans Mono" 这两种方式均无法使用这种字体,十豆三和都市夜猫 两位老师有办法吗?

以下附上字体文件,烦请老师帮忙调试。。。
https://zh.fonts2u.com/download/dejavu-sans-mono.%E5%AD%97%E4%BD%93
fojiao8745 2017-11-30
  • 打赏
  • 举报
回复
@十豆三 @silandn @都市夜猫 @wwle 回复楼上。。。其实只要把你当前的vfp9.0的注册表导出来,然后修改以下键值就可以将颜色改为和我一样的。。。字体的话要自己摸索,在vfp9的选项设置里面有字体选择,不用改注册表。。。
"EditorCommentColor"="RGB(124,250,0,255,255,255), NoAuto, Auto"
"EditorKeywordColor"="RGB(65,176,255,255,255,255), NoAuto, Auto"
"EditorConstantColor"="RGB(0,210,210,255,255,255), NoAuto, Auto"
"EditorNormalColor"="RGB(0,0,0,32,32,32), Auto, NoAuto"
"EditorOperatorColor"="RGB(192,192,192,255,255,255), NoAuto, Auto"
"EditorStringColor"="RGB(250,128,114,255,255,255), NoAuto, Auto"
"EditorVariableColor"="RGB(192,192,192,255,255,255), NoAuto, Auto"
都市夜猫 2017-11-30
  • 打赏
  • 举报
回复
也许吧,开发工具这类东西,汉化过的不敢用
fojiao8745 2017-11-30
  • 打赏
  • 举报
回复
引用 12 楼 dkfdtf 的回复:
win7 和 win10 也一样

mmp 我感觉可能是汉化过的原因?
wwle 2017-11-29
  • 打赏
  • 举报
回复
我粘贴为reg,导入失败 我是英文版
都市夜猫 2017-11-29
  • 打赏
  • 举报
回复
引用 2 楼 silandn 的回复:
多谢分享,但是不知道具体怎么用
通常是另存为一个 reg 文件,然后双击导入注册表 提醒:我没做过验证,要用自己负责;导入前,先备份注册表的 HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro 分支。 看内容,应该是 64 位的 Windows 上导出的,里面有中文项目名,估计是汉化过的版本,我只用英文版,汉化版不敢用
silandn 2017-11-29
  • 打赏
  • 举报
回复
多谢分享,但是不知道具体怎么用
十豆三 2017-11-28
  • 打赏
  • 举报
回复

2,748

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧