[Страдалецъ]

Ну модулем можно назвать любой завершенный блок программы.
В вашем случае отрисовка шашечек такси может быть использована как в вашей программе, так и где-то еще. Это можно назвать модулем.
Сложность в отрисовке?
Ладно, я сегодня добрый, держите:

Код:

procedure TaxiLogo(Canvas: TCanvas; X,Y: Integer);
Const
  Box: TPoint = (X:20;Y:20);
Var
 i: Integer;
begin
 with Canvas
 do begin
    Brush.Color := clYellow;
    Rectangle(X,Y,X+Box.X*7,Y+Box.Y*2);
    Brush.Color := clBlack;
    for i := 0 to 6
    do if i mod 2 = 0
       then Rectangle(X+i*Box.X,Y,X+(i+1)*Box.X,Y+Box.Y)
       else Rectangle(X+i*Box.X,Y+Box.Y,X+(i+1)*Box.X,Y+Box.Y*2);
    end;
end;

Ну и вызов соответственно:

Код:

 TaxiLogo(Canvas, 20, 20);