Autor | Zpráva | ||
---|---|---|---|
lukasik Profil |
#1 · Zasláno: 18. 5. 2009, 17:16:29
dá se nějak v delphi vytvořit proměnná za běhu bez deklarace?
mám const a znácí abecedy,; potřebuji aby se mi vytvořila, popřípadě přičetla 1 k nové proměné, která se bude rovnat abecedě[i]; docela složité na pochopení xD; procedure TForm1.Button7Click(Sender: TObject); var radek1:string; i1:integer; 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; const abeceda:array[1..26] of char=('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'); begin radek1:=memo2.lines[0]; for i:=1 to 26 do begin for i1:=1 to length(radek1) do begin if abeceda[i]=raked1[i1] then (nová proměná, která se bude menovat jako abeceda[i]; end; end; end; |
||
Chamurappi Profil |
#2 · Zasláno: 18. 5. 2009, 17:32:11
Reaguji na lukasika:
Jak souvisí tento dotaz s webdesignem, že jej pokládáš na diskusním fóru o webdesignu? A proč pojmenováváš vlákno takhle hloupě? „dá se nějak v delphi vytvořit proměnná za běhu bez deklarace?“ Myslím, že nedá. Ale i pokud to jde, tak to asi není moc dobrý nápad a doporučuji ti upravit program tak, abys to nepotřeboval. |
||
nightfish Profil |
#3 · Zasláno: 18. 5. 2009, 17:53:37
lukasik
řešením je použít pole celých čísel (array of integer) |
||
Časová prodleva: 15 let
|
0