OnTimer는

procedure(Sender: TObject) of object;

로 선언되어 있습니다. 따라서 해당 캡춰함수를 클래스로 만들어서 사용하셔야 합니다.

이우석 님이 쓰신 글 :
: 폼이 없는 프로그램입니다.
:
: 이벤트 를 연결할수없어요. 도와주세요.
:
: unit uTest;
:
: interface
: .
: .폼이 없습니다.
: .
: procedure testScrCapture(aImage : TImage);
: var  bTimer: TTimer;
:     procedure TimerStart(Sender: TObject);
:     begin
:       ScrCapture(aImage);
:       bTimer.Enabled := false;
:       bTImer.Free;
:       bTimer := nil;
:     end;
:
: begin
:   bTimer := TTimer.Create(nil);
:  ///////////////////////////////////////////////////////////////////////////////////////////////////////////
:   bTImer.OnTimer  := TimerStart;  //여기서 에러 입니다.
:                                                    //E2009 Incompatible Types: 'method pointer and regular procedure'
:   //////////////////////////////////////////////////////////////////////////////////////////////////////////         
:   bTimer.Interval := 1000;
:   bTImer.Enabled := true;
:   while bTimer <> nil do ;
: end;