# topmost
if lang<>'' then begin
         Res:=DoExec('SetLanguage',lang);

# DoExec code

Function DoExec(ApplicationName : String ; ApplicationOptions : String) : TAGIResult;
Begin
        DoExec := AgiCmd('EXEC '+ApplicationName+' '+ApplicationOptions);
End;

# Agicmd is in previous pastebin.