Các chiêu thức trong lập trình Kéo form di chuyển từ một điểm bất kỳ

...

1
328
0

Các chiêu thức trong lập trình Để form của bạn ở chế độ “Luôn nổi”

...

1
237
0

Các chiêu thức trong lập trình Để form trở nên trong suốthome

...

1
317
0

Các chiêu thức trong lập trình Chụp ảnh màn hình vào một Picture

...

1
570
0

Các chiêu thức trong lập trình Hiện Icon đại diện cho một loại file home

... Dim sKeyName As String 'Nắm tên khoá trong RegDim sKeyValue As String ''Nắm một giá trị của khoá trong Reg Dim Ret& Dim lphKey& Dim Path As String Path = App.PathIf ... kí Icon cho chương trình Public Sub Tao_File_He_Thong()'Giả sử rằng chương trình của bạn sẽ đăng kí ch việc thay đổi các tập tin có phần mở rộng là "*.mp3". Dim sKeyName As String ... Hiện Icon đại di n cho một loại file home Xuất xứ : www.ttvnol.com Binh khí sử dụng : 1 ModuleĐoạn mã :'Bạn tạo một module mới và dán đoạn mã này vào &apos ;Các hàm API cần thiết...

2
595
0

Các chiêu thức trong lập trình Hiện con trỏ động tại một đối tượng nào đóhome

...

1
400
0

Các chiêu thức trong lập trình Làm cho ứng dụng từ từ rõ dần khi Load và mờ dần khi Unload

...

1
378
0

Các chiêu thức trong lập trình Form có hình dạng theo một hình ảnh bất kỳ

... Form có hình dạng theo một hình ảnh bất kỳ (Tất nhiên có màu tượng trưng cho form trong suốt) home Chú ý : Phần này trong lần xuất bản 1 có lỗiXuất xứ : ... sử dụng : - 1 picture mang tên : picMainSkin trong đó có chứa sẵn một hình ảnh bất kỳ mà bạn muốn làmgiao di n chương trình màu tượng trưng cho trong suốt là màu ở câu lệnh TransparentColor ... Dim x As Long, y As Long, StartLineX As Long Dim FullRegion As Long, LineRegion As Long Dim TransparentColor As Long Dim InFirstRegion As Boolean Dim InLine As Boolean Dim hDC As Long Dim...

2
534
2

Các chiêu thức trong lập trình Hiệu ứng khi Click vào Form home

... Draw() Dim Cursor As POINTAPI Dim RetVal As Long Dim hdc As Long Dim Pen As Long Dim Brush As Long Dim OldPen As Long Dim OldBrush As Long Dim OldROP As Long Dim Region As Long Dim OldRegion ... SubPrivate Sub Form_ MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Selecting = True SetCapture Me.hwnd Form_ MouseMove 0, Shift, X, YEnd SubPrivate Sub Form_ MouseMove(Button ... LongPrivate Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As LongPrivate Declare Function Rectangle Lib "gdi32" (ByVal hdc As Long, ByVal X1As Long, ByVal...

3
397
0

Các chiêu thức trong lập trình Vô hiệu hoá button close và menu của form

...

1
436
0