StringReplace 如何使用

Alice

1、平台与Delphi是有些不同，参考如下：

procedure TMainForm.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  if business.System.TShiftStateEnum.ssLeft in Shift then
    Dialogs.ShowMessage('Left');
end;

Delphi中所有的此种类型TXX = Set of (XX1, XX2, XX3)的定义在平台上都首先定义一个TXXEnum的类型(XX1, XX2, XX3)，然后定义TXX=set of TXXEnum

如上面提出的ssLeft
在Delphi 中的定义：
  TShiftState = set of (ssShift, ssAlt, ssCtrl,
    ssLeft, ssRight, ssMiddle, ssDouble);

在Business平台中定义为
  TShiftStateEnum = (ssShift, ssAlt, ssCtrl,
    ssLeft, ssRight, ssMiddle, ssDouble);
  TShiftState = set of TShiftStateEnum;


2、另外，rfReplaceAll，参考如下：
SysUtils.StringReplace('ABCD','tb_XJB.','',[TReplaceFlagsenum.rfReplaceAll]);