Discussion :

[the_magik_mushroom]

bonjour a tous,

j ai un petit probleme de string dans une function, ca doit etre tout bete mais je ne trouve pas

Code :

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

1
2
3
4
5
6
7
8
function tralala :string;
var s : string;
begin
 
s := 'fichier '+edit1.text + 'nombre '+ edit2.text;
Result := s;
 
end;

maintenant si je fait : ca marche

Code :

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

1
2
3
4
procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage(tralala);
end;

mais si je fait :

Code :

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

1
2
3
4
procedure TForm1.Button1Click(Sender: TObject);
begin
if checkbox1.checked = true then showmessage(tralala);
end;

ca marche pas (messagebox vide)
(bien sur le checkbox1 est checked..)


d ou vient le probleme? pourquoi le if fait que le messagebox est vide ?

[DOLPat®]

Hello

je viens de tester sous Delphi 2005 et cela fonctionne sans problème...

[sjrd]

Il doit y avoir un conflit de noms sur tralala. C'est-à-dire qu'il y a deux tralala déclarés à deux endroits différents, et que tu n'accèdes pas à celui que tu veux.

[the_magik_mushroom]

c'est bon merci je viens de trouver mon bug!!

tralala etait déclaré à deux endroits différents..