Discussion :

[ornitho]

Bonsoir.

Voilà je suis tout débutant en Delphi.
Mon problème est le suivant:
J'aimerais lors de l'exécution d'un programme pouvoir taper un mot ou un chiffre dans une fenêtre 'Tedit' afin que le programme l'intègre dans une variable ou l'affiche à l'écran. (Vous voyez je suis vraiment débutant)
J'ai suivi à la lettre une des docs que j'ai trouvé sur ce site, et je bute sur un exercice à cause de ça. Mais rien n'explique comment on fait. À moins que je n'ai pas encore la tournure d'esprit Delphiste et que j'ai la solution sous les yeux. Je bute la dessus depuis plusieurs jours. Il n'y a pas une commande qui corresponde à un truc style 'Input'.
Si quelqu'un pouvez me donner un petit exemple, je crois que se serais pour moi la meilleur façon de comprendre. autrement, expliquez moi simplement je ne maitrise pas bien le langage technique.

Merci d'avance.

[visualk]

salut
alors cela est simple
dans la Barre D'outils -- onglet Standard tu trouvera un outil nommé : Edit
tu cilc et tu glisse dans ta form
est voila tu as un champ de texte
tu peut mettre le lien ou tu suis tes cours ?
et peut tu me dire quel version delphi tu utilise ?

[ornitho]

Merci visualk.

Je crois que je me suis mal expliqué.

En fait j'ai compris comment on faisait une fenêtre avec Tedit.
Lorsque je lance le programme dans Delphi ou en .exe je peux taper ce que je veux dans la fenêtre. Le problème c'est que j'aimerais mettre ce que je tape dans cette fenêtre, dans une variable. Et la ça coince. Pour l'instant tous ce que j'arrive à faire est de changer cette valeur dans le programme uniquement pendant l'édition, c'est à dire en tapant du code. Mais je sais pas comment faire pendant l'exécution. Il doit bien exister une commande qui attende que je rentre une valeur pour la mettre dans une variable ?

Merci

[ornitho]

j'oublié de te répondre la doc est à cette adresse: http://jca.developpez.com/cours.php .C'est le chapitre deux exercice 2.1 ou ils faut pouvoir entrée deux nombres dans deux petite fenêtre. J'utilise Delphi 6.

Merci encore d'avoir répondu.

[ero-sennin]

Bonsoir ornitho et bienvenue sur Developpez.com

En résumant rapidement ta demande, tu as un TEdit sur une Form (fenêtre) et tu souhaites récupérer dans une variable ce qui est dans le TEdit ?

Si c'est ce que tu souhaites faire, le TEdit à une propriété Text qui contient le texte de ce dernier.
Admettons que tu as un bouton sur ta Form, et que ce dernier affiche le contenu du TEdit.

On fera donc ceci :

Code :

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

1
2
3
4
procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(Edit1.Text);
end;

J'espère que j'ai répondu à ta question, sans quoi, n'hésites pas à nous redemander un petit peu d'aide

Cordialement
Ero-Sennin

[ornitho]

Bonsoir ero-senin

Si je comprend bien il est peut-être obligatoire de cliquer sur un bouton pour pouvoir entrer une valeur ? je voulez l'éviter.

Ce que j'avais envie de faire, c'est par exemple taper "JeSuisUnGrosNulEnDelphi"
Dans ma petite fenêtre (pendant l'exécution) qui est déclaré dans mon programme comme ceçi

Type
PremierePhrase : Tedit;

et par exemple que "JeSuisUnGrosNulEnDelphi" se retrouve dans une variable.

concrètement, je tape ma petite phrase pendant l'execution du programme. Je tape sur entrée sur mon clavier et comme par magie lors de l'execution de la commande ShowMessage(PremierePhrase.Text); Il m'affiche "JeSuisUnGrosNulEnDelphi"

C'est possible ?

Merci ero-senin

[ero-sennin]

Bonsoir ero-senin

Si je comprend bien il est peut-être obligatoire de cliquer sur un bouton pour pouvoir entrer une valeur ? je voulez l'éviter.

Non, ce n'est pas obligatoire, c'était un exemple

On pourrait mettre le texte dans une variable à chaque changement effectué dans le TEdit :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
var
  Form1: TForm1;
  MaPhrase:String;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.Edit1Change(Sender: TObject);
begin
  MaPhrase:=Edit1.Text;
end;

Le code ci dessus permet de mettre le contenu du TEdit dans une variable.
A chaque modification du TEdit, on modifie la variable. C'est la notion d'événement qui est important, OnChange étant l'événement utilisé ci dessus.

Ce que j'avais envie de faire, c'est par exemple taper "JeSuisUnGrosNulEnDelphi"
Dans ma petite fenêtre (pendant l'exécution) qui est déclaré dans mon programme comme ceçi

Type
PremierePhrase : Tedit;

et par exemple que "JeSuisUnGrosNulEnDelphi" se retrouve dans une variable.

concrètement, je tape ma petite phrase pendant l'execution du programme. Je tape sur entrée sur mon clavier et comme par magie lors de l'execution de la commande ShowMessage(PremierePhrase.Text); Il m'affiche "JeSuisUnGrosNulEnDelphi"

C'est possible ?

Merci ero-senin

Tout est possible Il faut prendre un peu de recul dans ce que tu souhaites faire. Je te conseillerais de suivre le guide de Frédéric Beaulieu. Il est parfait pour commencer
Sinon, pour répondre à ta demande (en cliquant sur Entrée, on affiche le message), voici le code (à mettre dans l'événement OnKeyPress du TEdit) :

Code :

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

1
2
3
4
5
6
7
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if (Key=Chr(VK_RETURN)) then // Si la touche est la touche Entrée
  begin
    ShowMessage(Edit1.Text); // On affiche le contenu du TEdit
  end;
end;

N'aies pas peur de la syntaxe avec le Chr et VK_RETURN. Tu comprendras assez vite la signification. En tous cas, tu as un exemple!

Voilà, j'espère avoir répondu correctement à ta question.
Bon courage dans ta lecture et surtout, si tu as un soucis, n'hésites pas à utiliser la fonction rechercher du forum dans un premier temps et si vraiment tu ne trouves pas, post un message

Cordialement