愛無所不在

# enter_query -- 目前的form進入查詢模式 # execute_query -- 執行查詢 # post --存於當下session 還沒存到DB # form_failure,form_fatal,form_success -- 傳回最近一次action是否成功 -------------------------------------------------------------------- #Set_window_property EX.設定window最大化 SET_WINDOW_PROPERTY('windows_name',WINDOW_STATE,MAXSIZE); #set_item_property -- 設定某item某特性(property)的值(value) -- set_item_property('<項目名稱>',<特性名>,<特性值>); -------------------------------- Get ---------------------------------- # get_item_property -- 傳回item中某一特性值 -- get_item_property('<項目名稱>',<特性名稱>); -------------------------------- Go ----------------------------------- #go_block -- 將某資料區塊設定為使用中focus -- go_block('<資料區塊名稱>') #go_form -- 多表單應用程式的切換 -- go_form('<表單模組名>'或<表單代號>); #go_item -- 將某項目設定為focus -- go_item('<項目名稱>'或<項目代碼>); #go_record Ex.到record第51列 go_record(51); ----------------------------- find -------------------------------------- # find_block -- 傳回資料代碼,通常和go_block一起用 -- find_block('<資料區塊名稱>'); # find_item -- 傳回項目名稱,通常和go_item一起用 -- find_item('<項目名稱>'); # find_viiew -- 傳回工作區代碼,會和hide_view 或show_view一起用 -- find_view('<工作區名稱>'); # find_window --傳回視窗代碼,通常和hide_windw 或show_window一起用 -- find_window('<視窗名>'); ------------------------------- message ---------------------------------- # message message ('停一下');pause; 加pause 停一下在run ------------------------------ Hide ------------------------------------- # hide_view -- 隱藏某工作區的顯示 -- hide_view('<工作區名>'或<工作區代碼>); #hide_window -- 隱藏視窗 -- hide_window('<視窗名>'); ------------------------------- Tree ------------------------------- #tree tree五碼 1.狀態Ftree.Node_state 2.級別Ftree.Node_depth 3.值Ftree.Node_label 4.圖標Ftree.Node_icon 5.主鍵Ftree.Node_value #Ftree.Add_tree_Data Ex.加入Tree Ftree.Add_Tree_Data('block_name.tree_name',:System.Tree.Node, Ftree.parent_OFFSET ,Ftree.last_child,Ftree.query_text, 'select x,x,x,x,x from table_name where.... #Ftree.Poplate_Tree EX.啟動Tree Ftree.Poplate_Tree('tree_name'); #Ftree.Delete_Tree_Node EX.刪除Tree的:system.trigger_node(點選的node) Ftree.Delete_Tree_Node('block_name.tree_name',:system.trigger_node); #Ftree.Get_tree_Node_property EX.得到Tree的Value Ftree.Get_Tree_Node_Property ('block_name.tree_name',node,ftree.node_value); #Ftree.Get_Tree_Node_parent EX.得到:system.trigger_node的父Node Ftree.Get_Tree_Node_Parent ('block_name.tree_name',:system.trigger_node); ----------------------------- Show -------------------------------------- #show_alert Ex.使用Alert declare al number; begin #設定Show的message set_alert_property('alr01',alert_message_text,'作業代號重覆'); al:=show_alert('alr01'); if al = alert_button1 then ........ end if end; #show_lov show_lov('lov_name'); ----------------------- Open Close Form ------------------------------- # call_form -- 表單A呼叫表單B,原有A停止工作,等B關閉後,才會回到A -- call_form('<表單模組名稱>',,,, ,); -- hide no_nide (是否隱藏原有表單) -- no_replay do_replay (是否保持原有功能表) -- no_query_only,query_only(是否可增刪修資料) -- no_share_library_data share_library_data (是否共用libary資料) -- 參數列代碼 -- 參數列名 # new_form -- 開新的form並結束原表單 -- new_form('<表單模組名>',,, ,or); -- to_savepoint 資料回到savepoint no_rollback 結束目前表單不回覆資料 full_rollback 回覆目前執行連線中所有的uncommitted -- no_query_only,query_only(是否可增刪修資料) -- no_share_library_data share_library_data (是否共用libary資料) -- 參數列代碼 -- 參數列名 # open_form -- 開新表單,但原來表單仍可同時存在 -- open_form('<表單模組名>',,, ,<or); -- activate no_activate 開啟時是否成為focus的表單 -- session no_session開啟表單是否和原有表單共用資料庫 連線 -- no_share_library_data share_library_data (是否共用libary資料) -- 參數列代碼 -- 參數列名 # close_form -- 關閉表單,如果是關閉目前表單等同於exit_form -- 表單A呼叫B,則B無法關閉A -- close_form('<表單模組名稱>' or <表單代碼>); EX. close_form('formname')不用加.fmx 在when-window-closed trigger中加入這樣X才會生效 begin close_form(:system.current_form); end; # exit_from -- 結束目前的form -- 可選擇是否commit -- exit_form(,); -- ask_commit 結束時詢問是否要commit do_commit 直接commit no_commit 不做commit no_validate 結束form執行,並放棄原有改變 -- to_savepoint 會回到未委付確認(uncommitted)到設定的 回覆點(savepoint) full_rollback 結束form 執行並rollback未commit的資料 no_rollback 結束不rollback