有一个WordWrap属性,设置后就可以了。

解决方案 »

  1.   

    把memo的Scorllbars属性改成 ssVertical就行了
      

  2.   

    chinaway(溪之) , stamf(stamf)
    ddfa两位老大,不行呀!!
      

  3.   

    opendialog1beign
      if onendialog1.execute then
      begin 
       memo1.loadfromfile(opendialog1.filename);
       for i:= 0 to memo1.lines.count-1 do
       begin
        for J := 1 to length(memo1.lines[i]) do 
         if (copy(memo1.lines[I],J,1) = '#10') or 
            (copy(memo1.lines[I],J,1) = '#13') then
            copy(memo1.lines[I],J,1) := #0;
       end;
      end;
    end;
      

  4.   

    var
     
    TempStrings:TStringList;
    i:integer; TempStrings:=TStringList.Create;
    TempStrings.LoadFromFile('filename');
    for i:=0 to TempStrings.count-1 do
      memo.lines.text:=momo.lines.text+TempStrings[i];这样可以去掉所有的换行要自动换行还是设置Wordwrap为True就可以了