delphi里面的image控件,由于画上去的东东大于Image宽度,所以想让它从下到上的显示,无聊的回答不如不答,高手赐教

解决方案 »

  1.   

    使用TScrollBox,里面放TImage,载入图片后加几句:  Image1.Top := 0;
      Image1.Left := 0;
      Image1.Width := Image1.Picture.Width;
      Image1.Height := Image1.Picture.Height;
      

  2.   

    同意用TScrollBox装入TImage,其中TScrollBox相当于一个带滚动条的View。
      

  3.   

    我开始是通过在EDIT输入汉字,通过调用字库,在IMAGE里面画了五十个字(IMAGE的大小设置成五十个字大小),现在想在里面显示多点字,然后通过从下到上来循环显示??是不是画不了了???
      

  4.   

    在form中放入一个Image,以及一个Memo,在memo控件下输入如下代码
    procedure TForm1.Memo1Change(Sender: TObject);
    var i:integer;
    begin
    image1.Canvas.Font.Size:= 12;
    for   i:=0   to   memo1.Lines.Count-1   do
    image1.Canvas.TextOut(1,i*image1.Canvas.TextHeight(memo1.Lines[i]),memo1.lines[i]);
    end;
    image中会显示在memo输入的内容,由于image大小的原因,不可能静态的显示memo中的所有内容,怎么让image的内容从下到上滚动的显示出来呢?
    送上全部分数