Private Type POINTAPI
X As Long
Y As Long
End Type
Private Declare Function GetCursorPos Lib “user32″ (lpPoint As POINTAPI) As Long
Private Declare Function ScreenToClient Lib “user32″ (ByVal hWnd As Long, _
lpPoint As POINTAPI) As Long
‘ Get mouse X coordinates in pixels
‘
‘ If a window handle is passed, the result is relative to the […]
Archive for May, 2009
VB6: Get mouse coordinates in pixels
Show File Properties Dialog Box
Public Function ShowProps(FileName As String, _
OwnerhWnd As Long) As Boolean
‘USAGE:
‘To show the properties dialog box of “c:\autoexec.bat”, use the following code:
‘Call ShowProps(”c:\autoexec.bat”, Me.hwnd)
‘Function will return false if
‘property windows can’t be shown for
‘any reason (e.g., invalid file or Ownerhwnd)
On Error Resume Next
Dim SEI As SHELLEXECUTEINFO
Dim r As Long
With SEI
[…]
Agenda v2.0
Facand curat deunazi prin calculator (lucru, care spre rusinea mea, nu l-am mai facut de vreun an) am dat peste o aplicatie de care uitsem complet. Se pare ca la un moment dat am dezvoltat o alta versiune a aplicatiei Agenda.
Aveti cateva screenshot-uri care vorbesc de la sine:)
Intre timp mi-am adus aminte de ce am […]
Desktop Wallpaper Changer
De ceva timp sunt abonat pe unele forum-uri iar in unele momente mai stau si eu si raspund altora ca sa ne ajutam reciproc sa crestem. Astfel am dat intr-o seara peste un topic care zicea urmatorul lucru: as dori sa stiu cum pot schimba poza de pe desktop utilizand cod VB. Astfel mi-a […]
VB6: Hide title bar for Forms containing menus
Am intanit situatii in care am avut nevoie sa ascund bara de title al unui form din diverse motive. Ultima data s-a intamplat cand aveam nevoie sa fac fullscreen o poza (un control Image intr-un form pe care il maximizam). Toate bune si frumoase pana in momentul in care in form-ul respectiv am un meniu. […]
Popup menu on two linked forms
Lucrand la o aplicatie am dat peste, as putea spune eu, un bug al mediului de dezvoltare VB6. Deregula cand folosim mai multe form-uri avem nevoie ca ultimul form deschis sa fie deasupra celorlalte si celelalte sa nu poate fi actionate. Asta se face foarte usor afisand formul respectiv astfel:
Form1.Show vbModal, Me
VB6: Get external IP address
O provocare mare pentru mine a fost de cateva ori sa preiau adresa IP externa (IP-ul cu care este inregistrat fiecare utilizator pentru a folosi internetul). Exista tot felul de functii si controale care reusesc sa citeasca din registri adresa IP a utilizatorului dar totul se complica si mai mult si nu prea exista solutii […]
Moving Ball
Google-uid de zor intr-o zi dupa niste bucati de cod VB, am reusit sa dau peste ceva ce mi-a captat atentita. Era ceva de genul: simularea miscarii unui obiect dupa o anumita regula si mi-am propus sa incerc si eu sa fac ceva asemanator si iata ce a iesit dupa numai o ora de munca. […]
Tratarea erorilor in Visual Basic
In cadrul programarii VB ,ca si in alte limbaje de programare pot interveni tot felul de erori. Unele pot fi catalogate ca erori utile, erori generate de programator ca utilizatorul sa foloseasca aplicatia cum trebuie. Alte erori pur si simplu pot interveni din diversi factori (ex: imposibilitatea conectarii la o baza de date). Astfel exista […]
Criptare date
Orice programator are nevoie de un moment dat ca pentru anumite aplicatii pe care le dezvolta sa stocheze anumite date in fisiere text ce pot fi usor fi deschise cu Notepad/Wordpad. Nici unuia nu ii place ca utilizatorul sa poata citi datele afisate acolo astlfe, exista diferite metode de criptare a datelor si am sa […]

