Application.Title funktioniert nicht so ganz

[SaraHx]

Splashscreen ist als Hauptfenster eingetragen, sollte ich das vll mal abändern oder gibts eine Möglichkeit den Text auch anders abzuändern ohne dabei das andere Fenster als Hauptfenster einzustellen?


Code von der Projektdatei:

Delphi-Quellcode:

program Project1;

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

{$R *.res}

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.Title := 'www.Defc0nX.de - SW-Timer - X Edition';
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.Run;
end.

Code vom Splashscreen:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, jpeg, ExtCtrls;

type
  TForm1 = class(TForm)
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label5: TLabel;
    Ttransparenz: TTimer;
    tHauptfenster: TTimer;
    procedure TtransparenzTimer(Sender: TObject);
    procedure tHauptfensterTimer(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.tHauptfensterTimer(Sender: TObject);
begin
Form1.Visible := false;
Form2.visible := true;
tHauptfenster.enabled := false;
end;

procedure TForm1.TtransparenzTimer(Sender: TObject);
begin
if (Form1.AlphaBlendValue < 255) then begin
 Form1.Alphablendvalue := Form1.Alphablendvalue + 15;
 end else Ttransparenz.enabled := false;
end;

end.

Und ja wie gesagt es ist mehr ein Spaßsplashscreen.



EDIT: Habe jetzt bei der Projektdatei Application.MainFormOnTaskbar := false; gesetzt und er übernimmts für beide Fensterchen, Ziel quasi erreicht denk ich.

Vielen Dank für die Informationen soweit und naja, hätte ich Dumpfbock doch mal ein wenig eher drauf kommen können die Projektdatei anzugucken.
Sorry für die Arbeit, hehe.. nun bin ich schlauer


Vielen Dank und liebe Grüße
Sarah