テキストボックスの各種操作

ここでは下記の処理を教えます。

①文字入力を10文字（半角）までに制限する処理
②テキストボックスの内容を元に戻す（UNDO機能）処理
③選択されている文字列を置換する（選択されていない場合はカーソル位置に挿入する）処理

■必要なコンポーネント

■使用するAPI関数

■①文字入力を制限する処理
　//文字入力を10文字（半角）までにする
　SendMessage(Edit1.Handle, EM_LIMITTTEXT, 10, 0);
　SendMessage(Memo1.Handle, EM_LIMITTTEXT, 10, 0);

■②テキストボックスの内容を元に戻す（UNDO機能）処理
　//テキストボックスの内容を元に戻す（UNDO機能）
　SendMessage(Edit1.Handle, EM_UNDO, 0, 0) ;
　SendMessage(Memo1.Handle, EM_UNDO, 0, 0) ;

■③選択されている文字列を置換する処理
　//選択されている文字列を置換する（選択されていない場合はカーソル位置に挿入する）
　SendMessage(Edit1.Handle, EM_REPLACESEL, 0, Longint(PChar('置換サンプル')));
　SendMessage(Memo1.Handle, EM_REPLACESEL, 0, Longint(PCha('置換サンプル')));




Win32APIのページへ



ホーム PV ランキング