كيف أجعل الرابط يتغيل الى + 1 بعد كل نقره

[DeadC0der]

و عليكم السلام ،
هناك عدة طرق لتحقيق فكرتك ، يمكنك اعلان عن Global Vraibale

PHP كود :

var
  Form1: TForm1;
x:cardinal; 


و من ثم و في حدث OnCreate تعطيه قيمة أولية

PHP كود :

procedure TForm1.FormCreate(Sender: TObject);
begin
 x:=0;
end; 


الآن في حدث OnClick أصف هذا الكود

PHP كود :

procedure TForm1.btn1Click(Sender: TObject);
var str:string;
begin
 Inc(x);
 str:=format('http://127.0.0.1/2009/%0.3d.jpg',[x]);

end; 


و في النهاية ان اكون افدتك و لو بالقليل