daily pastebin goal


a guest Dec 11th, 2018 50 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. procedure TForm1.Label1Click(Sender: TObject);
  2. begin
  3.   Label1.Top:=label1.Top+20;
  4.   Label1.Color:=clGray;
  5.   Label1.Font.Size:=14;
  6.   Label1.Font.Color:=clRed;
  7.   Label1.Caption:='Я учень 8 класу'+chr(13)+'Городницького ОНЗ';
  8. end;
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand