Discussion :

[superpok]

bonjour,
je travaille sur un project personel avec borland 6, j'utilise borland avec les TFORM.
Je voudrais savoir si il est possible de faire ça:

Si mon programme est lancer avec au moin 1 argument alors lancé une version console.
Sinon lancé le programme en version GUI avec les Tform.

voila merci.

[DjmSoftware]

bonsoir
aucun problème
la VCL prévoit des fonctions permettants de connaitre le nombre d'arguments passés en ligne de commande
ParamCount
les arguments sont un tableau de string
ainsi Paramstr(0) retourne le nom complet de l'application
ParamStr(1) le premier argument, et ainsi de suite
cordialement

[superpok]

oui , heu
bien je savais cela

mon probleme est que je n'ai aucune idée dans la façon de procceder pour interrompre le lancement de l'appli grapique, et prendre la main fassons console.

[DjmSoftware]

bonsoir
je n'avais pas compris le sens de ta question
pour moi la solution est relativement simple
tu crées 2 application , 1 en mode GUI basée sur la VCL et l'autre en mode console
le test pour passer du mode GUI ou Console se fait de la manière suivante
dans le fichier cpp principal de ton application

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
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
	try
	{
	 if (ParamCount())
	 {
	   ShellExecute(NULL,"open","MyConsole.exe","","",SW_SHOW);
	 }
	 else
	 {
		Application->Initialize();
		Application->CreateForm(__classid(TForm7), &Form7);
		Application->Run();
	 }
	}
	catch (Exception &exception)
	{
		Application->ShowException(&exception);
	}
	catch (...)
	{
		try
		{
			throw Exception("");
		}
		catch (Exception &exception)
		{
			Application->ShowException(&exception);
		}
	}
	return 0;
}

la console utilisée s'appelle dans ce cas ci MyConsole.exe
cordialement

[Flow_75]

bonsoir
je n'avais pas compris le sens de ta question
pour moi la solution est relativement simple
tu crées 2 application , 1 en mode GUI basée sur la VCL et l'autre en mode console
le test pour passer du mode GUI ou Console se fait de la manière suivante
dans le fichier cpp principal de ton application

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
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
	try
	{
	 if (ParamCount())
	 {
	   ShellExecute(NULL,"open","MyConsole.exe","","",SW_SHOW);
	 }
	 else
	 {
		Application->Initialize();
		Application->CreateForm(__classid(TForm7), &Form7);
		Application->Run();
	 }
	}
	catch (Exception &exception)
	{
		Application->ShowException(&exception);
	}
	catch (...)
	{
		try
		{
			throw Exception("");
		}
		catch (Exception &exception)
		{
			Application->ShowException(&exception);
		}
	}
	return 0;
}

la console utilisée s'appelle dans ce cas ci MyConsole.exe
cordialement

perso, j'ai un doute que ca soit cela qu'il veux.
je pense qu'il veux regrouper les TForm et la console dans un meme exe...
et lancer le GUI si on lance le programme en doublecliquant et lancer la console en lancant en ligne de commande.
mais c'est mon avis perso...

[superpok]

exact, Flob91, c'est plutot l'idée vers laquelle je souhaitais m'orienter.

En effet faire 2 programe et utiliser l'un pour lancer l'autre dans certain cas.
Ce n'est vraiment pas ce que je souhaite lol


quand on fait ça :

#include <stdio.h>
[...]

try
{
if (ParamCount())
{
printf("coucou\n");
}
else
{
Application->Initialize();
Application->CreateForm(__classid(TForm7), &Form7);
Application->Run();
}

On obtient pas le printf, car je pense que l'on est dans un processus fils de cmd.exe et plus dans le pere.

De plus je viens de reflechir, et je me demande..
Mon application utilise les composants, TServerSocket et TClientSocket.
Mais ils seront inutilisable si on ne lance pas l'appli graphique ??