Kółko i krzyżyk, Delphi 7, praca domowa

Question

Witam mam zadaną pracę domową z lekcji programowania ze szkoły, temat brzmi "stwórz program" postanowiłem zrobić minigrę Kółko i Krzyżyk, inspirowałem się filmem Pana Zelenta
'https://www.youtube.com/watch?v=vd0zDG4vwOw&t=376s' .
W filmie jest używany C++ Builder, ja natomiast korzystam z Delphi 7. Zatrzymałem się w połowie materiału filmowego, w momencie używania procedury? Char. Proszę o pomoc w dokończeniu, nie znam większości komend. 
Tyle udało mi się wykonać:














 

 

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls, ExtDlgs;

type
  TForm1 = class(TForm)
    Image1: TImage;
    Image2: TImage;
    Image3: TImage;
    Image4: TImage;
    Image5: TImage;
    Image6: TImage;
    Image7: TImage;
    Image8: TImage;
    Image9: TImage;
    Label1: TLabel;
    tura: TImage;
    Button1: TButton;
    OpenDialog1: TOpenDialog;
    OpenPictureDialog1: TOpenPictureDialog;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
Char image1,image2,image3,image4,image5,image6,image7,image8,image9;
begin
image1:='n' image2:='n' :image3:='n':
image4:='n' :image5:='n' :image6:='n':
image7:='n' :image8:='n' :image9:='n':
kto='o';
end;

end.