Hi,
ich benutze Delphi 7 und es nervt mich total, wenn ich z.B. die Delphi-Hilfe geöffnet habe und dann die Win-SDK-Hilfe öffnen will, dass dann die Delphi-Hilfe geschlossen wird. Also habe ich folgendendes Programm geschrieben, dass ich unter D7 als Tool eingefügt und als Parameter Pfad+Dateiname zur Hilfe-Datei übergebe.
Nun die Frage:
Passt das so?
Ich kann nämlich auch "Application.Run" vollkommen weglassen und es funtioniert trotzdem. Soll ich es stehen lassen? Brauche ich es? (ich will einen möglichst kurzen und sauberen Quelltext) Oder soll ich "Application.Initialize" auch weglassen und nur den ShellExecute-Befehl stehenlassen?
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
| program Help;
uses
Forms, ShellAPI, SysUtils, Windows;
{$R *.res}
begin
Application.Initialize;
Application.Run;
ShellExecute(Application.Handle,'open',PChar(ExtractFileName(ParamStr(1))),nil,PChar(ExtractFilePath(ParamStr(1))),SW_SHOW);
Application.Terminate;
end. |
Thx for your Help and Time
EDIT: Unnötige Zeilenumbrüche entfernt
