Renk-boyut-font-font biçimi değiştirme

4 Edit ekleyip,1.Editin rengini,2.Editin boyutunu,3.Editin fontunu,4.Editini font biçimini değiştiren programın kodu:

Edit1 kodu;

procedure TForm1.Edit1Change(Sender: TObject);

begin

edit1.Font.Color:=clGreen;

end;

Edit2.kodu;

procedure TForm1.Edit2Change(Sender: TObject);

begin

edit2.Font.Size:=15;

end;

Edit3 kodu;

procedure TForm1.Edit3Change(Sender: TObject);

begin

edit3.Font.Name:='courier';

end;

Edit4 kodu;

procedure TForm1.Edit4Change(Sender: TObject);

begin

edit4.Font.Style:=[fsbold,fsitalic];

end;