Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Delphi - Aprire pių volte la stessa form
Forum - Delphi - Aprire pių volte la stessa form

Avatar
carmelo (Normal User)
Pro


Messaggi: 100
Iscritto: 15/06/2007

Segnala al moderatore
Postato alle 13:00
Lunedė, 08/02/2010
Ciao a tutti!!
Dopo un bel po di assenza eccomi di nuovo qui a chiedere aiuto a voi master!
Ho fatto un programmino di note utilizzando una sola form e un Tmemo.
Come da titolo, vorrei aprire pių volte la stessa form.
Come faccio?
Ciao e grazie mille
carmelo

PM Quote
Avatar
()
Newbie


Messaggi:
Iscritto:

Segnala al moderatore
Postato alle 15:15
Lunedė, 08/02/2010
cosa si intende per aprire pių volte la stessa form?

PM Quote
Avatar
carmelo (Normal User)
Pro


Messaggi: 100
Iscritto: 15/06/2007

Segnala al moderatore
Postato alle 21:28
Lunedė, 08/02/2010
uhm...dunque l'applicazione consta di una sola form (form1) che contiene varie cose.
vorrei che tramite un tbutton riuscissi ad avviare di nuovo la form1. aprirne due contemporaneamente insomma...č piu chiaro?... :-|
ciao y grazie  

PM Quote
Avatar
()
Newbie


Messaggi:
Iscritto:

Segnala al moderatore
Postato alle 23:10
Lunedė, 08/02/2010
A ok č pių chiaro.
Beh intanto ci sono molti modi...
Puoi semplicemente dare da codice (da inserire nel bottone che dici) l'avvio di un normale eseguibile che in questo caso č proprio la stessa applicazione. Questo avvio lo puoi fare in due modi:

1) Attraverso la ShellApi:
Intanto devi aggiungere Uses ShellApi
Dunque il codice č :
Codice sorgente - presumibilmente Delphi

  1. (*...*)
  2. interface
  3. Uses Windows, ..., ShellApi;
  4. (*...*)
  5. ShellExecute(Application.Handle, 'open', PChar(ParamStr(0)) ,'','',1);


I tre punti non sono parte del codice ma sono un eccedera che indicano tutte le altre uses

2) Usi un comando dos
In questo caso devi innanzitutto passare la cartella in cui č contenuto l'eseguibile dunque il codice č:
Codice sorgente - presumibilmente Plain Text

  1. path:= '"' + ParamStr(0) + '"'
  2. WinExec(PChar(path), 1);


dove path č la cartella in cui č contenuta l'applicazione preceduta e seguita da un " proprio come richiede il dos

Se non č chiaro basta chiedere...



Ultima modifica effettuata da il 08/02/2010 alle 23:12
PM Quote