Assuming you've read already those 2 posts above, you can easily find the examples using API lang::user::*
You can add whether a link or a form to pass the desired locale, then run the chunk of code bellow.
if {$locale ne ""} {
lang::user::set_locale $locale
ad_returnredirect [ad_conn url]
ad_script_abort
}
Best wishes,
Iuri