"Program" versteckt ausführen

[thomasschaf]

Hallo,

bisher habe ich meistens nur Anwendungen, also grafische Projekte geschrieben.

Wie kann ich ein "Program" versteckt ausführen, sodass sich nicht das Konsolenfenster (cmd) öffnet ?

Die einzige Möglichkeit, die ich bisher gefunden habe, und doch gar nicht so unschön ist, wäre die folgende:

Delphi-Quellcode:

ShowWindow(GetForeGroundWindow, SW_HIDE)

Ich suche nach einer ähnlichen Methode wie "ShowMainForm", die es hier aufgrund der fehlenden Form nicht zu geben scheint.

Gruß,
THOMAS

[himitsu]

Wie wäre es, wenn du eine VCL-App schreibst, aber keine Forms erstellst?

[blackfin]

Einfach in die .dpr (bzw. lpr heisst die beim Lazarus glaub ich) nach "Application.Initialize" a bissl Code schreiben...ohne Form, ohne Apptype Console....voilá!

Delphi-Quellcode:

program VeryEliteHiddenProgram;

uses
 WhatItShouldUse,...
;

{$R *.RES}

begin
  Application.Initialize;
  // here comes the very elite-like hidden code!!!....
end.

Aber vorsicht...geht nach Abarbeitung gleich wieder zu die Gute! :-)

[Bernhard Geyer]

Bedenke aber das verstecke normale Anwendungen des öfteren von Virenscanner per Verhaltenserkennung als gefährlich eingestuft werden und u.U. am Ausführen gehindert werden.

[thomasschaf]

Ok, habe mich nun für blackfins Lösung entschieden.
Funktioniert wirklich gut.

Danke sehr.

[borstenei]

oder so

Delphi-Quellcode:

var owner:thandle;
begin
Owner := GetWindow(handle, GW_OWNER);
ShowWindow(owner, SW_HIDE);
self.hide;
end;

[Delphi-Laie]

Das ist dann doch aber nicht vor dem Taskmanager, Prozeßeplorer & Co. versteckt?!

Derlei Systemüberwachungsprogramme werden von mir und wohl auch von vielen anderen tagtäglich benutzt. Da nützt formular- oder konsolenfensterlosigkeit kein bißchen.

[Luckie]

Warum muss es überhaupt versteckt sein?

[DeddyH]

Wenn ich ein Programm schreibe, das ohne jegliche Interaktion auskommt, dann erstelle ich (allerdings unter Delphi) eine neue Konsolenanwendung und lösche einfach die Compilerdirektrive {$APPTYPE CONSOLE}.

[kuba]

Hi,

angehängtes Programmbeispiel verschwindet unmittelbat nach Programmstart und ist per ALT+TAB nicht mehr in den Vordergrund zu bekommen.

Beenden nur über Taskmanager möglich.

kuba

PS: sorry falsche Kategorie ... Delphi, nicht FP...

[Christian Seehase]

Zitat:

Zitat von Luckie (Beitrag 1136986)

Warum muss es überhaupt versteckt sein?

Das kann durchaus mal ganz nützlich sein, wenn man beim Login Daten vom Rechner einsammeln muss.
Speziell, wenn dieser Vorgang etwas länger dauern kann.
Manche Anwender sind recht schnell dabei ein Konsolenfenster einfach zuzumachen, vor allem, wenn scheinbar nichts passiert.

[stahli]

Im Delphi reicht ein Eintrag im Projektquelltext:

Delphi-Quellcode:

program Test;

uses
  Forms,
  fTest in 'fTest.pas' {FormTest};

{$R *.res}

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TFormTest, FormTest);
  if DebugHook = 0 then                // <------ nur wenn nicht im Debugger
    Application.ShowMainForm := False; // <------ dann Formular ausblenden
  Application.Run;
end.

Dann ist kein Fenster sichtbar und der Prozess nur noch im Projektmanager zu abzubrechen.
Im Debugmodus ist das Fenster aber komplett sichtbar.

Ob das in FreePascal so geht weiß ich aber nicht.

[DeddyH]

Aber wozu Fenster erzeugen und verwalten, wenn man keins braucht? Oder habe ich die Anforderung falsch verstanden?

[Christian Seehase]

Je nachdem, was es werden soll, käme auch noch ein Dienst in Frage.