Var
s: string;
z: integer;
Begin
Z:=100;
S:='Z';
Now i need reference to Z Variable use only his name contained in in
string S!!!!!
How to do THIS??
in PHP is $$s but i need Delphi Code... !!!!!!!!!!!
Code in my program:
procedure Tklienci_poz.zmiana(Sender: TObject);
var
EditSender: TEdit;
nazwa_kontrolki: string;
dlugosc: Integer;
nazwa_zmiennej:string;
zmieniane_pola: string;
I: Integer;
Begin
if Sender is TEdit then
Begin
EditSender:= Sender As TEdit;
nazwa_kontrolki:=EditSender.Name;
End;
dlugosc:=Length(nazwa_kontrolki);
nazwa_zmiennej:=Copy(nazwa_kontrolki,3,dlugosc);
ShowMessage('Nazwa kontrolki: '+nazwa_kontrolki+ ' Nazwa zmiennej:
'+nazwa_zmiennej);
//HERE I NEED DATA CONTAINED IN VARIABLE WHO NAME IS IN STRING
nazwa_zmiennej
{ Begin
if nazwa_zmiennej <>EditSender.Text then
EditSender.Color:=clSkyBlue
else
EditSender.Color:=clWhite;
End;
}
"Xcom" <mpedz...@program.com.pl> schreef in bericht
news:ee03e0e2-a89d-483a...@i18g2000prf.googlegroups.com...