Программа парные картинки

[StR1k3R]

Проблема с программой, запуск проходит но не выполняет своих свойств. Данная программа как игра на развитие внимание. Программу отладил до конца не получается , помогите пожалуйста .
Сама программа :
http://www.rapidshare.ru/1734338

[ArtGrek]

залеи на форум, там не получаеца скачать
а в чем собственно проблема?

[StR1k3R]

http://inf0n.3dn.ru/newGame.rar а так ?

проблема в том , что программа работает не корректно. Запускается , нажимаешь новая игра , и все. парных картинок не выводит. есть похожие игры , но мне для экзамена надо написать свою такую же программу

[ArtGrek]

если проблема просто в прорисовке, то вот, рисует

var
  Form1: TForm1;
  a : Tbitmap;

implementation

{$R *.dfm}

procedure TForm1.n1Click(Sender: TObject);
begin
  a := TBitmap.Create;
  a.Height := 100;  //если не задать размер, то они будут 0, и ты не увидиш изовражения
  a.Width := 100;
  a.LoadFromFile('C:\Documents and Settings\ArtGrek\Мои документы\Downloads\newGame\newGame\pictures.bmp');
  Form1.Canvas.StretchDraw(Rect(0,0, 50, 50), a);
  Form1.Canvas.StretchDraw(Rect(60,0, 110, 50), a);
end;

[StR1k3R]

у меня по прежнему не работает , можешь свою переделанную скинуть ?

[ArtGrek]

путь к фаилу поменял? и что б он был полныи, а не имя фаила

[StR1k3R]

пустые квадратики , путь да прописал

[StR1k3R]

мне надо что то вроде этого сделать http://allforchildren.ru/online/match1.php

[ArtGrek]

вот пробуи

[StR1k3R]

мне надо что то вроде этого сделать http://allforchildren.ru/online/match1.php