PCTurk | Aşk Sevgi Resimleri , Mektupları , silkroad , msn avatarlar , komik (Arşiv Ana sayfa) => Delphi

Konu: Label nesnesini saga sola taşıma....

Sayfa: [ 1 ]

sWaGg€r 06.07.2008 21:01:02
Bir label nesnesi. iki button işte bu kadar...


procedure TForm1.Button1Click(Sender: TObject);
begin
label1.Left       :=Label1.Left-10
//Sola Kaydırma
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
label1.Left       :=Label1.Left+10
//Sağa Kaydırma
end;


Sayfa: [ 1 ]