Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations John Tel on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Recent content by TometaSoftware
-
Single Instance Applications
My post was to help you do the mutex correctly. My way is one of the safest ways that I have found to make sure that the mutex is never left behind. I am still researching your original question: "How can I get the current instance to load the file instead of displaying 'Only one allowed!'."...- TometaSoftware
- Post #8
- Forum: Embarcadero: Delphi
-
Single Instance Applications
He is a better way to use a mutex. var mAppMutexHnd: cardinal; const APPLICATION_MUTEX_ID = 'AppMutex'; begin Application.Initialize; // Create mutex to show application is running mAppMutexHnd := CreateMutex(nil, BOOL(1), PChar APPLICATION_MUTEX_ID)); // check if application was...- TometaSoftware
- Post #4
- Forum: Embarcadero: Delphi
-
reading setrange start and end values
I have used something like the following to close all flashfiler table and reopen them. It compiles with ttTable but no guarantees. ;) var ClosedTableList = Tlist = nil; procedure CloseAllAppTables(AppIsClosing: boolean); var aForm: TForm; iTableCounter: integer; i,j: integer; begin if...- TometaSoftware
- Post #2
- Forum: Embarcadero: Delphi
