Χρήσιμη Διαδικασία

Συζητήσεις για τις γλώσσες του dot Net και για του Visual Studio της Microsoft

Συντονιστές: WebDev Moderators, Super-Moderators

Απάντηση
Άβαταρ μέλους
Valerov
Δημοσιεύσεις: 231
Εγγραφή: 13 Ιαν 2003 09:36
Τοποθεσία: Πάτρα

Χρήσιμη Διαδικασία

Δημοσίευση από Valerov » 14 Ιουν 2003 20:58

Μετά απο μια εμπειρία που είχα πιστεύω πως είναι καλό να χρησιμοποιούμε την παρακάτω διαδικασία οταν θέλουμε να τερματίσουμε την εφαρμογή μας για να εξαναγκάζεται η πονηρή VB να τερματίζει πλήρως την εφαρμογή και να αποδευσμεύει την μνήμη που είχε δεσμεύση για κάποιες μεταβλητές.

Sub EndProgram()
Dim frm As Form
For Each frm In Forms
Unload frm: Set frm = Nothing
Next frm
Set frm = Nothing
End Sub
:: Always Dive With A Partner ::

Άβαταρ μέλους
telxina
Δημοσιεύσεις: 301
Εγγραφή: 29 Ιούλ 2002 20:36
Τοποθεσία: Moschato, Pireas
Επικοινωνία:

Χρήσιμη Διαδικασία

Δημοσίευση από telxina » 18 Ιουν 2003 10:00

H edoli

Set object = Nothing

xrisimopieitai evreos ke ine arketa kali. Gia na tin apofigeis mporeis opou se pernei na xrisimopieis tin edoli

object.close

Parola afta an asxolitheis me databases tha deis oti ta pragmata tha diskolepsoun arketa, mia ke se kapies periptoseis kamia edoli close object den tha einai arketi gia na kleisei to ldb tis database sou. Ta exo pathei gia afto milao... :hammer:

Άβαταρ μέλους
Bugman
Δημοσιεύσεις: 362
Εγγραφή: 01 Ιούλ 2003 20:39
Τοποθεσία: Πρέβεζα
Επικοινωνία:

Χρήσιμη Διαδικασία

Δημοσίευση από Bugman » 03 Ιούλ 2003 00:49

Σε MDI εφαρμογές:

θα έχουμε βάλει στην πρώτη φόρμα (την μητρική) στο tag το mam

στο MDIForm_Unload

While Forms.Count > 1
If Forms(Forms.Count - 1).tag <> "mam" Then
Unload Forms(Forms.Count - 1)
Else
Unload Forms(Forms.Count - 2)
End If
DoEvents
Wend

δηλαδή το κόλπο είναι να κάνουμε unload τις άλλες φόρμες εκτός από την μητρική διότι αυτή είναι ήδη στο Unload.

Απάντηση

Επιστροφή στο “dot Net και Visual Studio”

Μέλη σε σύνδεση

Μέλη σε αυτήν τη Δ. Συζήτηση: Δεν υπάρχουν εγγεγραμμένα μέλη και 1 επισκέπτης