ok ich habs ^^
folgende zeile hab ich in turboPASCAL's code anpassen müssen
If IsIconic(FirstInstance) Then ShowWindow(FirstInstance, SW_SHOW)
da stand vorher SW_RESTORE, und des hat er irgendwie nicht gepackt....
mit SW_SHOW kriegt ers hin... nur das icon im tray wird nicht gekillt