intTypePromotion=1
zunia.vn Tuyển sinh 2024 dành cho Gen-Z zunia.vn zunia.vn
ADSENSE

Làm quen VB-6-6-Bai 04-Do hoa

Chia sẻ: Son Cung | Ngày: | Loại File: DOC | Số trang:4

193
lượt xem
73
download
 
  Download Vui lòng tải xuống để xem tài liệu đầy đủ

Tham khảo tài liệu 'làm quen vb-6-6-bai 04-do hoa', công nghệ thông tin, kỹ thuật lập trình phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả

Chủ đề:
Lưu

Nội dung Text: Làm quen VB-6-6-Bai 04-Do hoa

  1. Bài 4: Ðồ họa: PictureBox, Image, Shape và Line controls I.   Giới Thiệu   :     Ðồ họa (Graphics)đóng vai trò khá quan trọng trong các ứng dụng chạy trên  Window. Cho dù ứng dụng đó hay cỡ nào nếu giao diện đồ họa (Graphical User  Interface) không "bắt mắt" thì cűng khó khuyến khích người ta sử dụng. Visual Basic  cho phép chúng ta tạo ra các hình ảnh bằng 2 cách: • Sử dụng các graphics controls. Ðây là những hình(shapes) mà ta có thể đặt lên  form trong lúc design như các controls khác. • Sử dụng các Graphics Methods để vẽ hình khi ứng dụng đang chạy (on the fly).      Trong bài này chúng ta chủ yếu tập trung vào các graphics controls như PictureBox  , Image  , Line  và Shape  controls  và một số graphics methods thông  dụng.     PictureBox và Image controls trong Visual Basic được dùng để hiển thị (display)  hình ảnh. Cả hai đều có property quan trọng là Picture dùng để xác định image file  nào sẽ được hiển thị. Khi double­click vào property Picture trên Properties window,  một Load Picture window sẽ xuất hiện cho phép chúng ta chọn image file (thuộc một  trong các formats sau: *.BMP, *.WMF, *.GIF, *.JPG, *.ICO). Chúng ta hãy thử tìm hiểu  sự khác biệt giữa hai controls. Image control: Là một lightweight (nhẹ) control (một số lightweight control khác là  Line, Shape và Label control). Một lightweight control cần ít system resource (tài  nguyên của hệ thống thí dụ như thời gian và bộ nhớ) hơn các controls khác(như  PictureBox, Command Button control...). Ta không thể đặt Image control lên trên một  control khác trừ khi đặt lên một container control (như picturebox, frame). Ngoài ra  control này không thể nhận được focus lúc run time. PictureBox control l: có nhiều chức năng hơn Image control. Nó có thể được đặt bất  kỳ nơi nào. Ngoài ra nó còn là một container control nghĩa là chúng ta có thể đặt các  control khác nhau vào bên trong PictureBox. II.   Thực Hành:       Mở một Project mới , đặt một PictureBox control lên form1. Sau đó đặt một Image  control lên trên picturebox1. Double click vào property Picture của image1. Một  window sẽ hiện ra cho phép chúng ta chọn một image file. (Nếu Visual Basic được 
  2. install đầy đủ, quý vị có thể tìm các Image files trong c:\ Microsoft Visual   Studio\Common\Graphics\.). Giả sử chúng ta chọn hình     như hình1. Sau đó  chúng ta có thể tùy ý vẽ các control như Shape, Line control lên trên form hoặc  PictureBox. Chẳng hạn trong bài này để vẽ một hình Oval như hình1 chúng ta click  vào Shape control, vẽ một hình chữ nhật lên PictureBox. Chọn property cho  Shape1như bảng sau: Property Value Shape 2-Oval BackStyle 1-Opaque BackColor &H00FF0000&(Blue) Shape1 Properties. Hình 1.     Như vậy nếu muốn vẽ các hình căn bản như đường thẳng, hình tròn, oval, chữ nhật  v.v chúng ta có thể dùng Line và Shape control.Ðồng thời có thể thay đổi properties  để có được hình như ý. Còn nếu muốn load một hình có sẳn thì dùng Image hoặc  PictureBox control.     Bây giờ chúng ta hãy thử thay đổi không khí bằng cách "play around" với method  PaintPicture của PictureBox. Ðánh vào những dòng sau: Dim dragging As Boolean Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) dragging = True End Sub Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As
  3. Single) If dragging Then Picture1.PaintPicture Image1, X, Y End Sub Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) dragging = False End Sub     Hãy thử chạy chương trình. Ấn nút trái chuột(Mouse), giữ nguyên như thế và kéo  chuột(drag) vẽ một hình gì chẳng hạn. Ổ thật là tuyệt vời ! Hình chúng ta đang vẽ  được tạo ra bởi Image1. Ví dụ chúng tôi vẽ chữ Vovi như Hình 2: Hình 2. Giải thích: Chúng ta dùng biến dragging thuộc loại Boolean (True/False) để nhận biết  user đang kéo chuột hay không, khi nút trái chuột được ấn thì xảy ra  event  MouseDown đối với picture1. chúng ta cho dragging=True. Khi mouse di chuyển thì  xảy ra event MouseMove, ta kiểm tra nếu đúng là user đang vẽ thì gọi method  PaintPicture để vẽ Image1 tại vị trí tương ứng. Khi user thả nút trái chuột ra  (MouseUp)thì cho dragging=False báo hiệu user đã ngưng vẽ.     Tóm lại để trang trí (decorate) một Form chúng ta có thể dùng các graphics controls  hoặc graphics methods. Tuy nhiên Image và PictureBox control có các events như 
  4. MouseUp, MouseDown, MouseMove...Trong khi Shape và Line control không có  event, nghĩa là chỉ thuần túy dùng cho việc trang trí.
ADSENSE

CÓ THỂ BẠN MUỐN DOWNLOAD

 

Đồng bộ tài khoản
2=>2