FormExplode;Implode Module

Om de module te downloaden, klik je het beste op de titel. (in .Bas vorm). Deze module werd gemaakt in Visual Basic 6, maar is ook VB4 32-BIT, VB5 & VB6 compatibel. Dat zijn ze trouwens allemaal...(Ongeveer 6 KB)

Gebruik:

 Private Sub Command1_Click()
Call ImplodeForm(Me, 2, 500, 1)
End
Set Form1 = Nothing
End Sub

Private Sub Form_Load()
Call ExplodeForm(Me, 1000)
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Call ImplodeForm(Me, 2, 500, 1)
End Sub

Verschillende Routines:

  1. ExplodeForm - Laat het formulier bij afsluiten 'exploderen'
  2. ImplodeForm - Laat het formulier bij afsluiten 'imploderen'

Uitleg bij API Declaraties:

  1. SetBkColor - kies een specifierende bk-kleur voor dezer routine
  2. ReleaseDC - Bevrijd de DC van het geheugen om door andere programma's gebruikt te worden.
  3. GetDC - Retourneert de DC van een speciaal gebied, nl. 'Client area' (zie CaptureClient)
  4. Rectangle - Maak een rechthoek
  5. CreateSolidBrush - Maak een gevoelige borstel rond een bep. voorwerp en bep. kleur
  6. DeleteObject - Selecteer een object