Fun-Soft - Programmierforum

Autor

Thread - Seiten: > 1 <

000
03.10.2004, 04:40 Uhr
sXene[WARE]

Hi!
Sind zurzeit nen proggi am machen und brauchen dadrin ne funktion...
auf knopfdruck ein neues formular zu erstellen, das wie frmNewForm aussieht.

bisher sind wir soweit:

Visual Basic:

'Dekleration
Dim NewDoc As New frmNewForm

Private Sub cmdNew_Click()
NewDoc.Show
End Sub

Aber so geht das nich..
Da wird zwar das frmNewForm angezeigt, aber immer nur einmal. wie kann man es machen, dass es immer neu angezeigt wird??

klingt komisch die frage, aber hoffe ihr wisst wassich meine :
--
sXene.de

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

001
03.10.2004, 13:03 Uhr
Pablo
Supertux
(Operator)

Das habe ich auch nie geschaft, das geht leider so nicht,

Am besten machst du eine Kopie eines bestehendes Fenster. Du kannst eine Fenster erstellen, dass nur dazu da ist, zur Laufzeit kopiert zu werden.
--
A! Elbereth Gilthoniel!
silivren penna míriel
o menel aglar elenath,
Gilthoniel, A! Elbereth!

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

002
03.10.2004, 13:07 Uhr
sXene[WARE]

Aaso danke habsch schon..

Visual Basic:

Private Sub cmdNew_Click()
Set frmNewForm = New frmNewForm
frmNewForm.Show
End Sub

geht doch, eigentlich ganz leicht.
--
sXene.de

Dieser Post wurde am 03.10.2004 um 13:08 Uhr von sXene[WARE] editiert.

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

003
03.10.2004, 14:18 Uhr
Pablo
Supertux
(Operator)

Genau das hab ich mit Kopie gemeint. Wenn du aber "New From" machst, generisch, dann geht es nicht.
--
A! Elbereth Gilthoniel!
silivren penna míriel
o menel aglar elenath,
Gilthoniel, A! Elbereth!

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

004
04.10.2004, 14:55 Uhr
sXene[WARE]

Hab jetz nur noch eine frage...
hab das jetz so gemacht in einem MDI form:

Visual Basic:

Private Sub cmdNew_Click()
Set frmNewForm = New frmNewForm
frmNewForm.Show
End Sub

und jetz sind sagen wir 4 formen dadrin...

jettz willich ALLE(!) weg hamn...

...

hab aber irgendwie probleme damit, krieg das nich hin...
hab schon so versucht:

Visual Basic:

Private Sub cmdTerminate_Click()
For Each frmNewForm In frmMain
Unload frmNewForm
Next
End Sub

aber klappt nich...
habt ihr auch da ne lösung?
--
sXene.de

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

005
04.10.2004, 16:03 Uhr
Pablo
Supertux
(Operator)

Wie hast du sie erstellt? Als array oder 4 verschiedene Variablen? Wenn 4 verschiedene Variablen, dann bleibt nix übrigs als 4 mal Unload zu benutzen.
--
A! Elbereth Gilthoniel!
silivren penna míriel
o menel aglar elenath,
Gilthoniel, A! Elbereth!

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

006
04.10.2004, 16:23 Uhr
sXene[WARE]

.......... habich schonmal gesagt

Visual Basic:

Private Sub cmdNew_Click()
Set frmNewForm = New frmNewForm
frmNewForm.Show
End Sub

mehr nich..
kann der nich alle formen in dem MDI form zählen, und dann so oft unload Me benutzen???
oder geht das irgendwie anders...
--
sXene.de

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

007
05.10.2004, 07:48 Uhr
proga

Visual Basic:

Option Explicit

Private m_MyForms As New Collection

Private Sub Command1_Click()
    Dim dlg As frmNewForm

    Set dlg = New frmNewForm
    dlg.Show
    Call m_MyForms.Add(dlg)
End Sub

Private Sub Command2_Click()
    Dim x As Integer
    Dim dlg As frmNewForm

    ' alle schließen
    For x = 1 To m_MyForms.Count
        Set dlg = m_MyForms.Item(x)
        Call Unload(dlg)
    Next x

    ' alle löschen
    Do While (m_MyForms.Count <> 0)
        m_MyForms.Remove (1)
    Loop
End Sub

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

Seiten: > 1 < [ Visual Basic 6.0 / VBA ]

ThWBoard 2.73 FloSoft-Edition
© by Paul Baecher & Felix Gonschorek (www.thwboard.de)

Anpassungen des Forums
© by Flo-Soft (www.flo-soft.de)

Sie sind Besucher: