if not f_rkdc.ComboBox2.Text  in['>','<','=','<>','>=','<='] then f_rkdc.ComboBox2.Text := '=';—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
             毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样,删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
       

解决方案 »

  1.   

    if not f_rkdc.ComboBox2.Text  in('>','<','=','<>','>=','<=') then f_rkdc.ComboBox2.Text := '=';
      

  2.   

    ['>','<','=','<>','>=','<='] 
    括号的问题
      

  3.   


    if not (f_rkdc.ComboBox2.Text  in('>','<','=','<>','>=','<=')) then f_rkdc.ComboBox2.Text := '=';
      

  4.   

    if not (f_rkdc.ComboBox2.Text  in('>','<','=','<>','>=','<=')) then f_rkdc.ComboBox2.Text := '=';
    千万记住逻辑顺序。
    你那样是not f_rkdc.ComboBox2.text,这肯定错。
      

  5.   

    if not (f_rkdc.ComboBox2.Text in('>','<','=','<>','>=','<=')) then f_rkdc.ComboBox2.Text := '=';
    还是报错:[Error] rkdC.pas(66): ')' expected but ',' found这时光标停在....in('>',与'<'....之间
    ******************************************************
    if not (f_rkdc.ComboBox2.Text  in['>','<','=','<>','>=','<=']) then f_rkdc.ComboBox2.Text := '=';
    也报错:[Error] rkdC.pas(67): Incompatible types: 'Char' and 'String'
    [Error] rkdC.pas(67): Incompatible types: 'TCaption' and 'Char'
    请大家再想想办法吧,谢谢了~
      

  6.   

    我不知道你是怎么想的?
    为什么不
    combobox2.style := csdropdownlist;要是想改变它的项目的话
    Combobox2.ItemIndex := I
    这样就可以了啊;