Controler le texte taper en aplli console

Bonjour,
Suite a mon message sans réponse, je reformule differement ma question.
Comment controler ce que l'utilisateur de l'appli console tape avant l'affichage même ?
Merci de me repondre, c'est urgent pour moi !!!
Peut etre s'orirnter vers des procedures OnKeypress, mais je sias pas comment faire !!
AIDEZ mOI !!!

Merci d'avance

Kundun
http://www.kundun-official.com

Oui c'est avec cet évènement que tu réussiras.
Tu trouveras alors la variable Key ( un de ses paramètres ) qui contient la lettre tapée par l'utilisateur. Puis à toi de faire le traitement.
ex :
if Key = #13 then
Key := #0

En espérant que cela t'aide. Bonne prog.
Bruto --- Le p'tit belge --- pour vous servir


-------------------------------
Réponse au message :
-------------------------------

Bonjour,
Suite a mon message sans réponse, je reformule differement ma question.
Comment controler ce que l'utilisateur de l'appli console tape avant l'affichage même ?
Merci de me repondre, c'est urgent pour moi !!!
Peut etre s'orirnter vers des procedures OnKeypress, mais je sias pas comment faire !!
AIDEZ mOI !!!

Merci d'avance

Kundun
http://www.kundun-official.com

Oui c'est avec cet évènement que tu réussiras.
Tu trouveras alors la variable Key ( un de ses paramètres ) qui contient la lettre tapée par l'utilisateur. Puis à toi de faire le traitement.
ex :
if Key = #13 then
Key := #0

En espérant que cela t'aide. Bonne prog.
Bruto --- Le p'tit belge --- pour vous servir


-------------------------------
Réponse au message :
-------------------------------

Bonjour,
Suite a mon message sans réponse, je reformule differement ma question.
Comment controler ce que l'utilisateur de l'appli console tape avant l'affichage même ?
Merci de me repondre, c'est urgent pour moi !!!
Peut etre s'orirnter vers des procedures OnKeypress, mais je sias pas comment faire !!
AIDEZ mOI !!!

Merci d'avance

Kundun
http://www.kundun-official.com

Si je ne me trompe pas, ces évènements ne sont pas disponibles pour les applications console...

Peut être en utilisant un message Windows ??

Mais là, faut que j'y aille !!
Bonne prg' !
Bestiol.


-------------------------------
Réponse au message :
-------------------------------

Oui c'est avec cet évènement que tu réussiras.
Tu trouveras alors la variable Key ( un de ses paramètres ) qui contient la lettre tapée par l'utilisateur. Puis à toi de faire le traitement.
ex :
if Key = #13 then
Key := #0

En espérant que cela t'aide. Bonne prog.
Bruto --- Le p'tit belge --- pour vous servir


-------------------------------
Réponse au message :
-------------------------------

Bonjour,
Suite a mon message sans réponse, je reformule differement ma question.
Comment controler ce que l'utilisateur de l'appli console tape avant l'affichage même ?
Merci de me repondre, c'est urgent pour moi !!!
Peut etre s'orirnter vers des procedures OnKeypress, mais je sias pas comment faire !!
AIDEZ mOI !!!

Merci d'avance

Kundun
http://www.kundun-official.com

Je viens d'essayer avec un OnMessage, mais sans succès. Il semble que la boucle des messages windows ne fonctionne pas pendant les application consoles.

J'ai essayer aussi un Hook clavier mais c'est pareil : pas moyen d'ouvrir le hook...

--- Nono du Moulin ---


-------------------------------
Réponse au message :
-------------------------------

Si je ne me trompe pas, ces évènements ne sont pas disponibles pour les applications console...

Peut être en utilisant un message Windows ??

Mais là, faut que j'y aille !!
Bonne prg' !
Bestiol.


-------------------------------
Réponse au message :
-------------------------------

Oui c'est avec cet évènement que tu réussiras.
Tu trouveras alors la variable Key ( un de ses paramètres ) qui contient la lettre tapée par l'utilisateur. Puis à toi de faire le traitement.
ex :
if Key = #13 then
Key := #0

En espérant que cela t'aide. Bonne prog.
Bruto --- Le p'tit belge --- pour vous servir


-------------------------------
Réponse au message :
-------------------------------

Bonjour,
Suite a mon message sans réponse, je reformule differement ma question.
Comment controler ce que l'utilisateur de l'appli console tape avant l'affichage même ?
Merci de me repondre, c'est urgent pour moi !!!
Peut etre s'orirnter vers des procedures OnKeypress, mais je sias pas comment faire !!
AIDEZ mOI !!!

Merci d'avance

Kundun
http://www.kundun-official.com

Pour te mettre sur la voie, regardes la page suivante : How to automatic detect whether any key being pressed ou fais une recherche sur "pascal keypressed".


May Delphi be with you.
site Delphiprog


-------------------------------
Réponse au message :
-------------------------------

Je viens d'essayer avec un OnMessage, mais sans succès. Il semble que la boucle des messages windows ne fonctionne pas pendant les application consoles.

J'ai essayer aussi un Hook clavier mais c'est pareil : pas moyen d'ouvrir le hook...

--- Nono du Moulin ---


-------------------------------
Réponse au message :
-------------------------------

Si je ne me trompe pas, ces évènements ne sont pas disponibles pour les applications console...

Peut être en utilisant un message Windows ??

Mais là, faut que j'y aille !!
Bonne prg' !
Bestiol.


-------------------------------
Réponse au message :
-------------------------------

Oui c'est avec cet évènement que tu réussiras.
Tu trouveras alors la variable Key ( un de ses paramètres ) qui contient la lettre tapée par l'utilisateur. Puis à toi de faire le traitement.
ex :
if Key = #13 then
Key := #0

