Ładny brzuch
:( mam problem, chce aby raz uruchomiony program blokowal uruchomienie kolejnej jego kopii. Macie pomysl? Tylko prosze bez OCX i DLL, chyba API da rade. ;)
:( mam problem, chce aby raz uruchomiony program blokowal uruchomienie kolejnej jego kopii. Macie pomysl? Tylko prosze bez OCX i DLL, chyba API da rade. ;)
W VB jest to znacznie prostsze ni mylisz - bez adnego uycai API. Po prostu:
If App.PrevInstance Then End
Jeli natomiast chciaby aby program sprawdza, czy kopia ju jest uruchomiona i ew. przecza si na ni, to ostatnio na pl.comp.lang.vbasic dawaem na to odpowied. Poszukaj pod ktem ActivatePrevInstance. I faktycznie - tam ju chyba trzeba uzy 4 funkcji API (o ile dobrze pamitam).
pozdrawiaMM
<_< Z tego co pamitam, to trzeba co zmieni we waciwociach formy
- no wiesz: w tym panelu z prawej strony okna. Jedna z waciwoci jest jako ustawiona, i trzeba j zmieni na t drug. :) to jest pewny sposb, tylko nie pamitam, ktra waciwo.
:D Dzieki za ta funkcje APP. Dziala!!! Dla przyladu gdyby ktos potrzebowal:
Function blokada() As Integer If App.PrevInstance Then blokada = True Else blokada = False End If End Function Sub Form_Load() If blokada() Then End End Sub
B) POZDRO 4all
:D Dzieki za ta funkcje APP. Dziala!!! Dla przyladu gdyby ktos potrzebowal:
Function blokada() As Integer If App.PrevInstance Then blokada = True Else blokada = False End If End Function Sub Form_Load() If blokada() Then End End Sub
B) POZDRO 4all
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
:( mam problem, chce aby raz uruchomiony program blokowal uruchomienie kolejnej jego kopii. Macie pomysl? Tylko prosze bez OCX i DLL, chyba API da rade. ;)
W VB jest to znacznie prostsze ni mylisz - bez adnego uycai API. Po prostu:
If App.PrevInstance Then End
Jeli natomiast chciaby aby program sprawdza, czy kopia ju jest uruchomiona i ew. przecza si na ni, to ostatnio na pl.comp.lang.vbasic dawaem na to odpowied. Poszukaj pod ktem ActivatePrevInstance. I faktycznie - tam ju chyba trzeba uzy 4 funkcji API (o ile dobrze pamitam).
pozdrawiaMM
<_< Z tego co pamitam, to trzeba co zmieni we waciwociach formy
- no wiesz: w tym panelu z prawej strony okna. Jedna z waciwoci jest jako ustawiona, i trzeba j zmieni na t drug. :) to jest pewny sposb, tylko nie pamitam, ktra waciwo.
:D Dzieki za ta funkcje APP. Dziala!!! Dla przyladu gdyby ktos potrzebowal:
Function blokada() As Integer If App.PrevInstance Then blokada = True Else blokada = False End If End Function Sub Form_Load() If blokada() Then End End Sub
B) POZDRO 4all
:D Dzieki za ta funkcje APP. Dziala!!! Dla przyladu gdyby ktos potrzebowal:
Function blokada() As Integer If App.PrevInstance Then blokada = True Else blokada = False End If End Function Sub Form_Load() If blokada() Then End End Sub
B) POZDRO 4all