FOR teller := 97 TO 122 DO BEGIN temp := Chr(teller); ListBox1.Items.Add(temp+IntToStr(???)); END;
Her skrives bogstaverne fra a til z på skærmen. Men så har jeg også 26 variabler med navn fra a til z (integer). Hvordan får jeg Delphi til at skrive den variabel i (???), som svarer til den verdi temp har?
Eks: teller=97 -> temp="a" Værdien af variablen med navnet a skal så skrives i (???).
var a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z: integer;
vil den eneste måde være følgende:
xxx:=17; case chr(teller) of 'a': a:=xxx; 'b': b:=xxx; 'c': c:=xxx; osv. 'z': z:=xxx; end;
(det havde været trivielt i PHP :-) )
MEN du skal i stedet for lave et array, meget nemmere:
var a: array ['a'..'z'] of integer;
for så:
xxx:=17; a[chr(teller)]:=xxx;
Bingo.
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.