graph TD
    Start([開始 InitialLanguage]) --> DetermineForm[判斷 Sender 類型並設定 NowForm]
    DetermineForm --> SetGlobalPath[設定 IISUnit 語言檔案路徑與語系]
    SetGlobalPath --> CreateIni[建立 TMeminifile 讀取 Language.Lng]
    CreateIni --> TryBlock[try: 開始遍歷組件]
    
    subgraph ComponentLoop
        TryBlock --> LoopStart{遍歷 NowForm.Components}
        LoopStart -- TButton --> SetBtnCap[設定 Button.Caption]
        LoopStart -- TBitBtn --> SetBitHint[設定 BitBtn.Hint]
        LoopStart -- TMenuItem --> SetMenuCap[設定 MenuItem.Caption]
        LoopStart -- TCheckBox --> SetCBCap[設定 CheckBox.Caption]
        LoopStart -- TLabel --> SetLblCap[設定 Label.Caption]
        LoopStart -- TListView --> LoopLVCols[遍歷並設定 ListView 欄位標題]
        LoopStart -- TRadioGroup --> LoopRGItems[遍歷並設定 RadioGroup 選項文字]
    end
    
    LoopStart -- 結束 --> FinallyBlock[finally]
    FinallyBlock --> FreeIni[釋放 Ini 物件]
    FreeIni --> End([結束])