StackOverflow2013

Note that there are some explanatory texts on larger screens.

plurals

POHow can I avoid repeatedly casting to a descendant interface type?
text
Body
copied!<p>I'm making a framework (for internal use only) that has common code among 3 o 4 delphi database CRUD applications..</p> <p>A common object of mi framework is a TContext, </p> <pre><code>TContext = class (IContext) function DB: IDatabase; function CurrentSettings: ISettings; .. end; </code></pre> <p>that is passed to the initialization method of lots of other objects.. example (this will be application code):</p> <pre><code> TCustomer.Initialize(Context: IContext) TProjectList.Initialize(Context: IContext) .. </code></pre> <p>Every application has some specific context functions (that only will be called from application code):</p> <pre><code> IApp1Context = interface (IContext) procedure DoSomethingSpecificToApp1; procedure DoOtherThing; .. end; </code></pre> <p>So when I create a Context, Im creating a IApp1Context, and sending it to the initialization methods.. from the framework code everything is fine, the problem is that from the application code I'm constantly casting from IContext to IApp1Context to access the specific App1 functions.. so all my application code looks like (and its a lot of code like this):</p> <pre><code> (FContext as IApp1Context).DoSomethingSpecificToApp1 (FContext as IApp1Context).DoOtherThing; .. </code></pre> <p>The thing is clearly usable, but doesnt reads well in my opinion. Maybe I'm exaggerating; is there is a clever design technique for this situation that I'm not aware of?</p>

Querying!

Guidance

An individual column

Larger individual text columns get their own page to allow for proper reading.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload