у меня программа скрывается от процессы на диспетчере задач как его обратно открыть

[alman12]

да свою форму

[Heneken87]

Сообщение от alman12

да свою форму

SetForegroundWindow- Делает форму активной, если форма свернута логично наверное что перед тем как сделать ее активной не мешало бы её развернуть.... Хотя бы так....ShowWindow(FindWindow('TSTAR T_FORM',nil),SW_SHOWNORMAL);

[alman12]

сделаль!!!
нечего нового

[Heneken87]

Код View Sorce выложите,полный или весь проект свой,так быстрее будет

[alman12]

program Project1;

uses
  Vcl.Forms, windows,dialogs,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin

   if GetLastError <> ERROR_ALREADY_EXISTS then
begin
Sleep(2000);
end;
CreateMutex(nil, True, 'REESTERSKOMLEKS2013');
if GetLastError = ERROR_ALREADY_EXISTS then
begin
showmessage('Программа уже запущена!');
 ShowWindow(FindWindow('TFORM1',nil),SW_SHOWNORMAL);
SetForegroundWindow(FindWindow('TForm1',nil));

Exit;
end;
 //FORM1.DisableProcessWindowsGhosting;
  Application.Initialize;
Application.MainFormOnTaskbar := True;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

[Heneken87]

Открываем Project2.exe, сворачиваем. Повторно открываем Project2.exe,получаем сообщение и показываем 1 запущеный проект. Если у вас не будет работь, значит в настройках винды стоит запрет на "Отлов" хендла окон

[beegl]

для красоты добавить:

  showmessage('Программа уже запущена!');
  ShowWindow(FindWindow('TForm1',nil),SW_SHOWNORMAL);
  SetForegroundWindow(FindWindow('TForm1',nil))

это:

GetForegroundWindow(); // так всегда на передний план

[FaTaL]

Heneken87, beegl,
Да ему вообще по моему по барабану. Совсем думать не хочет. Тупо берёт и копирует ваш код, а под свой поправить никак не хочет.
Да и Репа у него не с проста -159. Это что же надо было такое натворить, чтобы такую репу заработать?

[alman12]

Heneken87 спасибо большое , твой код работает , у меня на винде проблема на другом пк работает этот код

[NetSpace]

скорее всего имеем дело с 12-летним пацаном, который отчаянно пытается научиться программировать или что-то сотворить для удобства в компьютерных игрушках, типа фича, чтоб не отвлекаться на сообщения или на другие окна.
уж больно правописание хромает. не может взрослый или даже студент так коряво писать - там грамотность заложена на подсознании.
либо внатуре такой ленивый взрослый.