En espérant que cela t'aide. Bonne prog.
Bruto --- Le p'tit belge --- pour vous servir


-------------------------------
Réponse au message :
-------------------------------

Bonjour,
Suite a mon message sans réponse, je reformule differement ma question.
Comment controler ce que l'utilisateur de l'appli console tape avant l'affichage même ?
Merci de me repondre, c'est urgent pour moi !!!
Peut etre s'orirnter vers des procedures OnKeypress, mais je sias pas comment faire !!
AIDEZ mOI !!!

Merci d'avance

Kundun
http://www.kundun-official.com

Ben, là je donne ma langue au chat...

Je connais Keypressed, mais Delphi ne le connait plus...

--- Nono du Moulin ---


-------------------------------
Réponse au message :
-------------------------------

Pour te mettre sur la voie, regardes la page suivante : How to automatic detect whether any key being pressed ou fais une recherche sur "pascal keypressed".


May Delphi be with you.
site Delphiprog


-------------------------------
Réponse au message :
-------------------------------

Je viens d'essayer avec un OnMessage, mais sans succès. Il semble que la boucle des messages windows ne fonctionne pas pendant les application consoles.

J'ai essayer aussi un Hook clavier mais c'est pareil : pas moyen d'ouvrir le hook...

--- Nono du Moulin ---


-------------------------------
Réponse au message :
-------------------------------

Si je ne me trompe pas, ces évènements ne sont pas disponibles pour les applications console...

Peut être en utilisant un message Windows ??

Mais là, faut que j'y aille !!
Bonne prg' !
Bestiol.


-------------------------------
Réponse au message :
-------------------------------

Oui c'est avec cet évènement que tu réussiras.
Tu trouveras alors la variable Key ( un de ses paramètres ) qui contient la lettre tapée par l'utilisateur. Puis à toi de faire le traitement.
ex :
if Key = #13 then
Key := #0

En espérant que cela t'aide. Bonne prog.
Bruto --- Le p'tit belge --- pour vous servir


-------------------------------
Réponse au message :
-------------------------------

Bonjour,
Suite a mon message sans réponse, je reformule differement ma question.
Comment controler ce que l'utilisateur de l'appli console tape avant l'affichage même ?
Merci de me repondre, c'est urgent pour moi !!!
Peut etre s'orirnter vers des procedures OnKeypress, mais je sias pas comment faire !!
AIDEZ mOI !!!

Merci d'avance

Kundun
http://www.kundun-official.com

Bon allez, j'ai retrouvé un de mes vieux codes sources d'une application console qui boucle en affichant l'heure et en attendant la frappe de la touche ESC :

-----------------------------------------------------------
program AppliConsole;
{$AppType Console}

uses SysUtils, Windows, Dialogs;

begin
SetConsoleTitle('Horloge en fenêtre DOS');
writeln('Hello, this is a Delphi console application from a DOS window');
writeln('Appuyer sur une touche...');
Readln;
SetConsoleTextAttribute(GetStdHandle(STD_OUTPUT_HANDLE),
FOREGROUND_Green OR
BACKGROUND_BLUE);

repeat
Write(FormatDateTime('HH:NN:SS', now)+ #13);
(GetAsyncKeyState(VK_ESCAPE))));
Read;
until HiWord(GetAsyncKeyState(VK_ESCAPE)) <> 0;

Writeln('Finished');
end.
-------------------------------------------------------
May Delphi be with you.
site Delphiprog

Je n'avais pas pensé à GetAsyncKeyState()...

Mais cette fonctionne retourne l'état des touches actuellement appuyées, comment savoir alors si les touches appuyées sont à destination de l'application console ou d'une autre ? Car avant de faire Read() il faut être sûr qu'il y a des touches à lire, sinon l'exécution est bloquée...

--- Nono du Moulin ---


-------------------------------
Réponse au message :
-------------------------------

Bon allez, j'ai retrouvé un de mes vieux codes sources d'une application console qui boucle en affichant l'heure et en attendant la frappe de la touche ESC :

-----------------------------------------------------------
program AppliConsole;
{$AppType Console}

uses SysUtils, Windows, Dialogs;

begin
SetConsoleTitle('Horloge en fenêtre DOS');
writeln('Hello, this is a Delphi console application from a DOS window');
writeln('Appuyer sur une touche...');
Readln;
SetConsoleTextAttribute(GetStdHandle(STD_OUTPUT_HANDLE),
FOREGROUND_Green OR
BACKGROUND_BLUE);

repeat
Write(FormatDateTime('HH:NN:SS', now)+ #13);
(GetAsyncKeyState(VK_ESCAPE))));
Read;
until HiWord(GetAsyncKeyState(VK_ESCAPE)) <> 0;

Writeln('Finished');
end.
-------------------------------------------------------
May Delphi be with you.
site Delphiprog

Dans le cas présent, l'application n'est absolument pas bloquée sauf au début (ReadLn attend la frappe de la touche Enter).
Si une autre application est activée, alors la frappe d'une touche sera dirigée vers cette autre application. C'est la règle habituelle.
Si la fenêtre DOS de cette appli est active, alors la touche frappée est dirigée vers cette application.
Essayes le code cette application et tu verras que l'exécution n'est pas bloquée.
Mais, s'il y a de meilleures solutions, je suis preneur.

May Delphi be with you.
site Delphiprog


-------------------------------
Réponse au message :
-------------------------------

Je n'avais pas pensé à GetAsyncKeyState()...

Mais cette fonctionne retourne l'état des touches actuellement appuyées, comment savoir alors si les touches appuyées sont à destination de l'application console ou d'une autre ? Car avant de faire Read() il faut être sûr qu'il y a des touches à lire, sinon l'exécution est bloquée...

--- Nono du Moulin ---