新人，大家帮个忙，定时器图片切换

Question

刚接触delphi
然后老师让做一个图片数字的定时器
这个每秒跳的时候图片怎么换啊？？
等······

Answer 1

知道用timer控件啊，就是具体的语句是什么，怎么让图片可以转换嘛

Answer 2

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls,jpeg;\\记得加上jpegtype
  TForm1 = class(TForm)
    Timer1: TTimer;
    Image1: TImage;
    procedure FormCreate(Sender: TObject);
    procedure Timer1Timer(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation
var
  i:integer;
{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
begin
    i:=0;\\初始为0
end;procedure TForm1.Timer1Timer(Sender: TObject);
begin
   inc(i);
   while i=10 do \\
   i:=0;
   image1.Picture.LoadFromFile('C:\数字\'+inttostr(i)+'.jpg');\\数字图片存在C:\数字下,图片名对应数字，例如：数字1，对应图片名为1.jpg
end;end.

Answer 3

timer的interval属性设置为1000.然后双击timer事件中的ontimer.
就会出现
procedure TForm1.Timer1Timer(Sender: TObject);
begin  
end;
在begin,end之间写代码，比如image1.picture.loadfromfile();之类的。

Answer 4

image1.Picture.LoadFromFile('C:\数字\'+inttostr(i)+'.jpg');\\数字图片存在C:\数字下,图片名对应数字，例如：数字1，对应图片名为1.jpg
这句话有用