Discussion :

[darinze]

Bonjour,

Mon but est de créer un tout petit programme à partir de Delphi4 qui s'exécuterait dans une fenêtre DOS. Bon.
En recherchant sur le forum, j'ai vu que ma "chose" s'appelle une application console. Bon. Appelons-la application console.
Alors je fais un nouveau projet (un projet normal), je vire la form1 créée automatiquement, ainsi que toutes les déclarations incluses dans le .dpr (clauses uses et appel à la ressource $R), je mets mon code directement dans le .dpr, comme au bon vieux temps du TurboPascal. Ca crée un exe qui s'exécute et a l'air de fonctionner (en l'occurence une copie de fichier). Bon.

Arrive the problème... je voudrais faire une sortie écran. En TP c'était

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
begin
  WriteLn('toto');
end.

et toto s'affichait à l'écran. Là, tiens, fume... mon WriteLn y vraïtélenne que dalle.

J'ai cru comprendre qu'il fallait faire une manip au moment de la création de l'appli pour dire à Delphi de créer une application console ? Mais moi, quand je fais Nouveau->Projet, j'ai pas 'application console' quéquepart ! J'ai bien mis la directive $APPTYPE CONSOLE juste après ma clause program, mais rien n'y fait.

Voilà à quoi ressemble mon .dpr:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program JFmove;
 
{$APPTYPE CONSOLE}
 
uses
  Windows, SysUtils;
 
var
  rep_src, rep_dst, fic_dst, jours, d: String;
  j: Integer;
  p: Integer;
  sr: TSearchRec;
 
begin
writeln('toto');
end.

Quelqu'un pourrait-il m'éclairer SVP ? Merci.

[lil_jam63]

Pour créer une appli console, il faut faire:

Fichier -->Nouveau --> Autre --> Application console

Et ça devrais etre bon

PS: Je parle pour Delphi 7 perso mais je pense que ça doit etre pareil pour les autres versions.

[Reisubar]

Et ça n'a rien de honteux de vouloir faire une appli console (qui n'a ceci dit rien a voir avec MS-DOS...) :-)

[darinze]

Hé bien voilà : mon Delphi 4 (c'est pour ça, Reisubar, que je me sens honteux ) ne connaît pas ça. Je n'ai nulle part de quoi créer une appli console. Dans 'nouveau projet', j'ai Application Logo Win95, Application MDI, Application SDI et Expert application (qui me permet juste de définir le menu de mon application).

Vais-je devoir passer à Delphi7 uniquement pour créer une minable appli de copie de fichier en mode DOS ? Grrrrrrr

En fait cette appli copie un fichier en changeant son nom en y ajoutant la date et l'heure: toto.txt devient toto_20040618_171822.txt. C'est tout.

Au cas où vous sauriez faire ça en DOS, je suis preneur ... ça m'évitera de m'emmerdaver avec ça...

Merci

[gord's]

en D5 : Fichier -> nouveau... et dans la fenetre qui s'affiche choisir application console
De mémoire, ça devait ressembler à ça en D4

Pour info, voila ce que ça donne (D5 toujours) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
program Project2;
{$APPTYPE CONSOLE}
uses sysutils;
 
begin
  // Insérer le code utilisateur ici
end.

J'y pense : regarde aussi les options du projet, il doit bien y avoir quelques trucs à régler la dedans....

[darinze]

Je confirme donc que sous D4 y a aucune application console dans aucun des onglets de cette boîte 'Nouveau'...

Vais-je ressortir les 4 disquettes du TP5.5 de mon placard ? Damned ! Je n'ai pas de lecteur 5pouces 1/4 sur ma machine

[gord's]

je viens de vérifier : il y a une case à cocher 'application console' dans les options, onglet 'Lieur'.
C'est peut être ça qui te manque

[darinze]

Alléluia ! Dieu est grand et GORD'S est son prophète.
Je viens de lire à l'instant la dernière ligne de ton message et c'est le coeur battant que je suis allé voir la boîte des options du projet.

Et j'a trouvé !

Merci merci merci. Voilà, maintenant, je SAIS que j'avais raison d'être honteux. N'en déplaise à M. Reisubar