delphi-kretanje auta-timer komponenta
Posted by Ljiljana Stojanovic na 9. novembra 2016.
Zadatak: na formu postaviti timer, image, button(2)komponente/ Obezbediti da se klikom na dugme kreni, auto pokrece, a klikom na dugme stani zaustavlja.
Forma treba da izgleda ovako:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Image1.Left:= Image1.Left-1;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Timer1.Enabled:=true;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Timer1.Enabled:=false;
end;
Postavi komentar