| Class TJustOne (unit GMJustOne) |
TComponent
Два компонента для 32-разрядных приложений, обеспечивающие запуск только одной копии приложения. Первый компонент завершает приложение сразу, а второй задает вопрос, действительно ли пользователь хочет запустить еще одну копию приложения.} {Two components for starting only one copy of application. TJustOne - immediatelly close second copy TJustOneAsk - asks user about second copy and close it in case of negative answer
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;| Properties |
| Events |
| Variables |
MutexCreated : boolean;
MyMutex : HWND;| Constructors |
constructor Create(AOwner: TComponent);Public declarations
| Functions |
destructor Destroy;Если мьютекс уже есть,
| Properties |
| Events |
| Variables |
MutexCreated : boolean;
MyMutex : HWND;Private declarations