The only way that I know to handle this situation is to make the
two methods far procedures that receive a pointer to the object, or
receive the object as a var parameter.  Shortcoming is that they
can only access public variable and methods.

If you know which method is needed before the object is initialized,
you could make the method virtual and declare two separate types.
Then simply construct the proper type.

Any other ideas?

I'm having a problem getting the address of procedure that is within an
object.  Here is an example of what I'd like to do:

type foo:object
          Proc:procedure;
          procedure ActualProc1;
          procedure ActualProc2;
         end;

procedure foo.ActualProc1;
begin
 Proc:=ActualProc2;
end;

procedure foo.ActualProc2;
begin
 Proc:=ActualProc1;
end;

BP says that it is an Invalid procedure or function reference.  Everything is
compiled far, so that is not the problem.  Does anyone know of a way to get
around this, or to get the address of a method in an object?

Note:  if what you want is simply parameterizing some procedure with
different operation depending on the type of an object, you should
instead make this operation a virtual method and simply call the
virtual method for that object.