1樓:匿名使用者
一、設定memo元件的字型
可以新增乙個 fontdialog 元件,用於顯示 字型選擇 對話方塊。
二、編寫選單**
procedure tform1.mnif1click(sender: tobject);
begin
if dlgfont1.execute thenbegin
mmo1.font := dlgfont1.font;
end;
mmo1.scrollbars := ssvertical;
end;
2樓:匿名使用者
窗體上方三個控制項。
雙擊mainmenu1新增乙個選單「字型」。
procedure tform1.n1click(sender: tobject);
begin
fontdialog1.execute ;
memo1.font:=fontdialog1.font ;
end;
procedure tform1.formcreate(sender: tobject);
begin
memo1.lines.loadfromfile('f:\abc.txt');
memo1.scrollbars :=ssvertical;
end;
效果如圖所示。
戴爾筆記本在執行過程中黑屏了
解決辦法如下 1,首先,來檢查電源,看看筆記本電池是否有電,電源插頭是否插好,這只需要看電源指示燈有沒有亮,如果沒有外接電源,先用外接電源插好。有時候靜電會導致筆記本主機板電路出現異常,導致開機接通電源後,螢幕上沒有任何反應。我們可以嘗試把筆記本的電池和電源都撥掉,然後多按幾次筆記本的電源開頭,讓機...
數控工具機在執行程式自動加工過程中應注意哪些事項
數控加工過程中的安全注意事項 1 禁止用手接觸刀尖和鐵屑,鐵屑必須要用鐵鉤子或毛刷來清理。2 禁止用手或其它任何方式接觸正在旋轉的主軸 工件或其它運動部位。3 禁止加工過程中量活 變速,更不能用棉絲擦拭工件 也不能清掃工具機。4 車床運轉中,操作者不得離開崗位,工具機發現異常現象應立即停車。5 經常...
警察在執行過程中粗暴執法致人受傷怎麼辦
申請國家賠償。就是向該警察所在的單位即公安局提起賠賞。如果不行,向法院審判委員會提起賠償。關於警察執法過程中暴力造成的傷害 對於你所述的情況,建議先向公安法制科提出書面的意見,進而維護自己的權益。對於你的問題bai我有以下幾du 點要說 1.警察宗旨zhi是為人民dao服務,警察的性質屬於武裝的版暴...