On Fri, 03 Feb 2006 14:36:01 +0100
"Jouke Rensma" <[EMAIL PROTECTED]> wrote:

>[...]
> >> Where I'm stuck right now is two things:
> >>  - I need the check the main program code, toe see if the "{$R 
> >> <project>.rex}" 
> > 
> > Do you mean {$R *.res} ?
> 
> Yes, I mean *.res. Sorry for my typos. Maybe I should read back what I
> typed  before hitting the send button??? :-) 

I added FindResourceDirective and AddResourceDirective.
For example:

  if not
CodeToolBoss.FindResourceDirective(CodeBuf,1,1,NewCode,NewX,NewY,NewTopLine
,'*.res')
  then begin
    // $R *.res must be added
    if not CodeToolBoss.AddResourceDirective(CodeBuf,'*.res') then 
      MessageDlg(...tell user about failure...)
    else
      ; // success
  end;


Mattias

_________________________________________________________________
     To unsubscribe: mail [EMAIL PROTECTED] with
                "unsubscribe" as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives

Reply via email to