Bài 09 - sử dụng control I giới thiệu • Các đối tượng điều khiển (Control) sử dụng việc thiết kế giao diện Form, Report, Label (Trong xét đến Control dùng FORM) Ví dụ giao diện sau thiết kế từ FORM control Hình • Mỗi loại đối tượng thường thiết kế cho mục đích định Ví dụ đối tượng Label (nhãn) dùng để hiển thị thích, đối tượng TextBox dùng phép nhập liệu, đối tượng Command Button để thể nút lệnh Tuy nhiên người dùng sử dụng với mục đích khác • Các Control xác định qua Properties (thuộc tính), Methods (Phương thức) Events (sự kiện - tương tự FORM) • Thanh công cụ Form Controls: Khi mở Form chế độ thiết kế (Form Designer), Visual Foxpro hiển thị công cụ Form Controls hình sau: Có thể hiển thị/ẩn Form Control cách menu View chọn Form Control Toolbar • Đưa Control vào Form: Từ công cụ Form Controls “nhấp” đối tượng cần dùng “thả” vào Form Ví dụ II Các đối tượng thường dùng Label: • Sử dụng cho: hiển thị nhãn, thích, ví dụ ô text sau label Khóa, Lớp, Học kỳ, Năm học Hình dùng để nhập khóa, lớp, học kỳ năm học • Các Properties thường dùng: 1) Alignment: Canh lề phần text hiển thị label Thuộc tính nhận giá trị: (1) - Left Canh trái, giá trị mặc định; (2) 1-Right Canh phải; (3) - Center canh 2) Autosize: Tự động thay đổi kích thước phù hợp cho việc hiển thị thuộc tính Caption 3) BackColor: Đặt mầu Label Trong thiết kế dùng hộp mầu để chọn chạy chương trình sử dụng hàm RBG() để xác định mầu 4) BackStyle: Thiết lập tính chất Thuộc tính nhận giá trị: (1) - Transparent xác định tính chất suốt (có thể nhìn thấy đối tượng “phía sau”); (2) - Opaque không cho quan sát đối tượng phía sau 5) BorderStyle: Thiết kập thuộc tính biên đối tượng Thuộc tính nhận giá trị: (none) - Không có đường biên; (Fixed single) - Đường biên đơn 6) Caption: Text hiển thị nhãn, thích Thuộc tính nhận chuỗi text 7) FontName: Đặt Font chữ 8) ForeColor: Đặt mầu chữ Trong thiết kế dùng hộp mầu để chọn chạy chương trình sử dụng hàm RBG() để xác định 9) Height: Chiều cao 10)Left: Vị trí cạnh trái 11)Name: Tên đối tượng (dùng để sử dụng chương trình) 12)Top: Vị trí cạnh 13)Visible: Thiết lập tính chất Hiện/ẩn Thuộc tính nhận giá trị: (1) T Hiện ; (2) F - ẩn 14)Width: Độ rộng label • Label có nhiều Methods Events, nhiên mục đích đối tượng hiển thị đoạn text nên phần không giới thiệu methods events TextBox, EditBox • Sử dụng cho: Nhập dòng text, số, ví dụ nhãn Khóa, Lớp, Học kỳ, Năm học Hình dùng làm tiêu đề cho ô liệu bên cạnh • Các Properties thường dùng: 1) Alignment: Xem phần II.1 2) BackColor: Xem phần II.1 3) BackStyle: Xem phần II.1 4) BorderColor: Xem phần II.1 5) BorderStyle: Xem phần II.1 6) ControlSource: Cho phép “gắn kết” (bound) textbox với trường biến (thông thường với trường) Việc “Gắn kết” hiểu text textbox thay đổi trường biến “gắn kết” với thay đổi theo Ví dụ, thêm textbox vào form đặt thuộc tính controlSource=”Hososv.hoten” ->Run Form 7) DisabledBackColor: Mầu textbox thuộc tính Enable=.F 8) DisabledForeColor: Mầu text thuộc tính Enable=.F 9) Enabled: Cho phép có hiệu lực hay vô hiệu khả đáp ứng kiện textbox Thuộc tính nhận giá trị: T - có hiệu lực; F - Vô hiệu lực 10)FontName: Xem phần II.1 11)ForeColor: Xem phần II.1 12)Format: Định dạng liệu hiển thị Visual Foxpro qui định kí hiệu sử dụng cho Format textbox (tham khảo help Visual Foxpro (Microsoft Visual Foxpro 9.0/Reference/Language Reference/Properties/ Format Property) Ví dụ đặt Format !A (! - Hiển thị chữ hoa, A - Chỉ nhập ký tự) 13)Height: Xem phần II.1 14)InputMask: Định dạng liệu nhập Visual Foxpro qui định kí hiệu sử dụng cho InputMask textbox (tham khảo help Visual Foxpro (Microsoft Visual Foxpro 9.0/Reference/Language Reference/Properties/ InputMask Property) Ví dụ đặt InputMask ### (# - nhập chữ số) cho phép nhập chữ số 15)Left: Xem phần II.1 16)MaxLength: Số ký tự tối đa nhập (nếu MaxLength=0 số ký tự bất kỳ, giá trị mặc định) 17)SelectOnEntry: Thiết lập chế độ đánh dấu text đối tượng nhận quyền điều khiển Thuộc tính nhận giá trị: T - Cho phép chế độ đánh dấu; F Không cho phép 18)TabIndex: Thứ tự theo Index đối tượng (khi sử dụng phím Tab trỏ di chuyển theo thứ tự Index từ thấp đến cao) 19)Top: Xem phần II.1 20)Value: Giá trị xâu text hiển thị đối tượng 21)Visible: Xem phần II.1 22)Width: Xem phần II.1 • Các Methods Event thường dùng: 1) Refresh (method): “Làm tươi” lại liệu hiển thị textbox Ví dụ, đặt thuộc tính ControlSource = text1 (text1 biến), sau gán cho text1 =”Visual Foxpro”, cần thực Refresh để làm tươi lại liệu Text 2) SetFocus (method): Đưa trỏ đến đối tượng 3) Valid (Event): Sự kiện sảy trước chuyển quyền điều khiển tới đối tượng khác Vì lý nên kiện thường dùng để kiểm tra tính hợp lệ liệu, không hợp lệ yêu cầu người sử dụng nhập lại Ví dụ 1: Trong hình 1, xét ô text học kỳ Ta có học kỳ nhận giá trị 2, để đảm bảo yêu cầu viết đoạn lệnh đáp ứng kiện valid để kiểm Giá thiết textbox thiết lập thuộc tính Name = hocky Maxlength=1 kiện hocky.valid viết sau: hk=this.value IF !hk$"1;2" then WAIT WINDOW "Gia tri khong dung! Hoc ky = hoac 2" NOWAIT RETURN ENDIF Ví dụ 2: Trong hình 1, xét ô text khóa Ta thấy khóa nhập vào phải nằm DMKHOA có nghĩa -> Viết kiện valid để kiểm tra tính hợp lệ ô text khóa Giá thiết textbox thiết lập thuộc tính Name = Khoa Maxlength=10 kiện Khoa.valid viết sau: khoahoc=this.Value SELECT dmkhoa LOCATE FOR (ma=khoahoc) IF FOUND() THEN thisform.lblTenKhoa.Caption=dmkhoa.ten ELSE IF !EMPTY(khoahoc) THEN WAIT WINDOW "Ma khoa khong dung!!" NOWAIT RETURN ELSE thisform.lblTenKhoa.Caption="" ENDIF ENDIF • Đối tượng EditBox tương đối giống TextBox (khác biệt chủ yếu cho phép soạn text nhiều dòng) bạn tự tìm hiểu thêm Command Button • Sử dụng cho: Tạo nút lệnh Ví dụ nút lệnh Tạo BC, To Excel, Xem in hình • Các Properties thường dùng: Trong phần giới thiệu số thuộc tính khác so với thuộc tính giới thiệu đối tượng 1) Caption: Text hiển thị tên (khác với name) nút lệnh 2) FontName: Font chữ cho caption 3) Picture: Cho phép đưa ảnh vào nút lệnh 4) ToolTipText: Đặt dòng text (tooltip) đưa trỏ tới nút lệnh • Các Methods Events thường dùng: 1) Click (Event): Sự kiện sảy người sử dụng click chuột trái vào nút lệnh (nút lệnh thiết kế để đáp ứng kiện này) Ví dụ 1: Thêm vào form nút lệnh “Thoát” để đóng form, thiết lập thuộc tính: Caption=Thoát Name=cmdThoat Khi dự kiện cmdThoat.Click viết sau: IF MESSAGEBOX("Dong form lai?",4+32)=6 THEN thisform.Release ENDIF Ví dụ 2: Tạo form DMKHOA cho phép cập nhật danh mục khóa Thêm vào Form nút lệnh “Đầu”, “Trước”, “Sau” “Cuối” để di chuyển trỏ ghi bảng DMKHOA ghi đầu, ghi trước, ghi tiếp ghi cuối Lần lượt đặt tên cho nút lệnh cmdDau, cmdTruoc, cmdSau cmdCuoi, láy ví dụ Sửa lại chức nút lệnh cho chuyển đến ghi đầu nút lệnh “Đầu”, “Trước” disable, chuyển đến ghi cuối nút lệnh “Sau”, “Cuối” disable OptionGroup Box • Sử dụng cho: Lựa chọn nhiều khả • Các Properties thường dùng: 1) AutoSize: Tự động thay đổi kích thước đối tượng cho phù hợp (phần thiết kế) Thuộc tính nhận giá trị T F 2) ButtonCount:Số tùy chọn 3) Value: Giá tị trả option, giá trị số thứ tự mục chọn Khi thiết kế, thay đổi số thuộc tính khác OptionGroup cách nhấp chuột phải vào đối tượng, tiếp đến chon Builder Vì dạng container nên để thay đổi thuộc tính đối tượng cách: nhấp chuột phải vào đối tượng, tiếp đến chọn Edit • Các Methods Events thường dùng: Không có methods, event đặt biệt nên không giới thiệu Ví dụ: CheckBox • Sử dụng cho: Lựa chọn khả • Các Properties thường dùng: 1) Caption: Thể phần text đối tượng 2) Value: Checked - Giá trị T.; Unchecked - Giá trị F • Các Methods Events thường dùng: 1) Click (Event): Sự kiện sảy người sử dụng click chuột trái vào check box Ví dụ: Giả sử dùng check box để hiển thị thông tin giới tính với qui ước checked Nam, Unchecked nữ Khi kiện click viết sau: IF this.Value THEN this.Caption="Nam" ELSE this.Caption="N÷" ENDIF Combo Box List Box Grid Image 10 Timer 11 Page Frame Bài tậP ... Form Control cách menu View chọn Form Control Toolbar • Đưa Control vào Form: Từ công cụ Form Controls “nhấp” đối tượng cần dùng “thả” vào Form Ví dụ II Các đối tượng thường dùng Label: • Sử dụng. .. dùng hộp mầu để chọn chạy chương trình sử dụng hàm RBG() để xác định 9) Height: Chiều cao 10)Left: Vị trí cạnh trái 11)Name: Tên đối tượng (dùng để sử dụng chương trình) 12)Top: Vị trí cạnh 13)Visible:... ví dụ Sửa lại chức nút lệnh cho chuyển đến ghi đầu nút lệnh “Đầu”, “Trước” disable, chuyển đến ghi cuối nút lệnh “Sau”, “Cuối” disable OptionGroup Box • Sử dụng cho: Lựa chọn nhiều khả • Các Properties