1樓:匿名使用者
給你個簡單的。這個關建在知道當前是那個表的那個欄位。在每個要排序的header裡寫上這樣的:
px=allt(this.parent.controlsource) &&讀取當前所點列的表和欄位名
sm=at(".",px)
px1=subst(px,1,sm-1) &&當前表名px2=subst(px,sm+1) &&當前欄位名thisform.text1.value=px1 &&這個是顯示當前的表名
thisform.text2.value=px2 &&這個是顯示當前的欄位名 以上是重點
sele &px1 &&轉到表index on &px2 to temp &&排序go top &&到第一個記錄thisform.grid1.refresh &&重新整理當前**
2樓:匿名使用者
首先在表單中新建一個方法,命名為:headerclick寫入如下**:=aevent(asourceobj, 0)
osourceobj = asourceobj[1]
crowname=osourceobj.caption
cgrid='thisform.grid1' &&&&**的名字ogrid=&cgrid
cfilename=ogrid.recordsourceif empty(cfilename) or select(cfilename)=0
return
endifogrid.recordsource=''
select * from (cfilename) into cursor (cfilename+'_tmp')
use in (cfilename+'_tmp')ogrid.recordsource=cfilename
select(cfilename)
goto top
ogrid.setfocus
然後在**的refresh(重新整理方法)裡寫入如下**:cgrid='thisform.'+alltrim(this.name)
cheader='this.column'+alltrim(str(gncount))+'.header1'
oheader=&cheader
oheader.tooltiptext='單擊按本列值重新排序**資料'
bindevent(oheader,"click",thisform,"headerclick")
next
當**裝載資料後,重新整理**(執行方法thisform.grid1.refresh),即可將**中header的click事件設定為自定義方法的**。
當單擊**header時,即執行headerclick自定義方法,將**資料來源表重新排格
vfp表單如何實現根據要求在grid中顯示資料 10
3樓:
select alias()
set filter to thisform.combo1.value$書號
go top
thisform.refresh
4樓:hjhdyc_hc運動
宋人、蔡人、衛人伐載,鄭伯伐取之。其言伐取之何?易也。其易奈何?因其力也。因誰之力?因宋人、蔡人、衛人之力也。
如何將一個Activity設定成視窗的樣式。
第一種方法,在檔案中,可以新建如下的類似dialog的style。第二種方法,在中在需要顯示為視窗的activity中新增如下屬性 android theme style 即可。也可以直接新增對應需要展示為dialog style的activity的android theme屬性為android t...
如何將電腦設定成開機時先執行CD機
重啟的時候 按del鍵 然後找 frist boot 選項 改成cd room 進入bios 有些機器是 f2 有些機器是 del 還有些機器是 f12 在高階選項裡面有第一啟動項.選擇cd rom 就得 開機按f12,然後選擇cd cd rw drive 我剛重灌完,呵呵 開啟電腦後按f2進入bi...
如何列印PDF檔案,如何將印表機設定成PDF列印
在office軟體 中可以很方便地列印檔案,但是其是不支援pdf檔案的,所以必須要用支援開啟pdf檔案的軟體來開啟並且列印。今天我就來說說怎麼列印pdf檔案。工具 原料 pdf檔案 adobe reader 方法 步驟 用一些軟體來開啟pdf檔案,如果是一些比較簡單的並且不穩定的閱讀器,那麼可能沒有...