> function StandardBitmap(S:String):tBitmap;
> var
> x: integer;
> begin
> -> if NB_Images.Find( S, x ) then
> Result := TBitmap( NB_Images.Objects[x] )
> else
> Result := nil;
> end;

With the error you are showing above it makes it look like there is
some sort of drastic initialisation problem. That is, if you are
getting an exception against NB_Images then it appears the list is not
created when the function is called - but then the list is supposed to
be created when that unit is loaded, and the unit must be loaded for
the function to be called.

Check your application for peculiar items such as creating components
very early (before the main form). Does the problem go away if your
application does not use your component? Make sure you do a full
rebuild on everything (not just a make) to see if that shows any
difference.

Otherwise I am just about out of ideas. Try out Damians suggestions
and see how you go.

Geoff Worboys
Telesis Computing