快速报告表达式matter获取字符串的一部分并替换它

本文关键字：一部分替换字符串获取报告报告表表达式 matter | 更新日期: 2023-09-27 18:00:07

im在快速报告4中寻找一个代码，该代码采用字符串的第一个字母表2，如果是10，则为我写红色，如果是11，则为蓝色

的另一个例子

｛如果以"ab.."开头，则写"RED"如果以"dc…"开头，则写入"Blue"｝

类似的东西？

procedure Page1OnBeforePrint(Sender: TfrxComponent);
begin
  if Copy(Memo2.Text,1,2) = 'ab' then
  begin
    Memo2.Text:= 'Red';                                                        
    Memo2.Font.Color:= clRed;  
  end;  
  if Copy(Memo6.Text,1,2) = 'dc' then
  begin
    Memo6.Text:= 'Blue';                                                                      
    Memo6.Font.Color:= clBlue;
  end;        
end;

试试这个：

Var Str : String;
begin
Str := 'Your String';
Str := Copy (Str , 1 , 2 );
If Str='Yo' then
 ShowMessage('RED')
  else
      If Str='You' then
         ShowMessage('BLUE');