private void Form1_Paint(object sender, PaintEventArgs e)
{
System.Drawing.SolidBrush myBrush = new System.Drawing.SolidBrush(System.Drawing.Color.Red);
System.Drawing.Graphics formGraphics;
formGraphics = this.CreateGraphics();
formGraphics.FillRectangle(myBrush, new Rectangle(0, 0, 200, 300));
myBrush.Dispose();
formGraphics.Dispose();
}
var a := 1;
var b := 'строка';
var c := TObject.Create;
var f := function: integer begin Result := 123 end; // переменная типа функции
var d := f(); // d - уже будет типа integer