Nachrichtenschleife wird nicht beendet

[Zoot]

Zitat von ferby:

Eigentlich will ich eine "normal" VCL Application machen ohne die Zeile {$R *.dfm} zu verwenden.(Hat keinen höheren Sinn, wollte es einfach nur ausprobieren)

Dafür wäre es empfehlenswert, dennoch die Mechanismen von TApplication zu verwenden.
Wozu soll deine Messageschleife gut sein?

Delphi-Quellcode:

program Project1;

uses
  Forms;

var 
  Form1: TForm; 

begin
  Application.Initialize;
  Application.CreateForm(TForm, Form1);
  Form1.Caption := 'Bla'
  Application.Run;
end.