?? ch14ex06.pro
字號(hào):
/*
Turbo Prolog 2.0 Chapter 14, Example Program 6
Copyright (c) 1986, 88 by Borland International, Inc
*/
goal
dir("", "*.*", FileName),
file_str(FileName, TextStr),
str_len(TextStr, Len),
str_int(LenStr, Len),
concat("Size ", LenStr, StrSize),
InitPos = 3,
makewindow(1, 7, 7, "Edit Example", 3, 3, 20, 70),
edit(TextStr, OutStringArg, StrSize, FileName,
"After editing, press F10 or Esc to exit this editor",
InitPos, "prolog.err", 1, 1, 1, 1, RetPos, RetStatus),
writef("edited text:\n\n%\n", OutStringarg),
writef("\ncursor position at exit = %", RetPos),
writef("\nexit with (1 or 0): % \n", RetStatus),
write("\n1 = Esc"),
write("\n0 = F10").
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -