ActiveX Controls Guide (v11)

Position (ActiveX プロパティ)

適用対象

VAccess

説明

VAccess コントロールに関連付けられた Pervasive PSQL テーブルの現在のレコードの物理位置の値を返します。物理位置を必要とする、後続のメソッドが使用する物理位置を設定します。

備考

このプロパティは設計時には使用できません。

Position プロパティは、Pervasive PSQL ファイルの個別レコードを一意に識別する Long 型整数です。GetDirect メソッドを呼び出す前にこのプロパティを設定して、ファイルのインデックス検索を行わずに、直接このプロパティで識別されるレコードを取得します。

データ ファイルのレコードを取得するときに、このプロパティの値を使って個々のレコードに「ブックマーク」を付けておくことができます。

データ コントロールは、Position プロパティ値が現在値かどうかを追跡します。プロパティ値が現在値でないときにプロパティを読み取ると、コントロールは GetPosition 呼び出しを行って現在の値を返します。コードでこのプロパティ値を設定すると、その値は内部的に現在値とマークされますが、現在のポジショニングの変更は行いません。これは、GetDirect メソッドを呼び出すことによって実行されます。

Dim bookmark As Long 
'多数の重複可能キー エントリの最初のエントリを取得し、 
'レコードにブックマークを付ける 
Customer.IndexNumber = 3 'companyName 
Customer.FieldValue("companyName") = "Consolidated Inc" 
stat = Customer.GetEqual 
bookmark = Customer.Position 
'重複可能レコードの数をカウントする 
While stat = 0 And Customer.FieldValue("companyName") = 
"Consolidated Inc" 
  dups = dups + 1 
  stat = Customer.GetNext 
Wend 
'最初の重複可能レコードのポジショニングを再確立し、ロックする 
Customer.Position = bookmark 
stat = Customer.GetDirect (BTO_SingleNoWait) 

関連項目

影響先:GetDirect

影響元:ExtendedOps、Row、GetDirect、GetEqual、GetFirst、GetGreater、GetGreaterOrEqual、GetLast、GetLess、GetLessOrEqual、GetNext、GetNextExtended、GetPrevious、GetPreviousExtended、StepFirst、StepLast、StepNext、StepNextExtended、StepPrevious、StepPreviousExtended


Port (ActiveX プロパティ)

RefreshLocations (ActiveX プロパティ)