我想将DBMEMO中的所有的字付替换成空字付然后在后面加上新字符用什么涵数呀
哪位大虾能告诉我碰到这问题我该在DELHPHI的帮助里怎么找这涵树呀!
告诉方法就给50分

解决方案 »

  1.   

    DBMemo1.Lines.Clear;
    DBMemo1.Lines.add;
      

  2.   

    把DBMEMO所连接的字段内容清空就可以。在编程的窗口中,按CTRl+F1可搜索到对应的帮助。
      

  3.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      i, j, iLength: Integer;
      strTmp: string;
    begin
      for i := 0 to Memo1.Lines.Count - 1 do
      begin
        iLength := Length(Memo1.Lines[i]);
        strTmp := '';
        for j := 0 to iLength - 1 do
          strTmp := strTmp + ' ';
        Memo1.Lines[i] := strTmp;
      end;
    end;
      

  4.   

    var
      i,l:integer;
      s:string;
    begin
      l:=length(dbmemo1.lines.text);
      dbmemo.lines.clear;
      s:='';
      for i:=1 to l
      begin
        s:=' '+s;
      end;
      dbmemo1.lines.add(s);
      dbmemo1.lines.add('你想加入的文字');
    end;