Discussion :

[Fly_Box]

Bonjour , Comment adresser un composant dans une procedure ?
J'ai un tform avec un composant Label , et je suivre le deroulement des opérations, aussi ai je fait une procedure dans laquelle je met une variable à jour et voudrait l'afficher dans le tlabel de ma form , mais le compilateur ne veut pas .
Je sais c'est surement idiot mais je butte la dessus .
si je marque label1.text:='e' ou tform1.label1.text:='e' , le compilateur ne veut pas .
Merci de votre aide !

[ShaiLeTroll]

Vous devriez lire : https://fbeaulieu.developpez.com/guide/


Tout dépend où !

une procedure ou une fonction dans la même unité

Code :

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

1
2
3
4
procedure MaProc();
begin
  form1.label1.text:='e'; // cela utilisera la variable globale par défaut que vous avez du conservé (une pratique dont il faut se méfier par la suite)
end;

une méthode de la classe TForm1

Code :

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

1
2
3
4
procedure TForm1.MaMethode();
begin
  self.label1.text:='e'; 
end;

a savoir que self est implicite dans ce cas

Code :

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

1
2
3
4
procedure TForm1.MaMethode();
begin
  label1.text:='e'; 
end;

et enfin dans une autre unité, là faut en plus le uses

Code :

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

1
2
3
4
procedure MaProcDansUnAutreFichier();
begin
  unit1.form1.label1.text:='e'; // cela utilisera la variable globale par défaut ...
end;

unit1 n'est pas obligatoire mais c'est à titre démonstratif
D'ailleurs le fichier DPR utilise cette fameuse variable par défaut, elle n'est utile qu'à cela en réalité, c'est un cas très particulier avec un uses dans une autre unité

Code :

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

1
2
3
4
begin
  Application.Initialize();
  Application.CreateForm(TForm1, Form1);
end;

[ALWEBER]

Bonjour , Comment adresser un composant dans une procedure ?
J'ai un tform avec un composant Label , et je suivre le deroulement des opérations, aussi ai je fait une procedure dans laquelle je met une variable à jour et voudrait l'afficher dans le tlabel de ma form , mais le compilateur ne veut pas .
Je sais c'est surement idiot mais je butte la dessus .
si je marque label1.text:='e' ou tform1.label1.text:='e' , le compilateur ne veut pas .
Merci de votre aide !

Code :

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

form1.label1.text := 'e'

Form1 pour accéder à la class Tform1. Form1 est instanciée au lancement de l'application

[SergioMaster]

Bonjour et bienvenue,

Une petite information quand même Label1.text:='e' c'est pour les programmes FMX, s'il s'agit d'un programme VCL, il faut écrire Label1.caption:='e'.

C'est pour ce genre de "détail" qu'il faut toujours mieux précisé la version de Delphi utilisée et dans le cas des versions récentes s'il s'agit d'un programme FMX (multi-plateforme) ou VCL (windows uniquement)

[popo]

En plus, de ça, tu risques de ne pas voir le résultat à l'écran tant que ta routine ne sera pas terminé.
Il existe des techniques plus ou moins évoluée pour résoudre ce problème.
La plus basique d'entre elle consiste à appeler Application.ProcessMessages après le changement de libellé.

[ShaiLeTroll]

C'est pour ce genre de "détail" qu'il faut toujours mieux précisé la version de Delphi utilisée et dans le cas des versions récentes s'il s'agit d'un programme FMX (multi-plateforme) ou VCL (windows uniquement)

D'ailleurs le numéro et le texte de l'erreur aurait précisé ce problème de framework