#pas
function _toCode(data:PScData; toType:byte):PScData;
begin
(*cut cut cut cut *)
     data_str:
      case data.getSubType of
       data_int:
        begin
          Result := MakeData('wxString::Format("%d", ', true);
          Result.AddValue(data, true);
          Result.AddValue(MakeData(')', true), true);
        end;
       data_real:
        begin
          Result := MakeData('wxString::Format("%f", ', true);
          Result.AddValue(data, true);
          Result.AddValue(MakeData(')', true), true);
        end;
      end;

#cpp
int res3; 
/************ cut *************/
res3 = (int)((res3 + 1));
listbox1->Append("item-" + wxString::Format("%f", res3));