Verknüpfung für mehrer Programme

[debjörn]

hi
also ich wollte ein programm schreiben, welches mehrer andere programme für mich startet. also wie eine verknüpfung. mit der sufu hab ich was gefunden und es noch ein bisschen für beispielprogramme geändert

Delphi-Quellcode:

begin
     ShellExecute(2, nil, 'C:\Programme\Internet Explorer\IEXPLORE.EXE',
     nil, nil, SW_SHOW);
     ShellExecute(2, nil, 'C:\Programme\Windows Media Player\wmplayer.exe',
     nil, nil, SW_SHOW);
     close;
end;

so jetzt meine fragen
1. wieso schließt er die form nach dem starten des programms nicht?
2. gibts auch ne möglichkeit, dass er die form erst gar nicht erstellt?
3. (unwichtig)wofür ist das nil?

mfg und thx

[MrKnogge]

Geh in deine IDE mal auf Projekt -> Quelltextanzeigen, dort kannst du das erstellen deiner Form verhindern.

[cruiser]

1.) Meine Glaskugel, sagt mir, dass du das im Form.OnCreate oder Form.OnShow machst, da geht es aus Prinzip nicht, was noch nicht fertig existiert kann nicht geclosed werden.

2.) Gibt es: Erstell eine Konsolenanwendung und entferne das {$APPTYPE CONSOLE}

zu 3.) etwas aus der SDK-Hilfe

Code:

HINSTANCE ShellExecute(
  HWND hwnd,            // handle to parent window
  LPCTSTR lpOperation,  // pointer to string that specifies operation to perform
  LPCTSTR lpFile,       // pointer to filename or folder name string
  LPCTSTR lpParameters, // pointer to string that specifies executable-file parameters 
  LPCTSTR lpDirectory,  // pointer to string that specifies default directory
  INT nShowCmd          // whether file is shown when opened
);

[debjörn]

Zitat:

Zitat von cruiser

1.) Meine Glaskugel, sagt mir, dass du das im Form.OnCreate oder Form.OnShow machst, da geht es aus Prinzip nicht, was noch nicht fertig existiert kann nicht geclosed werden.

deine glaskugel hat recht :wink: . hört sich auch recht logisch an, was du sagst thx

ich hab MrKnogges tipp mal verfolgt und jetzt siehts so aus und es klappt

Delphi-Quellcode:

begin
  //Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  //Application.Run;
end.

danke an euch beide

[MrKnogge]

:shock: so habe ich das aber nicht gemeint, du musst die Form rausschmeisen, nicht die Application.

[faux]

Zitat:

Zitat von debjörn

also ich wollte ein programm schreiben, welches mehrer andere programme für mich startet.

Wäre das nicht einfach durch Batchfiles lösbar?

[dominikkv]

wie wärs mit sowas:

Delphi-Quellcode:

  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  application.ShowMainForm := false;
  Application.Run;

dann wird die form zwar erstellt, aber nicht angezeigt

[debjörn]

Zitat:

Zitat von MrKnogge

:shock: so habe ich das aber nicht gemeint, du musst die Form rausschmeisen, nicht die Application.

meinst du ich soll das rausnehmen?:
Application.CreateForm(TForm1, Form1); ???
weil dann funktioniert es nicht mehr

Zitat:

Zitat von faux

Zitat:

Zitat von debjörn

also ich wollte ein programm schreiben, welches mehrer andere programme für mich startet.

Wäre das nicht einfach durch Batchfiles lösbar?

da kenne ich mich leider auch nicht aus

[MrKnogge]

Klar, dass es dann so nicht mehr funktioniert, da dein OnCreate ja nicht mehr auftritt.
Den von dir oben geposteten Code, musst du dann statt Application.CreateForm(TForm1, Form1); schreiben.

Ja Batchfiles wären wesentlich einfacher ...

[debjörn]

Zitat:

Zitat von MrKnogge

Klar, dass es dann so nicht mehr funktioniert, da dein OnCreate ja nicht mehr auftritt.
Den von dir oben geposteten Code, musst du dann statt Application.CreateForm(TForm1, Form1); schreiben.
[...]

ich weiß nicht welchen, aber ist auch egal. es klappt ja so, wie ichs gemacht habe :)