VFP 愛用者社區

個人電腦使用 Proxmox Virtual Environment
在pve裡安裝舊版windows版本的虛擬主機不受電腦硬體限制
人到終了消失於世上, 只能緬懷.
軟體只要有人想要用它, 軟體長存.

參考試看看
HWND hWnd = FindWindow(NULL, "視窗標題")
SetWindowPos(hWnd, NULL, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOZORDER)
其中，第一個參數hWnd 是視窗句柄，
第二個參數NULL 表示視窗的Z 軸順序不變，
第三� ...

自己做一個form來替代messagebox()

那是因為你不了解 form 裡面各個object 是怎麼運作的,
所以才會跟你想的不一樣.
你可以試著在form.load裡寫一行 susp
你再用debug 去一步一步查看執行順序及變數變化的狀況.

在form.init 所定義的陣列, 執行完init , 它就被丟掉, 無法用在這個form其它物件中.

你可以在form.init 將
DIMENSION _ary[3,2]
_ary[1,1]='a_01'
....
this.combo1.RowSource='_ary'
改成
thisform.addpro ...

ox.Run( ["C:\Program Files (x86)\系統\app.exe"] ,1,1)

這個是foxuser.dbf及foxuser.fpt 的內容跟程式的版本不相容,
你就複製一份到目前資夾來用, 比較不會有問題.

如果是大量的檔案要加密,
可以像勒索病毒一樣,
只加密所有檔案的前面1024個字(或者更多)
這樣速度快多了.
如果連檔名都要改(這樣才能分辨出有那一些檔案是被加密過的),
那就要另外用一個table來記錄檔名.

改用陣列會方便多,

mcount = alines( myarray , filetostr('mytextfile.txt'))
for i = 1 to mcount
? i,myarray[i]
next

你去試看看用它的 EasyPlayer-RTSPWebActiveX.ocx 能不能用在VFP裡
https://github.com/tsingsee/EasyPlayer-RTSP-Win

1.control + V 是貼上.
2,別的程式應該是用 control + C 將文字複製到剪貼簿
3.VFP 有個系統變數 _cliptext 可以取得目前剪貼簿的文字資料.
4.VFP 可以送出Control + V 的按鍵 keyb '{CTRL+V}'
這樣的資訊量應該 ...

如果執行vfp6時用 "以系統管理員身份" 來執行,
會不會就正常了.

mstr ='b7c6b9ab' &&--big5碼滑鼠
? mstr ,'==>' , hex2chr( mstr )

FUNCTION hex2chr
*傳來16進位中文字, 長度限制就不知遞迴有無限制次數, big5可用, unicode應當也行, 只是vfp要特別用un ...

set device to print
參考
http://vfp.sunyear.com.tw/viewtopic.php?t=5166

原程式有調整切換windwos 方式.
再附上找到的其它怪方法, 比如說讓使用者看不到 chrome
Declare integer FindWindow in Win32API string class_name, string window_title
Declare integer SetWindowPos in user ...