掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
FieldByNameのような関数を自作したい (ID:28797)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
自作のバイナリデータにTTableにあるFieldByNameの ようなクラスとメソッドを自作しアクセスしたいのですが、 作り方がよくわかりません。 TMyTbl = class private var fName : array[0..255] of string;//'CUSTID','CUSTNAME','CUSTTEL'等が入る dataS : array[0.255,0..999] of string;//fName毎のデータ。0-999の最大1000行 FDatabaseName : string; FTableName : string; protected public property DatabaseName : string Read FDatabaseName Write FDatabaseName; property TableName : string Read FTableName Write FTableName; function Open; function Close; function FieldByName(fieldName:string):???; end; DatabaseName,tableNameにそれぞれバイナリデータベースのパス、名前設定後 Openで、配列fName,dataSに読み込み、FiledByNameで、引数のfieldNameで 渡した項目名で変数：fNameを調べ、該当するdataSのデータを返してたいのですが。 TTableではAsStringで値を取得(設定)できますが、これはどのようにコーディング すればよいのですか？ var myTbl:TMyTbl; begin myTbl:=TMyTbl.Create; Memo1.Lines.Add(myTbl.FieldByName('CUSTNAME').AsString); Memo1.Lines.Add(myTbl.FieldByName('CUSTNAME').AsString); myTbl.Close; お願い致します。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.