Nombre de lignes : 15 lignes
Afficher ce fichier en plein écran
- program Project1;
-
- uses
- Forms,
- Unit1 in 'Unit1.pas' {Form1};
-
- {$R *.RES}
-
- begin
- Application.Initialize;
- Application.Title := 'Codes Erreur Win32';
- Application.CreateForm(TForm1, Form1);
- Application.Run;
- end.