忍者ブログ

ゆるいSEの小ネタ集

ゆるキャラ好きのITエンジニアが書くTips。 ゆるキャラ命なSEのIT徒然草 https://itmagic.hatenablog.com/

[Delphi]文字列操作

×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。

コメント

ただいまコメントを受けつけておりません。

[Delphi]文字列操作

■主なメソッド
・Pos
  文字列から特定の文字の位置を検索する。
  無い場合は0が返却される。
  例)
    sDate := '2006/08';
    iPos := Pos('/', sDate);  //iPos = 5
 
  例2)
    sDate := '200608';
    iPos := Pos('/', sDate);  //iPos = 0
 
・Insert
  文字列に対し文字列を追加する。
例)文字列aaaaaに対し、3桁目からbbbを挿入する。
  sWk := 'aaaaa'
  Insert(sWk, 'bbb', 3)   //sWk = aabbbaaa
 
・Delete
  文字列の桁数を指定し削除する。
  例1)3桁目から4文字削除
    sWk := 'abcdefg'
    Delete(sWk, 3, 4);  //abg
 
  例2)'/'を探し、削除する
    sDate := '2006/08';
    System.Delete(sDate, Pos('/', sDate), 1);
 
・Copy
文字列の一部を切り出しコピーする。
例1)
strWk := Copy(pQuery.FieldByName('EMP_NO').AsString,1,5);
文字列の1文字目~5文字目を切り出し返却。
 
例2)
strWk := Copy('198.52, 1, Pos('.',ValueStr) - 1))
先頭から'.'が存在する位置の1つ手前まで(=198のみ)を切り出し返却。
 
・Trim
文字列をトリムする。
例)if (Trim(FieldByName('COLUMN1').AsString) = '') then
 
・UpperCase
文字列を大文字変換
  sWk1 := 'abc';
  sWk2 := '';
  sWk2 := UpperCase(sWk);    //ABCと入る
 
 
■その他
・EmptyStr
String型の空文字のこと。
例) sWk := EmptyStr;
※事実上、「''」を入れるのと変わらない。
 
 
■TStringList
文字列のリストを管理するクラス。以下の機能を実装する。
・リストの文字列を並べ替える
・ソートされたリストで文字列の重複を禁じる
・リストの内容の変更に応答する
 
・サンプル
function ~
var
   sl1 : TStringList;
begin
   sl1 := TStringList.Create;    //インスタンスを生成
  ~
   while ~
     sl1.Add('result:' + FieldByName('EMP_NO').AsString);  //データ1行追加
  end;
   sl1.Free;    //開放
end;
PR

コメント

ただいまコメントを受けつけておりません。

プロフィール

HN:
ゆるキャラ命
性別:
非公開

P R