Einzelnen Beitrag anzeigen

thomas2009
(Gast)

n/a Beiträge
 
#1

Forms ausgeblendet starten ?

  Alt 27. Aug 2008, 17:07
Hallo
ich möchte mein Program über einen Parameter mit einem Link (verknüpfung) alle
Forms ausblenden
Ich folgendes gemacht :
Delphi-Quellcode:
program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas{Form1},
  Unit2 in 'Unit2.pas{Form2};

{$R *.res}
procedure HideForms;
begin
   Form1.Hide;
   Form2.Hide;
end;

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);

  if Paramstr(1) = 'programhiddenthen
  HideForms;

  Application.Run;
end.

end.
Ich habe einen Parameter "programhidden" erstellt

Aufruf :
"C:\Project1.exe" programhidden

Aber das Programm startet trotzdem normal : (

_
  Mit Zitat antworten Zitat