How to Open File Dialog in Ada - Code Snippet

-- Task: Open File Dialog
-- Language: Ada

procedure open_file_dialog() is begin
    -- Implementation for Open File Dialog
    -- TODO: Implement core logic here
    -- Step 1: Prepare data
    -- Step 2: Process Open File Dialog
    Put_Line("Done");
end;