Reporniți formularul
Am două forme. Este necesar să se facă astfel încât atunci când se apasă butonul de pe primul formular, se lansează al doilea formular (nu a apărut, dar a fost lansat) și de fiecare dată când este apăsat butonul. Spune-mi cum se poate face. Mulțumită în avans.
procedura TForm1.Button1Click (expeditor: TObject);
var
# xA0; newForm. TForm;
începe
# xA0; newForm: = TForm.Creați (aplicație);
# xA0; newForm.Show;
se încheie;
cu TForm2.Create (Cerere) să înceapă
# xA0; Afișați;
# xA0; // alte nevoi
# xA0; sfârșitul;
Vă mulțumesc bineînțeles, dar faptul că am o grămadă de componente pe al doilea formular și dacă folosesc metodele descrise mai sus, acestea funcționează numai prima dată când alerg, iar ulterior dă o eroare pe care o am acolo tipul Chetului nu este corect.
Și asta înseamnă că a fost lansat? Nu este o aplicație.
Și ce anume este greșit și ce componente?
> (nu a apărut, a fost lansat)
La tine și așa totul se execută :)
În opinia dvs., "lansarea" ar trebui să difere de "spectacol", iar apoi metoda de a arăta forma este și toată lumea o folosește, dar "începeți" prima dorită.
Câte forme ar trebui să fie atunci când butonul este apăsat de mai multe ori? Sunt toți aceiași?
> Am o eroare pe care o am acolo este un tip de chet nu este corect.
Într-adevăr direct și scrie, spun ei, "aveți un tip de chet nu este corect"?
Știți că schimbarea globală este un rău mare? Se pare că aveți acest rău este foarte mult!
Generat automat de variabilele de mediu de dezvoltare Form1, Form2. care nu sunt destinate utilizării în metodele de forme potrivite, în general, astfel dezvoltatorii din Borland sunt fixați de începători ;-)
Memorie: 0,73 MB
Durată: 0.298 sec
Articole similare
Trimiteți-le prietenilor: