十年沒用過DELPHI了,領導今天要求我們單位的監控顯示幕中各個攝像頭畫面的字體(顯示的是下級單位)調大,但是監控廠家說實作不了,我就想用DELPHI寫個小程式來實作:用EDIT來顯示字體,VISIBLE為true,FORM1隱藏。然后把這個小程式放到監控軟體之上,這樣小程式的字體就把監控的字體遮蓋了,監控視頻還能正常顯示。
我下載了DELPHI7,也能實作FORM1的隱藏:
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.ShowMainForm := false;
end;
但是有一個問題卻苦苦解決不了:當FORM1隱藏時,edit1\edit2\edit3\edit4\edit5也隨之消失。。。
請各位幫忙解決:如何在隱藏FORM1的同時,能夠顯示edit1\edit2\edit3\edit4\edit5?
uj5u.com熱心網友回復:
不懂。不過我覺得你是不是可以考慮把form的表單弄為透明的?
因為你把form隱藏了,上面的東西肯定都隱藏了,這個思路不對。
uj5u.com熱心網友回復:
不要隱藏Form1。只要將 Form1 設為無邊框,與 Edit1 一樣大小(Edit 充滿 Form1)即可。uj5u.com熱心網友回復:
你說的很對,不能隱藏,設定成透明就可以了。但是又遇到新問題了:這個小程式的界面后面是監控,當把這個小程式放到監控畫面上面時,監控畫面就定格了,問:怎么讓小程式能夠實時重繪畫面?uj5u.com熱心網友回復:
不能隱藏form ,帶來的結果是控制元件也都隱藏了。通常視頻上不能帶入字符。uj5u.com熱心網友回復:
在你的監控回圈陳述句中加入:Application.ProcessMessages;uj5u.com熱心網友回復:
用DSPACK把監控視頻源拉進去播放,再在DSPack上顯示你想要顯示資訊,其它那些擋在前面的方法就不要考慮了。uj5u.com熱心網友回復:
視頻疊加, 視頻廠家應該支持的吧uj5u.com熱心網友回復:
畫面上的字體應該比較小吧,采用透明表單應該能解決uj5u.com熱心網友回復:
https://bbs.csdn.net/topics/20201082參見wzrlover的方法
uj5u.com熱心網友回復:
思路應該是錯誤的你應該把監控程式嵌入到自己的程式視窗中,這樣你才有可能控制自己視窗的控制元件去擋監控程式的小字
關鍵字“外部程式”“嵌入”
應該有一大把例子
uj5u.com熱心網友回復:
查監控系統的API(海康、大華之類的都有的),自己做一個監控程式就好了,可以直接獲得影像視窗的Handle和DC,直接在上面寫字uj5u.com熱心網友回復:
思路有問題。 首先監控程式是否有原始碼,有的話就好辦了,指定的位置放名稱。如果沒有,通過spy++找handle方式,給他相應位置補幾個edituj5u.com熱心網友回復:
不如用exescope之類的exe資源編輯器,直接改改。你的方法有問題uj5u.com熱心網友回復:
測驗完成,可以。表單的color設定成clWhite(透明),TransparentColor設定成True,TransparentColorValue設定成clWhite。讓后根據你需要的位置放置edit就行了。自己設定edit的text需要顯示的漢字。
uj5u.com熱心網友回復:
視頻通常是不能疊加的,因為疊加就得修改視頻檔案的資料。通過是在視頻之上加一個疊加的資訊。
可以使用TPanel來做。
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/32565.html
標籤:VCL組件開發及應用
