Luận án nghiên cứu dao động kết cấu cầu dây văng dưới tác dụng của hoạt tải di động, xét đến độ gồ ghề ngẫu nhiên của mặt cầu

LỜI CÁM ƠN Trong trình thực luận án “Nghiên cứu dao động kết cấu cầu dây văng tác dụng hoạt tải di động, xét đến độ gồ ghề ngẫu nhiên mặt cầu”, tác giả thực nghiên cứu lý thuyết, chế tạo thiết bị thực nghiệm phân tích số liệu thực nghiệm Bộ môn Cầu – Khoa Xây Dựng Cầu Đƣờng Xƣởng chế tạo máy – Khoa Cơ Khí thuộc trƣờng Đại Học Bách Khoa, Đại học Đà Nẵng dƣới hƣớng dẫn tận tình tập thể Thầy giáo hƣớng dẫn; Tác giả xin bày tỏ lòng biết ơn sâu sắc tới PGS.TS Nguyễn Xuân Toản GS.TS Kuriyama Yukihisa tận tình hƣớng dẫn khoa học giúp đỡ tác giả suốt trình thực đề tài luận án; Tác giả xin bày tỏ lòng biết ơn sâu sắc tới GS.TS Kuriyama Yukihisa, GS.TS Naoya Kasai GS.TS Hiroshi Katsuchi hỗ trợ tài c ng nhƣ góp ý khoa học thời gian tác giả học tập nghiên cứu báo cáo kết nghiên cứu luận án Đại học Quốc Gia Yokohama Đại học Tokyo (Nhật Bản); Tác giả xin trân trọng cám ơn Ban giám đốc, Ban đào tạo Sau Đại học – Đại học Đà Nẵng; Ban giám hiệu, Phòng Đào tạo Sau Đại học, Khoa Sƣ Phạm Kỹ Thuật – Trƣờng Đại học Bách Khoa – ĐHĐN giúp đỡ tạo điều kiện cho tác giả hoàn thành luận án; Tác giả xin chân thành cám ơn quý Thầy cô giáo, đồng nghiệp Khoa Xây Dựng Cầu Đƣờng, Xƣởng khí chế tạo máy – Trƣờng Đại học Bách Khoa – Đại học Đà Nẵng; Khoa Cầu Đƣờng – Trƣờng Đại học Kiến Trúc Đà Nẵng; Khoa Đào tạo quốc tế - Trƣờng Đại Học Duy Tân hỗ trợ tác giả công tác chế tạo thiết bị đo đạc thực nghiệm thực thí nghiệm trƣờng để thu thập số liệu thực nghiệm cơng trình cầu thực tế Trân trọng MỤC LỤC M C L C……………………………………………………………… ……………….…………… ……………………….… i M C L C H NH V …………………………………………………………………………………………………….….iv M C L C BẢNG ……………………………………………… ……………………………………………………….….vii DANH M C CÁC KÝ HIỆU VÀ TỪ VIẾT TẮT viii MỞ ĐẦU… CHƢƠNG TỔNG QUAN VỀ NGHIÊN CỨU TƢƠNG TÁC ĐỘNG LỰC HỌC CƠNG TRÌNH CẦU, CẦU D Y V NG DƢỚI TÁC D NG HOẠT TẢI XE DI ĐỘNG 1.1 Mở đầu 1.2 Nghiên cứu tƣơng tác động lực học công trình cầu, cầu dây văng theo hƣớng đo đạc thực nghiệm 1.3 Nghiên cứu tƣơng tác động lực học cơng trình cầu, cầu dây văng theo hƣớng phân tích lý thuyết 1.3.1 Nghiên cứu dao động cơng trình cầu theo mơ hình tiền định 1.3.2 Nghiên cứu dao động cơng trình cầu theo mơ hình ngẫu nhiên, mơ hình xét đến độ gồ ghề ngẫu nhiên mặt cầu 12 1.3.3 Mục tiêu nghiên cứu luận án 15 1.4 Kết luận chƣơng 17 CHƢƠNG MƠ H NH HĨA ĐỘ GỒ GHỀ MẶT CẦU THEO LÝ THUYẾT NGẪU NHI N VÀ PH N T CH THỐNG K CÁC ĐẶC TRƢNG C A QUÁ TR NH NGẪU NHI N… 19 2.1 Mở đầu 19 2.2 Các khái niệm trình ngẫu nhiên 19 2.2.1 Biến ngẫu nhiên đặc trƣng xác suất 19 2.2.2 Quá trình ngẫu nhiên 21 2.2.3 Các đặc trƣng trình ngẫu nhiên 22 2.2.4 Quá trình ngẫu nhiên dừng 25 2.2.5 Quá trình ngẫu nhiên dừng Ergodic 25 2.2.6 Hàm mật độ phổ công suất (PSD) 26 2.2.7 Mô men phổ chiều rộng phổ 27 2.3 Mơ hình hóa độ gồ ghề mặt cầu theo lý thuyết ngẫu nhiên 30 2.3.1 Mô hàm phổ mật độ công suất mặt cầu 30 2.3.2 Mô độ gồ ghề mặt cầu theo lý thuyết ngẫu nhiên 32 i 2.3.3 Xác định hàm phổ mật độ công suất (PSD) mặt cầu miền không gian 33 2.3.4 Chƣơng trình mơ thể ngẫu nhiên độ gồ ghề mặt cầu 35 2.4 Phƣơng pháp mô Monte-Carlo 37 2.4.1 Cơ sở phƣơng pháp mô Monte-Carlo 38 2.4.2 Phƣơng pháp tạo số ngẫu nhiên 39 2.4.3 Phân tích động lực học kết cấu cơng trình theo quan điểm ngẫu nhiên phƣơng pháp mô Monte-Carlo 39 2.5 Phân tích thống kê đặc trƣng trình ngẫu nhiên 40 2.5.1 Xác định đặc trƣng xác suất thống kê thể 41 2.5.2 Xác định đặc trƣng xác suất thống kê tập thể 42 2.5.3 Chƣơng trình phân tích thống kê đặc trƣng trình ngẫu nhiên 42 2.6 Kết luận chƣơng 43 CHƢƠNG XÂY DỰNG CHƢƠNG TR NH PH N T CH DAO ĐỘNG KẾT CẤU CẦU D Y V NG DƢỚI TÁC D NG C A HOẠT TẢI DI ĐỘNG, XÉT ĐẾN ĐỘ MẤP MÔ C A MẶT CẦU BẰNG PHƢƠNG PHÁP MÔ PHỎNG MONTE-CARLO 44 3.1 Mở đầu 44 3.2 Phƣơng trình tƣơng tác động lực học ngẫu nhiên phần tử dầm (CDV) dƣới tác dụng hoạt tải xe di động mặt cầu không phẳng 44 3.2.1 Mô hình tƣơng tác xe phần tử dầm 44 3.2.2 Phƣơng trình tƣơng tác dao động uốn dao động dọc phần tử dầm (CDV) dƣới tác dụng hoạt tải di động mặt cầu không phẳng 47 3.2.3 Rời rạc hóa phƣơng trình tƣơng tác dao động uốn dao động dọc phần tử dầm (CDV) dƣới tác dụng hoạt tải di động mặt cầu có độ gồ ghề ngẫu nhiên theo không gian phƣơng pháp Galerkin 48 3.2.4 Phân tích phƣơng trình tƣơng tác dao động uốn dao động dọc phần tử dầm (CDV) dƣới tác dụng hoạt tải di động mặt cầu có độ gồ ghề ngẫu nhiên theo thời gian phƣơng pháp số 53 3.3 Phƣơng trình vi phân dao động phần tử cáp cầu dây văng 56 3.4 Thuật tốn chƣơng trình mơ Monte Carlo để giải toán tƣơng tác dao động ngẫu nhiên kết cấu CDV hoạt tải xe di động mặt cầu không phẳng 58 3.5 Xây dựng mơ đun phân tích tƣơng tác dao động ngẫu nhiên cầu dây văng hoạt tải xe di động mặt cầu không phẳng phƣơng pháp mô Monte-Carlo 64 3.6 Kết luận chƣơng 66 ii CHƢƠNG THỰC NGHIỆM VÀ PHÂN TÍCH SỐ MƠ H NH TƢƠNG TÁC DAO ĐỘNG KẾT CẤU CẦU D Y V NG DƢỚI TÁC D NG C A HOẠT TẢI DI ĐỘNG, XÉT ĐẾN ĐỘ GỒ GHỀ NGẪU NHIÊN C A MẶT CẦU 67 4.1 Mở đầu 67 4.2 Các thông số kết cấu cầu dây văng Phò Nam 68 4.3 Chế tạo thiết bị thực nghiệm đo độ gồ ghề mặt cầu trƣờng 70 4.3.1 Nguyên l cấu tạo hệ thống xe đo độ gồ ghề mặt cầu 70 4.3.2 Chế tạo xe đo độ gồ ghề mặt cầu xƣởng chế tạo máy Trƣờng Đại học Bách Khoa – Đại học Đà Nẵng 71 4.4 Đo đạc thực tế độ gồ ghề mặt đƣờng cầu dây văng Phò Nam 72 4.5 Mô độ gồ ghề mặt cầu dựa vào kết phân tích hàm phổ mật độ cơng suất mặt cầu (PSD) thể đo đạc thực tế độ gồ ghề mặt cầu trƣờng 76 4.6 Phân tích số mơ hình tƣơng tác động lực học ngẫu nhiên cầu dây văng Phò Nam dƣới tác dụng hoạt tải xe di động mặt cầu không phẳng 78 4.6.1 Sơ đồ rời rạc hóa cầu dây văng Phị Nam 78 4.6.2 Các thông số hoạt tải 78 4.7 Kết phân tích dao động ngẫu nhiên cầu dây văng Phị Nam dƣới tác dụng hoạt tải xe di động mặt cầu không phẳng 79 4.8 Đo đạc thực nghiệm dao động cầu dây văng Phò Nam dƣới tác dụng hoạt tải xe di động 82 4.8.1 Hệ thống thiết bị đo dao động CDV Phò Nam 82 4.8.2 Trình tự thí nghiệm Cầu dây văng Phị Nam 83 4.8.3 Kết đo đạc thực nghiệm 84 4.9 Phân tích hệ số động lực ngẫu nhiên cầu Phò Nam độ mấp mô mặt cầu gây theo phƣơng pháp Monte-Carlo 86 4.10 Đánh giá ảnh hƣởng số lƣợng thể đầu vào đến kết phân tích hệ số động lực CDV Phò Nam theo phƣơng pháp Monte-Carlo 93 4.11 Khảo sát ảnh hƣởng tình trạng mặt cầu đến hệ số động lực cầu dây văng Phò Nam theo phƣơng pháp mô Monte-Carlo 95 4.12 Kết luận chƣơng 104 KẾT LUẬN… 106 KIẾN NGH VỀ CÁC NGHI N CỨU TIẾP THEO 107 DANH M C CÁC CÔNG TR NH KHOA HỌC Đ CÔNG BỐ 108 TÀI LIỆU THAM KHẢO 110 PH L C… PL1 iii MỤC LỤC HÌNH VẼ Hình Cầu Russky-Nga (Lnhịp =1104m) khánh thành vào tháng 07 năm 2012 Hình 1.1 Xác định (1+IM) số tiêu chuẩn thiết kế cầu giới Hình 1.2 Mơ hình phân tích tƣơng tác động lực học ngẫu nhiên kết cấu CDV hoạt tải xe di động mặt cầu mấp mô 16 Hình 2.1 Hàm mật độ tải trọng tác dụng lên dầm 21 Hình 2.2 Các thể khác trình ngẫu nhiên 22 Hình 2.3 Hàm mật độ xác suất x(t=to) với trung bình 23 Hình 2.4 Hàm mật độ phổ cơng suất q trình ngẫu nhiên ồn trắng 28 Hình 2.5 Hai trƣờng hợp đặc biệt trình ngẫu nhiên ồn trắng 29 Hình 2.6 Hàm mật độ phổ cơng suất q trình dải hẹp 29 Hình 2.7 Phổ dải hẹp điển hình trình tƣơng ứng 29 Hình 2.8 Các thể khác độ gồ ghề ngẫu nhiên 34 Hình 2.9 Sơ đồ thuật tốn chƣơng trình mơ thể độ gồ ghề ngẫu nhiên mặt cầu 35 Hình 2.10 Giao diện mơ đun DGGNN khởi tạo thể độ gồ ghề ngẫu nhiên mặt cầu dựa vào hàm mật độ phổ công suất (PSD) 36 Hình 2.11 Một số kết mơ thể ngẫu nhiên độ gồ ghề mặt cầu tƣơng ứng với mặt đƣờng loại C theo ISO 8608:1995 37 Hình 2.12 Kết mơ trƣờng ngẫu nhiên độ gồ ghề mặt cầu tƣơng ứng với mặt đƣờng loại C theo ISO 8608:1995 37 Hình 2.13 Sơ đồ thuật tốn chƣơng trình phân tích đặc trƣng xác suất trình ngẫu nhiên 43 Hình 3.1 Mơ hình tƣơng tác cơng trình cầu xe di động mặt cầu có độ gồ ghề ngẫu nhiên 45 Hình 3.2 Thuật tốn sơ đồ khối chƣơng trình phân tích dao động ngẫu nhiên CDV dƣới tác dụng hoạt tải xe di động mặt cầu không phẳng phƣơng pháp mô Monte-Carlo 60 Hình 3.3 Thuật tốn sơ đồ khối chƣơng trình giải tốn dao động cầu dây văng hoạt tải xe di động mặt cầu không phẳng 62 Hình 3.4 Thuật tốn sơ đồ khối chƣơng trình giải lặp tìm chuyển vị {U ma trận độ cứng [K phần tử cáp 63 Hình 3.5 Chƣơng trình phân tích tĩnh động tƣơng tác cầu-xe (KC05) 64 Hình 3.6 Giao diện mơ đun DGGNN khởi tạo thể độ gồ ghề ngẫu nhiên mặt cầu dựa vào hàm mật độ phổ công suất (PSD) 66 Hình 4.1 Cơng trình cầu dây văng Phị Nam (TP Đà Nẵng) 67 Hình 4.2 Sơ đồ kết cấu cầu dây văng Phị Nam – TPĐN 68 Hình 4.3 Chi tiết mặt cắt ngang dầm chủ cầu Phị Nam 68 Hình 4.4 Chi tiết mặt cắt ngang tháp cầu 68 Hình 4.5 Nguyên l cấu tạo xe đo độ gồ ghề mặt cầu (mặt đƣờng) 71 Hình 4.6 Chế tạo xe đo độ gồ ghề mặt cầu xƣởng chế tạo máy – ĐHBK-ĐHĐN 72 Hình 4.7 Thực nghiệm đo độ gồ ghề mặt cầu cầu dây văng Phò Nam 73 iv Hình 4.8 Kết đo thực nghiệm số chuỗi liệu độ mấp mô (gồ ghề) mặt cầu cầu dây văng Phò Nam (TP-Đà Nẵng) 73 Hình 4.9 Một số hàm phổ mật độ gồ ghề mặt cầu cầu dây văng Phị Nam 74 Hình 4.10 Kết phân tích hàm phổ mật độ gồ ghề mặt cầu cầu dây văng Phò Nam (10 chuỗi liệu đo) 75 Hình 4.11 Kết phân tích hàm phổ mật độ trung bình gồ ghề mặt cầu cầu dây văng Phò Nam 75 Hình 4.12 So sánh hàm phổ mật độ công suất (PSD) độ gồ ghề mặt cầu CDV Phò Nam với hàm PSD phân loại mặt đƣờng theo ISO 8608:1995 75 Hình 4.13 Mơ thể ngẫu nhiên đầu vào độ gồ ghề mặt cầu từ hàm mật độ phổ PSD liệu đo đạc thực nghiệm cầu Phò Nam 77 Hình 4.14 So sánh PSD độ mấp mô mặt cầu từ kết mô kết đo thực nghiệm 77 Hình 4.15 Sơ đồ rời rạc hóa kết cấu cầu dây văng Phị Nam 78 Hình 4.16 Hoạt tải phân tích đo thực nghiệm cầu Phị Nam 79 Hình 4.17 Kết phân tích chuyển vị động chuyển vị tĩnh 1/2 nhịp xe tải hai trục Foton di động mặt cầu gồ ghề ngẫu nhiên , V=10m/s 80 Hình 4.18 Kết phân tích chuyển vị động chuyển vị tĩnh 1/2 nhịp xe tải hai trục Foton di động mặt cầu gồ ghề ngẫu nhiên , V=10m/s 80 Hình 4.19 Kết phân tích chuyển vị động chuyển vị tĩnh 1/5 nhịp xe tải hai trục Foton di động mặt cầu gồ ghề ngẫu nhiên , V=10m/s 80 Hình 4.20 Kết phân tích chuyển vị động chuyển vị tĩnh 1/4 nhịp xe tải hai trục Foton di động mặt cầu gồ ghề ngẫu nhiên , V=10m/s 81 Hình 4.21 Thiết bị đo dao động SDA-830C (Japan) 82 Hình 4.22 Cảm biến đo chuyển vị động CDP-50 (Japan) 83 Hình 4.23 Hệ thống đo dao động CDV Phò Nam 84 Hình 4.24 Chuyển vị vị trí Nút (1/2 nhịp 1) ứng với V=10 km/h 85 Hình 4.25 Chuyển vị vị trí Nút (1/2 nhịp 1) ứng với V=20 km/h 85 Hình 4.26 Chuyển vị vị trí Nút (1/2 nhịp 1) ứng với V=30 km/h 85 Hình 4.27 Chuyển vị vị trí Nút (1/2 nhịp 1) ứng với V=40 km/h 86 Hình 4.28 Phân bố xác suất hệ số động lực nút 87 Hình 4.29 Phân bố xác suất hệ số động lực nút 87 Hình 4.30 Phân bố xác suất hệ số động lực nút 88 Hình 4.31 Phân bố xác suất hệ số động lực nút 88 Hình 4.32 Phân bố xác suất hệ số động lực nút 88 Hình 4.33 Phân bố xác suất hệ số động lực nút 10 89 Hình 4.34 Biểu đồ QQ Plot Nút 89 Hình 4.35 Biểu đồ QQ Plot Nút 10 89 Hình 4.36 Xác xuất tích l y (1+IM) nút CDV Phò Nam 90 Hình 4.37 Xác xuất tích l y (1+IM) nút CDV Phò Nam 90 Hình 4.38 Xác xuất tích l y (1+IM) nút CDV Phò Nam 91 Hình 4.39 Xác xuất tích l y (1+IM) nút CDV Phò Nam 91 Hình 4.40 Xác xuất tích l y (1+IM) nút CDV Phò Nam 91 Hình 4.41 Xác xuất tích l y (1+IM) nút 10 CDV Phò Nam 92 v Hình 4.42 Xác xuất tích l y (1+IM) nút thuộc ½ kết cấu nhịp CDV Phò Nam (Nút 2,3,4,5,7,8,9,10 11) 92 Hình 4.43 Phân bố xác suất Nút 3, số thể đầu vào N=50 94 Hình 4.44 Phân bố xác suất Nút 3, số thể đầu vào N=100 94 Hình 4.45 Phân bố xác suất Nút 3, số thể đầu vào N=300 94 Hình 4.46 Phân bố xác suất Nút 3, số thể đầu vào N=500 95 Hình 4.47 Phân bố xác suất hệ số động lực nút (Mặt đƣờng loại A) 96 Hình 4.48 Phân bố xác suất hệ số động lực nút (Mặt đƣờng loại B) 96 Hình 4.49 Phân bố xác suất hệ số động lực nút (Mặt đƣờng loại C) 96 Hình 4.50 Phân bố xác suất hệ số động lực nút (Mặt đƣờng loại D) 97 Hình 4.51 Phân bố xác suất hệ số động lực nút (Mặt đƣờng loại E) 97 Hình 4.52 Phân bố xác suất hệ số động lực nút (Mặt đƣờng loại A-E) 97 Hình 4.53 Phân bố xác suất hệ số động lực nút (Mặt đƣờng loại A-E) 98 Hình 4.54 Phân bố xác suất hệ số động lực nút (Mặt đƣờng loại A-E) 98 Hình 4.55 Phân bố xác suất hệ số động lực nút (Mặt đƣờng loại A-E) 98 Hình 4.56 Phân bố xác suất hệ số động lực nút (Mặt đƣờng loại A-E) 99 Hình 4.57 Phân bố xác suất hệ số động lực nút 10 (Mặt đƣờng loại A-E) 99 Hình 4.58 Quan hệ kỳ vọng (1+IM) – Độ gồ ghề mặt đƣờng Nút 101 Hình 4.59 Quan hệ kỳ vọng (1+IM) – Độ gồ ghề mặt đƣờng Nút 102 Hình 4.60 Quan hệ kỳ vọng (1+IM) – Độ gồ ghề mặt đƣờng Nút 102 Hình 4.61 Quan hệ kỳ vọng (1+IM) – Độ gồ ghề mặt đƣờng Nút 102 Hình 4.62 Quan hệ kỳ vọng (1+IM) – Độ gồ ghề mặt đƣờng Nút 103 Hình 4.63 Quan hệ kỳ vọng (1+IM) – Độ gồ ghề mặt đƣờng Nút 10 103 vi MỤC LỤC BẢNG Bảng 2.1 Phân loại tình trạng mặt đƣờng theo ISO 8608:1995 34 Bảng 4.1 Các đặc trƣng hình học dầm chủ, tháp cầu 69 Bảng 4.2 Các thông số chiều dài, lực căng dây cáp văng 69 Bảng 4.3 Kết phân tích hệ số động lực số vị trí kết cấu nhịp 81 Bảng 4.4 So sánh kết phân tích lý thuyết đo đạc thực nghiệm Nút 86 Bảng 4.5 Đặc trƣng thống kê (1+IM) CDV Phò Nam 90 Bảng 4.6 Đặc trƣng thống kê ngẫu nhiên (1+IM) nút 93 Bảng 4.7 Các đặc trƣng ngẫu nhiên Hệ số động lực nút ứng với điều kiện mặt cầu khác 99 vii DANH MỤC CÁC KÝ HIỆU VÀ TỪ VIẾT TẮT (1+IM) m1i m2i k1i k2i d1i d2i n F(x) p(x) δ(x) mn=E{xn(t)} μx(t) Dx(t) σx(t) Sxx(ω) Rx(t1,t2) Ω ω r Sr(Ω0) z1i z2i y1i y2i ξ(t) w EJ θ β Fd ρ u(x,t) v(x,t) T h(t) u1,w1,υ1 u2,w2,υ2 M,C,K fe PSD CDV PTHH BTCT NCS Hệ số động lực Khối lƣợng thân xe kể hàng hóa truyền xuống trục xe thứ i Khối lƣợng trục xe thứ i Độ cứng nhíp xe trục xe thứ i Độ cứng lốp xe trục xe thứ i Độ giảm chấn (cản) nhíp xe trục xe thứ i Độ giảm chấn (cản) lốp xe trục xe thứ i Số trục xe hoạt tải Hàm phân bố xác suất đại lƣợng ngẫu nhiên X(t) Hàm mật độ xác suất đại lƣợng ngẫu nhiên X(t) Hàm Delta Dirac Mô men bậc n đại lƣợng ngẫu nhiên X(t) Giá trị trung bình đại lƣợng ngẫu nhiên X(t) Phƣơng sai đại lƣợng ngẫu nhiên X(t) Độ lệch chuẩn đại lƣợng ngẫu nhiên X(t) Hàm mật độ phổ công suất Hàm tự tƣơng quan Tần số khơng gian Tần số vịng Độ gồ ghề mặt cầu Hệ số độ gồ ghề mặt cầu Tọa độ tuyệt đối khối lƣợng m1i theo phƣơng thẳng đứng Tọa độ tuyệt đối khối lƣợng m2i theo phƣơng thẳng đứng Chuyển vị tƣơng đối m1i m2i Chuyển vị tƣơng đối m2i mặt đƣờng Hàm tín hiệu điều khiển logic Chuyển vị theo phƣơng đứng phần tử dầm Độ cứng chống uốn phần tử kết cấu Hệ số ma sát Hệ số ma sát Diện tích mặt cắt ngang phần tử dầm Khối lƣợng riêng kết cấu Chuyển vị dọc trục phần tử Chuyển vị thẳng đứng phần tử cáp Lực căng phần tử cáp Lực căng cáp phát sinh dao động Chuyển vị dọc, chuyển vị đứng, góc xoay nút đầu phẩn tử dầm Chuyển vị dọc, chuyển vị đứng, góc xoay nút cuối phẩn tử dầm Ma trận khối lƣợng, ma trận cản, ma trận độ cứng hệ cầu-xe Véc tơ lực nút quy đổi hệ cầu-xe Power Spectral Density Cầu dây văng Phần tử hữu hạn Bê tông cốt thép Nghiên cứu sinh viii MỞ ĐẦU Kết cấu cầu dây văng (CDV) đƣợc áp dụng phát triển sở hoàn thiện hệ dàn dây Gisclard theo hƣớng tạo hệ bất biến hình gồm dây xiên chịu kéo dầm cứng chịu uốn [9] Từ cầu đầu tiên, cầu Stromsund đƣợc xây dựng Thụy Điển năm 1955, đến kết cấu CDV đƣợc ứng dụng rộng rãi toàn giới đạt đƣợc thành tựu rực rỡ Hiện thống kê đƣợc 1000 cầu dây văng số lƣợng ngày tăng thêm nhanh chóng Các kỷ lục chiều dài nhịp liên tục bị vƣợt qua thời gian ngắn, nhiều cầu trở thành di sản văn hóa, biểu tƣợng kiến trúc, đánh dấu phát triển khoa học kỹ thuật thời đại Cầu Russky – Nga với nhịp 1104m hồn thành năm 2012 cầu dây văng có chiều dài nhịp lớn Trong hội nghị chuyên đề kết cấu CDV giới, CDV đƣợc tiếp tục nhận định xu hƣớng phát triển năm tới Nhiều dự án CDV nhịp 2000m đƣợc nghiên cứu nhƣ cầu qua vịnh Messina (Italia), cầu qua vịnh Storebelt (Đan Mạch) cầu qua eo biển Gibraltar nối liền hai châu lục Âu-Phi Hình Cầu Russky-Nga (Lnhịp =1104m) khánh thành vào tháng 07 năm 2012 Trong thời gian gần đây, với phát triển mạnh mẽ ngành công nghệ vật liệu tạo loại vật liệu có trọng lƣợng riêng ngày giảm cƣờng độ chịu tải ngày tăng cao tạo điều kiện phát triển cho PHỤ LỤC ết phân tích hệ số động lực CDV Phò Nam – mặt cầu loại E Kết phân tích 1+IM) tƣơng ứng với tình trạng mặt đƣờng loại A (ISO 8608:1995) - Sr Ωo) = (2048-8192).10-6 m2/(vòng/m) Thể 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 1.1914 1.2074 1.2056 1.3402 1.2152 1.3159 1.2399 1.1977 1.1503 1.2788 1.2176 1.2293 1.4444 1.1862 1.2308 1.1918 1.3436 1.1706 1.4185 1.2308 1.1659 1.2044 1.3758 1.2740 1.2977 1.3066 1.1953 1.2171 1.1826 1.2544 1.1635 1.3510 1.2970 1.2300 1.2737 1.2768 1.2981 1.3947 1.3134 1.3805 1.3281 1.2911 1.2657 1.2960 1.3039 1.3113 1.3435 1.2772 1.3119 1.2903 1.3978 1.2818 1.3257 1.2919 1.2818 1.2908 1.3162 1.3479 1.3668 1.3736 1.3024 1.3034 1.2713 1.2861 1.2645 1.3306 1.3639 1.3152 Nút 1.3842 1.3867 1.4369 1.5740 1.4571 1.5596 1.4834 1.4220 1.3827 1.4030 1.4288 1.4361 1.4746 1.3911 1.4334 1.4267 1.5929 1.4095 1.4576 1.4024 1.3630 1.4022 1.4357 1.5153 1.5443 1.5546 1.4359 1.4309 1.3846 1.3968 1.3814 1.4334 1.5427 1.4639 PL.14 10 1.1301 1.1297 1.1633 1.1884 1.1618 1.1906 1.1725 1.1593 1.1390 1.1510 1.1651 1.1692 1.2394 1.1381 1.1681 1.1569 1.2077 1.1469 1.2275 1.1426 1.1107 1.1461 1.2039 1.1913 1.1943 1.1953 1.1524 1.1654 1.1320 1.1391 1.1392 1.1864 1.1989 1.1736 1.2817 1.2839 1.3110 1.3526 1.3195 1.3496 1.3273 1.3048 1.2956 1.2970 1.3032 1.3046 1.3251 1.2850 1.3027 1.3087 1.3603 1.3047 1.3171 1.2925 1.2697 1.2904 1.3114 1.3362 1.3458 1.3489 1.3130 1.3047 1.2816 1.2922 1.2868 1.3131 1.3444 1.3196 1.2341 1.2316 1.2634 1.2898 1.2684 1.2882 1.2740 1.2591 1.2525 1.2236 1.2569 1.2571 1.2349 1.2375 1.2549 1.2618 1.2962 1.2585 1.2309 1.2321 1.2353 1.2388 1.2290 1.2808 1.2868 1.2885 1.2639 1.2583 1.2359 1.2251 1.2466 1.2305 1.2865 1.2693 Thể 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 1.2466 1.2387 1.2924 1.2354 1.3696 1.2300 1.2165 1.3632 1.2832 1.1463 1.1987 1.2373 1.2060 1.2599 1.2386 1.1743 1.6779 1.3008 1.1916 1.2871 1.2471 1.2900 1.3449 1.2841 1.4519 1.3519 1.2996 1.2474 1.1877 1.3923 1.3911 1.4688 1.2027 1.3234 1.2140 1.3465 1.3323 1.3934 1.3214 1.3348 1.3275 1.2945 1.3151 1.4154 1.3125 1.3001 1.4091 1.3499 1.2815 1.2878 1.3101 1.2936 1.3390 1.3211 1.2801 1.4048 1.3701 1.2869 1.3614 1.2908 1.3579 1.3994 1.3476 1.3357 1.3194 1.3007 1.3357 1.2841 1.3243 1.4294 1.3435 1.2774 1.3112 1.2846 1.3408 1.3169 1.3193 1.3105 Nút 1.4909 1.4821 1.3996 1.4383 1.6164 1.4390 1.4113 1.5962 1.5060 1.3588 1.4024 1.4174 1.4081 1.5031 1.4738 1.3683 1.6195 1.5329 1.4165 1.5320 1.3828 1.5296 1.5901 1.4592 1.4760 1.4115 1.3912 1.4895 1.4141 1.4395 1.6441 1.4875 1.3836 1.3962 1.3971 1.4366 1.4207 1.4432 1.3954 PL.15 10 1.1724 1.1717 1.1600 1.1706 1.2108 1.1705 1.1537 1.1943 1.1970 1.1137 1.1492 1.1552 1.1531 1.1840 1.1770 1.1147 1.3653 1.1747 1.1567 1.1847 1.1380 1.1989 1.2011 1.1840 1.2460 1.1936 1.1656 1.1689 1.1550 1.2154 1.2271 1.2564 1.1269 1.1787 1.1395 1.1809 1.1780 1.2140 1.1778 1.3297 1.3270 1.2972 1.3045 1.3668 1.3063 1.2943 1.3587 1.3308 1.2779 1.2896 1.2993 1.2922 1.3326 1.3228 1.2703 1.3635 1.3403 1.3033 1.3418 1.2851 1.3405 1.3588 1.3140 1.3220 1.2990 1.2944 1.3289 1.3030 1.3098 1.3758 1.3230 1.2818 1.2953 1.2892 1.3161 1.3079 1.3129 1.2952 1.2752 1.2737 1.2234 1.2562 1.3000 1.2587 1.2422 1.2938 1.2765 1.2404 1.2450 1.2362 1.2466 1.2782 1.2715 1.2338 1.2565 1.2817 1.2580 1.2833 1.2224 1.2837 1.2945 1.2499 1.2326 1.2219 1.2219 1.2744 1.2578 1.2270 1.3071 1.2324 1.2316 1.2211 1.2337 1.2315 1.2282 1.2293 1.2212 Thể 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 1.1358 1.4856 1.1491 1.4210 1.2617 1.1225 1.2572 1.5025 1.2692 1.2159 1.4641 1.4201 1.4863 1.3069 1.5785 1.2536 1.4931 1.3085 1.5770 1.4582 1.4405 1.2531 1.3191 1.1893 1.2804 1.5287 1.4015 1.2705 1.4903 1.2635 1.4492 1.2951 1.2751 1.3356 1.4957 1.3394 1.3036 1.4766 1.4453 1.4911 1.3490 1.3967 1.2904 1.3797 1.3757 1.5491 1.4734 1.3691 1.3276 1.3030 1.3032 1.2930 1.4071 1.4330 Nút 1.3672 1.7417 1.3717 1.6757 1.3832 1.3616 1.4957 1.7378 1.4822 1.4398 1.7173 1.6583 1.7432 1.4488 1.5527 1.3863 1.5062 1.5519 1.8252 1.7075 1.4808 1.4525 1.4026 1.3702 1.3953 1.5286 1.6338 PL.16 10 1.1250 1.2584 1.1342 1.2381 1.1462 1.1271 1.1848 1.2403 1.1894 1.1673 1.2476 1.2185 1.2599 1.1765 1.3082 1.1410 1.2605 1.1880 1.2765 1.2395 1.2309 1.1783 1.1751 1.1156 1.1542 1.2736 1.2053 1.2787 1.4048 1.2858 1.3853 1.2867 1.2889 1.3300 1.4003 1.3220 1.3102 1.3972 1.3784 1.4054 1.3164 1.3515 1.2874 1.3396 1.3473 1.4285 1.3937 1.3322 1.3094 1.2996 1.2910 1.2941 1.3502 1.3693 1.2414 1.3266 1.2460 1.3135 1.2194 1.2479 1.2765 1.3214 1.2696 1.2627 1.3211 1.3071 1.3271 1.2351 1.2476 1.2220 1.2416 1.2866 1.3412 1.3181 1.2385 1.2584 1.2241 1.2477 1.2221 1.2464 1.3008 PHỤ LỤC M nguồn số mơ đun chương trình phân tích tương tác động lực học ngẫu nhiên phương pháp mô Monte-Carlo Unit Phan_dao_dong; Interface Uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,StdCtrls,Grids, MainFrm, ExtCtrls, MapleFunction, GraphicFrm, Maple_funtion, KiemTraHam1; PROCEDURE MaTranMww(Var Mww:MaTran;m,L:real);//m khoi luong phan bo PROCEDURE MaTranMwz6x2(Var Mwz,PtLanXe:MaTran;SPTL:integer;m1,m2,v,t, tz,Lt,Lp:real); PROCEDURE MaTranMwzt(Var Mwz,MSLX,PtLanXe:MaTran;Ltrxe:vector;SoNut, SoTrXe,SoPTLan:integer;giatoc,tph,t,LL:real); PROCEDURE MaTranCww(Var Cww,Kww:MaTran;NoiMS,NgoaiMS,L:real); PROCEDURE MaTranCzz(Var Czz,MSLX:MaTran;Ltrxe:vector;SoTrXe:integer); PROCEDURE MaTranCwzt(Var Cwz,MSLX,PtLanXe:MaTran;Ltrxe:vector;SoNut, SoTrXe,SoPTLan:integer;giatoc,tph,t,LL:real); PROCEDURE MaTranCzwt(Var Czw,MSLX,PtLanXe:MaTran;Ltrxe:vector;SoNut, SoTrXe,SoPTLan:integer;giatoc,tph,t,LL:real); PROCEDURE MaTranKww(Var Kww:MaTran;E,A,Jz,L:real); PROCEDURE MaTranKpw(Var Kpw:MaTran;E,A,u1,u2,L:real); PROCEDURE MaTranKzz(Var Kzz,MSLX:MaTran;Ltrxe:vector;SoTrXe:integer); PROCEDURE MaTranKwzt(Var Kwz,MSLX,PtLanXe:MaTran;Ltrxe:vector;SoNut, SoTrXe,SoPTLan:integer;giatoc,tph,t,LL:real); PROCEDURE MaTranKzwt(Var Kzw,MSLX,PtLanXe:MaTran;Ltrxe:vector;SoNut, SoTrXe,SoPTLan:integer;giatoc,tph,t,LL:real); PROCEDURE MaTranKzwP(Var Kz2w,MSLX,PtLanXe:MaTran;SoNut,SoTrXe, SoPTLan:integer;t,LL:real); PROCEDURE VectorFw6(Var VFw:Vector;qx,qy,L:real); PROCEDURE VectorFwz6(Var Fwz:Vector;PtLanXe:MaTran;SPTL:integer; Gi,gtr,m1,m2,v,t,tz,Lt,Lp:real); PROCEDURE VectorFwz(Var Fwz:vector;MSLX,PtLanXe:MaTran;SoNut,SoTrXe, SoPTLan:integer;gtr,t,LL:real); PROCEDURE VectorFwzt(Var Fwz,Ltrxe:vector;MSLX,PtLanXe:MaTran;SoNut, SoTrXe,SoPTLan:integer;giatoc,gtr,tph,t,LL:real); PROCEDURE VectorFzzt(Var Fzz,Htrxe:Vector;MSLX:MaTran;SoTrXe:integer; giatoc,gtr,Mm,t:real); PROCEDURE VectorUxy(Var Ux,Uy,Ue:VecTor;nPoit:integer;L:real); PROCEDURE ReadDataBase(Var SLN,SLT,SLC,SLX:MaTran;Var SoNut,SoThanh, SoCap,SoTrXe:integer;PathSys:string); PROCEDURE ReadNumber(Var SoNut,SoThanh,SoCap,SoTrXe:integer;PathSys: string); PROCEDURE ReadUxyzRKM(BieuDo,PhanTu,NutTrai,NutPhai,SoNut,SoTrXe: integer;Var VTU6:Vector); PROCEDURE ReadUxyzKKF(BieuDo,PhanTu,NutTrai,NutPhai,SoNut,SoTrXe: integer;Var VTU6:Vector); PROCEDURE Read_GGMC(Var GGMC_Init:TViTriArray); PROCEDURE MainMMCCKK(PathSys:string); PROCEDURE MainKK(PathSys:string); Type BanGhiNut = packed record TT_Nut:string[5]; ToaDoX:string[12]; ToaDoY:string[12]; ToaDoZ:string[12]; PL.17 TaiTrongPX:string[12]; TaiTrongPY:string[12]; TaiTrongPZ:string[12]; TaiTrongMX:string[12]; TaiTrongMY:string[12]; TaiTrongMZ:string[12]; LienKetTX:string[1]; LienKetTY:string[1]; LienKetTZ:string[1]; LienKetMX:string[1]; LienKetMY:string[1]; LienKetMZ:string[1]; KhoiLuong:string[12]; HS_MaSatTr:string[12]; HS_MaSatNg:string[12]; end; BanGhiThanh = packed record PhanTu:string[5]; NutTrai:string[5]; NutPhai:string[5]; MoDunE:string[12]; MoDunG:string[12]; DienTich:string[12]; MMQT_Jx:string[12]; MMQT_Jy:string[12]; MMQT_Jz:string[12]; TTPhanBoqx:string[12]; TTPhanBoqy:string[12]; TTPhanBoqz:string[12]; KhoiLuong:string[12]; HS_MaSatTr:string[12]; HS_MaSatNg:string[12]; PtLanXe:string[12]; end; BanGhiCap = packed record PhanTu:string[5]; NutTrai:string[5]; NutPhai:string[5]; MoDunE:string[12]; MoDunG:string[12]; DienTich:string[12]; MMQT_Jx:string[12]; MMQT_Jy:string[12]; MMQT_Jz:string[12]; TTPhanBoqx:string[12]; TTPhanBoqy:string[12]; TTPhanBoqz:string[12]; KhoiLuong:string[12]; HS_MaSatTr:string[12]; HS_MaSatNg:string[12]; ChiaPT:string[12]; end; BanGhiXe = packed record TrucXe:string[5]; KLechTamG:string[12]; Omega:string[12]; Anpha:string[12]; VanTocV:string[12]; TgXeVaoCau:string[12]; KhoiLuongM1:string[12]; KhoiLuongM2:string[12]; DoCungK1:string[12]; DoCungK2:string[12]; PL.18 GiamChanD1:string[12]; GiamChanD2:string[12]; end; implementation PROCEDURE MaTranMww(Var Mww:MaTran;m,L:real);//m khoi luong phan bo Var Heso:real; Begin Heso:=m*L/420; Mww[1,1]:=140*Heso; Mww[1,2]:=0; Mww[1,3]:=0; Mww[2,1]:=0; Mww[2,2]:=156*Heso; Mww[2,3]:=22*L*Heso; Mww[3,1]:=0; Mww[3,2]:=22*L*Heso; Mww[3,3]:=4*L*L*Heso; Mww[1,4]:=70*Heso; Mww[1,5]:=0; Mww[1,6]:=0; Mww[2,4]:=0; Mww[2,5]:=54*Heso; Mww[2,6]:=-13*L*Heso; Mww[3,4]:=0; Mww[3,5]:=13*L*Heso; Mww[3,6]:=-3*L*L*Heso; Mww[4,1]:=70*Heso; Mww[4,2]:=0; Mww[4,3]:=0; Mww[5,1]:=0; Mww[5,2]:=54*Heso; Mww[5,3]:=13*L*Heso; Mww[6,1]:=0; Mww[6,2]:=-13*L*Heso; Mww[6,3]:=-3*L*L*Heso; Mww[4,4]:=140*Heso; Mww[4,5]:=0; Mww[4,6]:=0; Mww[5,4]:=0; Mww[5,5]:=156*Heso; Mww[5,6]:=-22*L*Heso; Mww[6,4]:=0; Mww[6,5]:=-22*L*Heso; Mww[6,6]:=4*L*L*Heso; End; PROCEDURE MaTranMwz6x2(Var Mwz,PtLanXe:MaTran;SPTL:integer;m1,m2,v,t, tz,Lt,Lp:real); Var i:integer;S,a,L:real; Begin XoaMT(Mwz,6,2); if t>tph then begin if giatoc*(t-tph)+v=Lt) and (S=PtLanXe[i,4] then if Stph then begin if giatoc*(t-tph)+v=0 then if S=PtLanXe[i,4] then if Stph then begin if giatoc*(t-tph)+v=0 then if S=PtLanXe[i,4] then if Stph then begin if giatoc*(t-tph)+v=0 then if S=PtLanXe[i,4] then if S1 then Data_rand_Si:= Data_rand.So+(Data_rand.SnData_rand.So)/(Data_rand.So_mau-1)*(ii-1) else Data_rand_Si:= Data_rand.So; end else Data_rand_Si:= Data_rand.So; GGMC_Init:= Dogogenn(Data_rand_Si,Data_rand.V,Data_rand.T,Data_rand.G); Graphic_Goghematcau(Do_go_ghe_mat_cau,Canvas,GGMC_Init); GGMC_Sub[ii]:= GGMC_Init; end; for i := Low(GGMC_Init) to High(GGMC_Init) begin sKQ := sKQ + Format('%.4f %.10f %.10f', [GGMC_Init[i].Sx, GGMC_Init[i].ExcilonALL, GGMC_Init[i].ExcilonALLV]) + sLineBreak; end; mmKQ.Text := sKQ; end; procedure TDo_go_ghe_mat_cau.Button2Click(Sender: TObject); var i,ii:integer; Filetext:TextFile; FileSL:file of TViTri; FileRand:file of TData_rand; begin // Luu file dang *.txt AssignFile(Filetext,PathSys+'\Dogogenn.txt'); Rewrite(Filetext); try PL.25 for ii:=1 to Data_rand.So_mau begin GGMC_Init:=GGMC_Sub[ii]; for i := Low(GGMC_Init) to High(GGMC_Init) begin Writeln(Filetext,GGMC_Init[i].Sx:10:4,#9,GGMC_Init[i].ExcilonALL:15:10,#9,GGMC_In it[i].ExcilonALLV:15:10); end; end; finally CloseFile(Filetext); end; // Luu file dang *.dat AssignFile(FileSL,PathSys+'\Dogogenn.dat'); Rewrite(FileSL); try for ii:=1 to Data_rand.So_mau begin GGMC_Init:=GGMC_Sub[ii]; for i := Low(GGMC_Init) to High(GGMC_Init) Write(FileSL,GGMC_Init[i]); end; finally CloseFile(FileSL); end; AssignFile(FileRand,PathSys+'\Dogogesys.dat'); Rewrite(FileRand); try Write(FileRand,Data_rand); finally CloseFile(FileRand); end; end; procedure TDo_go_ghe_mat_cau.ScrollBar1Change(Sender: TObject); begin Data_rand.HsZoom:=ScrollBar1.Position; Graphic_Goghematcau(Do_go_ghe_mat_cau,Canvas,GGMC_Init); end; procedure TDo_go_ghe_mat_cau.Button3Click(Sender: TObject); var i:integer; FileSL:file of TViTri;FileRand:file of TData_rand; Hour,Min,Sec,MSec:word;TimeStart,TimeEnd:TDateTime; begin TimeStart:=Time; MainForm.Gauge2.Progress:=10; if Do_go_ghe_mat_cau.CheckBox1.Checked=False then GGMC_Init:=GGMC_Sub[ScrollBar2.Position+1]; // Ghi ma tran GGMC_Init xuong file Dogoge.dat de tinh toan AssignFile(FileSL,PathSys+'\Dogoge.dat'); Rewrite(FileSL); try for i := Low(GGMC_Init) to High(GGMC_Init) Write(FileSL,GGMC_Init[i]); finally CloseFile(FileSL); end; MainMMCCKK(PathSys,False); MainKK(PathSys,False); MainForm.Gauge2.Progress:=50; IM_Fuvt(True,False,''); IM_MQNtFrameElement(True,False,''); IM_MQNtCableElement(True,False,''); AssignFile(FileRand,PathSys+'\Dogogesys.dat'); Rewrite(FileRand); try PL.26 Write(FileRand,Data_rand); finally CloseFile(FileRand); end; TimeEnd:=Time; MainForm.Gauge2.Progress:=100; DecodeTime(TimeEnd-TimeStart, Hour, Min, Sec, MSec); MessageDlg('Máy hoàn thành trình phân tích dao động hệ số động lực 1+IM'+Chr(10)+'Thời gian phân tích tính toán : '+ IntToStr(Hour)+' h : '+IntToStr(Min)+' m : '+IntToStr(Sec)+' s : '+IntToStr(MSec)+' ms', mtInformation , [mbOk], 0); Close; end; procedure TDo_go_ghe_mat_cau.Button4Click(Sender: TObject); var i,ii:integer; FileSL:file of TViTri;FileRand:file of TData_rand; Hour,Min,Sec,MSec:word;TimeStart,TimeEnd:TDateTime; begin if Data_rand.So_mau>1 then begin TimeStart:=Time; MainForm.Gauge2.Progress:=10 div Data_rand.So_mau; GGMC_Init:=GGMC_Sub[1]; // Ghi ma tran GGMC_Init xuong file Dogoge.dat de tinh toan AssignFile(FileSL,PathSys+'\Dogoge.dat'); Rewrite(FileSL); try for i := Low(GGMC_Init) to High(GGMC_Init) Write(FileSL,GGMC_Init[i]); finally CloseFile(FileSL); end; MainMMCCKK(PathSys,False); MainKK(PathSys,False); MainForm.Gauge2.Progress:=50 div Data_rand.So_mau; IM_Fuvt(True,False,'1: '); // True = Tao file moi, False = Khong dung lai IM_MQNtFrameElement(True,False,'1: '); IM_MQNtCableElement(True,False,'1: '); MainForm.Gauge2.Progress:=100 div Data_rand.So_mau; for ii:=2 to Data_rand.So_mau begin GGMC_Init:=GGMC_Sub[ii]; // Ghi ma tran GGMC_Init xuong file Dogoge.dat de tinh toan AssignFile(FileSL,PathSys+'\Dogoge.dat'); Rewrite(FileSL); try for i := Low(GGMC_Init) to High(GGMC_Init) Write(FileSL,GGMC_Init[i]); finally CloseFile(FileSL); end; HesoTTXe:=1+(ii-1)/Data_rand.So_mau; MainMMCCKK(PathSys,False); MainKK(PathSys,False); MainForm.Gauge2.Progress:=(ii*100-50) div Data_rand.So_mau; IM_Fuvt(False,False,IntToStr(ii)+': '); // False = Mo file cu ghi tiep, False = Khong dung lai IM_MQNtFrameElement(False,False,IntToStr(ii)+': '); IM_MQNtCableElement(False,False,IntToStr(ii)+': '); MainForm.Gauge2.Progress:=(ii*100) div Data_rand.So_mau; end; TimeEnd:=Time; DecodeTime(TimeEnd-TimeStart, Hour, Min, Sec, MSec); MessageDlg('Máy hoàn thành trình phân tích dao động hệ số động lực 1+IM'+Chr(10)+'Thời gian phân tích tÝnh to¸n : '+ IntToStr(Hour)+' h : '+IntToStr(Min)+' m : '+IntToStr(Sec)+' s : '+IntToStr(MSec)+' ms', mtInformation , [mbOk], 0); Close; PL.27 end; end; procedure TDo_go_ghe_mat_cau.Button5Click(Sender: TObject); begin Close; end; procedure TDo_go_ghe_mat_cau.So_mauChange(Sender: TObject); var BTG, Code:integer; begin Val(So_mau.Text,BTG,Code); if Code=0 then ScrollBar2.Max:=StrToInt(So_mau.Text)-1; end; procedure TDo_go_ghe_mat_cau.ScrollBar2Change(Sender: TObject); var i,ii:integer; sKQ:string; Data_rand_Si:real; begin Data_rand.Bar2_Position:=ScrollBar2.Position; ii:= ScrollBar2.Position+1; if ii1 then Data_rand_Si:= Data_rand.So+(Data_rand.SnData_rand.So)/(Data_rand.So_mau-1)*(ii-1) else Data_rand_Si:= Data_rand.So; end else Data_rand_Si:= Data_rand.So; Do_go_ghe_mat_cau.Caption:='Mô độ gồ ghề mặt cÇu ['+ IntToStr(ii)+']'; edtS_0.Text:=FloatToStr(Data_rand_Si); GGMC_Init:=GGMC_Sub[ii]; Graphic_Goghematcau(Do_go_ghe_mat_cau,Canvas,GGMC_Init); sKQ := ''; for i := Low(GGMC_Init) to High(GGMC_Init) begin sKQ := sKQ + Format('%.4f %.10f %.10f', [GGMC_Init[i].Sx, GGMC_Init[i].ExcilonALL, GGMC_Init[i].ExcilonALLV]) + sLineBreak; end; mmKQ.Text := sKQ; end; end; function GetLinesCount(sFileName: String):Integer; var oSL:TStringlist; begin oSL:=TStringlist.Create; oSL.LoadFromFile(sFileName); result:=oSL.Count; oSL.Free; end; PL.28 ... sử dụng Nội dung đối tƣợng nghiên cứu luận án dao động ngẫu nhiên kết cấu CDV dƣới tác dụng hoạt tải di động, lực kích động ngẫu nhiên hoạt tải độ gồ ghề ngẫu nhiên mặt cầu gây ra, độ gồ ghề mặt. .. dƣới tác dụng hoạt tải di động mặt cầu có độ gồ ghề ngẫu nhiên 16 *Nội dung nghiên cứu Nghiên cứu mơ hình tƣơng tác động lực học ngẫu nhiên kết cấu CDV dƣới tác dụng hoạt tải xe di động mặt cầu. .. tƣơng tác động lực học ngẫu nhiên kết cấu CDV hoạt tải xe di động mặt cầu mấp mô *Phạm vi nghiên cứu Nghiên cứu dao động mặt phẳng đứng kết cấu CDV (bao gồm hệ dầm cứng, tháp cầu dây cáp văng)