我正在創建一個帶有「搜索」熱鍵的小應用程序,F1到F4來搜索數據庫的不同表格,所以我創建了一個TPageControl來保存搜索字段,並顯示結果,所以我有1 PageControl和4選項卡表,但我試圖把一個if語句將焦點設置在正確的搜索字段,我將它調用TPageControl的OnShow事件,但我收到一條錯誤消息:窗體:TForm不能集中如何調用表單創建的集中
如果我沒有得到它全部錯誤,這是因爲無法找到文本字段,考慮到我在應用程序可以創建內部元素之前顯示頁面因此,如何編輯此代碼或我可以在哪裏使用它來使其工作,只記得我需要用t調用此過程他後來熱門。
我使用設定對焦的過程僅僅是一個簡單的IF有4個條件,我的真實案例:
procedure TForm.searchFocus; begin
if pgcSearches.TabIndex=0 then begin
editFieldNames.SetFocus;
end
else if pgcSearches.TabIndex=1 then begin
editFieldAdresses.SetFocus
end;
end;
你嘗試設置ActiveControl嗎? –
無法通過網絡找到它(至少不是我能理解的),你能舉個例子嗎? – douglascast
ActiveControl:= editFieldNames; –