Lỗi Khi dịch chương trình trên MapBaisc

Thảo luận trong 'Lập trình trong MapInfo' bắt đầu bởi PTP.Land, 24/5/12.

  1. PTP.Land

    PTP.Land New Member

    Tham gia ngày:
    25/4/12
    Bài viết:
    142
    Đã được thích:
    0
    Điểm thành tích:
    0
    Chào cả nhà!
    Em không hiểu bị lỗi gì mà sau khi em viết một đoạn lệnh rồi tiến hành dịch chương trình,ban đầu tạo ra file *MBX. Và nó chạy được trên MapInfo. Nhưng sau khi em tiếp tục thêm vào một số chức năng nữa và tiến hành dịch chương trình thì lại tạo ra file *.MBO không tạo ra được file &.MBX. Các anh chị có biết bị lỗi gì không chỉ giúp em với. Em cảm ơn nhiều...!!!
     
    Tags:
  2. ko_ni_chi

    ko_ni_chi New Member

    Tham gia ngày:
    20/10/11
    Bài viết:
    584
    Đã được thích:
    0
    Điểm thành tích:
    0
    Nghề nghiệp:
    Môi trường
    Nơi ở:
    DakLak-HCM
    Cài này do code của bạn có khai báo 1 thủ tục nào đó nhưng trong nội dung chưa sử dụng đến nên khi dịch nó ra file .MBO, bạn xem lại code có cái nào khai báo mà chưa sử dụng không.
    Mới tập tành cái này nên không biết đúng không
     
  3. PTP.Land

    PTP.Land New Member

    Tham gia ngày:
    25/4/12
    Bài viết:
    142
    Đã được thích:
    0
    Điểm thành tích:
    0
    Dạ đúng rồi ah, Em đã sửa và hiều được rồi.Cảm ơn Ko_Ni_Chi nhiều lắm. Do em không biết Ko_Ni_Chi là nam hay nữ nên xưng hô không hợp lắm có gì thông cảm cho em. Ko_Ni_Chi có thể giúp em cách viết một SubMenu được không, em đọc tài liệu của diễn đàn mình nhưng không hiểu lắm. Em cảm ơn nhiều...
    Chúc Ko_Ni_Chi luôn thành công.
     
  4. ko_ni_chi

    ko_ni_chi New Member

    Tham gia ngày:
    20/10/11
    Bài viết:
    584
    Đã được thích:
    0
    Điểm thành tích:
    0
    Nghề nghiệp:
    Môi trường
    Nơi ở:
    DakLak-HCM
    Xưng bạn đi, mình mới tập tành mapbasic mới đọc tài liệu đến chương 4 ah, có gì đưa lên đây cho mình học hỏi với
     
  5. PTP.Land

    PTP.Land New Member

    Tham gia ngày:
    25/4/12
    Bài viết:
    142
    Đã được thích:
    0
    Điểm thành tích:
    0
    Bạn cho mình hỏi cái này cái nha. Mình viết một Sub như thế này có bị sai điều gì không mà lúc đầu vẫn sử dụng được nhưng sau nhiều lần sửa thì không sử dụng được nữa.
    Declare Sub Main()
    Declare Sub EndApp()

    Sub Main()
    Create Menu "&Công cụ xử lý" As
    "(-",
    "&Thoát chương trình" Calling EndApp
    Alter Menu Bar Add "Công cụ xử lý"

    Sub EndApp
    Alter Menu Bar Remove "Công cụ xử lý"
    Terminate Application "Congcu.mbx"
    End Sub

    Lúc đầu mình cũng viết như vậy vẫn chạy bình thường, nhưng sau khi viết thêm ứng dụng thì khi dịch chương trình mặc dù không báo lỗi gì cả. Nhưng khi chạy trên Mapinfo thì các ứng dụng mình mới thêm vào vẫn chạy được trong khi chức năng "Thoát chương trình" thì không chạy được mà còn bị đứng máy, sau đó thông báo lỗi:
    [​IMG][​IMG]

    Bạn có biết bị lỗi gì không chỉ giúp mình với.
    Cảm ơn bạn nhiều.
     
    Last edited by a moderator: 25/5/12
  6. PTP.Land

    PTP.Land New Member

    Tham gia ngày:
    25/4/12
    Bài viết:
    142
    Đã được thích:
    0
    Điểm thành tích:
    0
    Lỗi MapBasic

    Chào cả nhà
    Các anh chị xem giúp em đã bị sai lỗi gì, sau khi dịch chương trình xong,em tiến hành chạy trên Mapinfo. Các chức năng em viết hầu như sử dụng được theo ý muốn của em nhưng có một chức năng " Thoát" thì không thực hiện được. Do em mới tập tành học nên không hiểu lắm các Anh, Chị xem giúp em nha.
    Declare Sub Main()
    Declare Sub EndApp()
    Declare Sub Tao
    Declare Sub Sua
    Declare Sub TK
    Declare Sub Tong

    Sub Main()
    Create Menu "&Cập nhật" As
    "Tạo mới" Calling Tao,
    "Sửa chữa" Calling Sua
    Create Menu "&Xử lý" As
    "Thống kê" Calling TK
    "Tính tổng" Calling Tong
    Create Menu "&Công cụ xử lý" As
    "&Cập nhật" As "Cập nhật",
    "(-",
    "&Xử lý" As "Xử lý"
    "(-",
    "&Thoát chương trình" Calling EndApp
    Alter Menu Bar Add "Công cụ xử lý"

    Sub EndApp
    Alter Menu Bar Remove "Công cụ xử lý"
    Terminate Application "Congcu.mbx"
    End Sub

    Lúc đầu em cũng viết như vậy vẫn chạy bình thường, nhưng sau khi thêm vào các Menu rẽ nhánh như trên thì khi dịch chương trình mặc dù không báo lỗi gì cả. Nhưng khi chạy trên Mapinfo các Menu con rẽ nhánh này vẫn thực hiện được các chức năng, trong khi chức năng "Thoát chương trình" thì không chạy được mà còn bị đứng máy, sau đó một hồi thì Mapinfo thông báo lỗi.
    Anh, Chị nào biết nó bị lỗi gì không chỉ giúp em với.
    Em cảm ơn nhiều...!!!
     
  7. GEOMITECH

    GEOMITECH Moderator

    Tham gia ngày:
    31/10/11
    Bài viết:
    791
    Đã được thích:
    12
    Điểm thành tích:
    18
    Nghề nghiệp:
    GEOLOGIST
    Nơi ở:
    Hà Nội
    Chào bạn!
    Bạn chú ý đến cấu trúc cú pháp tùng dòng lệnh của MapBasic một chút là sẽ ổn ngay thôi mà.
    Chẳng hạn khi bạn dùng "Create Menu "&Cap nhat" As" thì dòng dưới ""T?o m?i" Calling Tao," bạn cần chú ý đến dấu phẩy "," cuối dòng lệnh.
    Kết cú pháp này chú ý sẽ không có dấu phẩy nữa.
    Chú ý rất cần nhớ là Cứ sau khi gõ BEGIN là END luôn để không bị thiếu như CODE của em, hay là em test mọi người mà cố tình xóa đi dòng này 8-}

    Như vậy đoạn CODE của bạn đáng lẽ ra phải như sau:

    [

    Declare Sub Main()
    Declare Sub EndApp()
    Declare Sub Tao
    Declare Sub Sua
    Declare Sub TK
    Declare Sub Tong

    Sub Main()
    Create Menu "&C?p nh?t" As
    "T?o m?i" Calling Tao,
    "S?a ch?a" Calling Sua
    Create Menu "&X? lý" As
    "Th?ng kê" Calling TK,
    "Tính t?ng" Calling Tong
    Create Menu "&Công c? x? lý" As
    "&C?p nh?t" As "C?p nh?t",
    "(-",
    "&X? lý" As "X? lý",
    "(-",
    "&Thoát chuong trình" Calling EndApp
    Alter Menu Bar Add "Công c? x? lý"

    End Sub 'Dòng này là em thiếu nè, rất tai hại

    Sub EndApp
    Alter Menu Bar Remove "Công c? x? lý"
    Terminate Application "Congcu.mbx"
    End Sub

    ]
    Giờ bạn thử Ctr+K xem thế nào nhé!
    Chúc bạn thành công, khi nào hoàn thiện nếu có thể hãy chia sẻ với GISVN.COM.VN nhé :D

     
    Last edited by a moderator: 25/5/12
  8. PTP.Land

    PTP.Land New Member

    Tham gia ngày:
    25/4/12
    Bài viết:
    142
    Đã được thích:
    0
    Điểm thành tích:
    0
    Chào anh!
    Em đã sửa được rồi, em sẽ nhớ lời Anh nói. Em cảm ơn Anh nhiều lắm...!!!
    Vì sự phát triển của GISVN.COM.VN
    Chúc Anh luôn thành công.
     

Chia sẻ trang này

Share
Đang tải...