Tags:
delphi
jeg vil gerne lave en variabel der skifteer nummeret på den variabel delphi skal læse
variabler til aktie1:
aktie1_til_salg: string;
aktie1_vrdi: integer;
aktie1_antal_stk_til_salg: integer;
aktie1_antal_stk_kbt: string;
aktie1_kbt: integer;
aktie1_navn: string;
de går op til et endnu ubestemt antal
kort eksempel:
if variabel=1 then nummer:=1
if variabel=2 then nummer:=3
if variabel=3 then nummer:=3
aktie[nummer]_solgt:=aktie[nummer]_solgt - antal_kobt
på den måde behøver jeg kun skrive
aktie[nummer]_solgt:=aktie[nummer]_solgt - antal_kobt
en gang istedet for
aktie1_solgt:=aktie1_solgt - antal_kobt
aktie2_solgt:=aktie2_solgt - antal_kobt
aktie3_solgt:=aktie3_solgt - antal_kobt
hvordan kan dette laves?
1 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 4 karma
Den 04-03-05 09:25 skrev Rene_christensen følgende:
-----------------------------------------------------------------------------
jeg vil gerne lave en variabel der skifteer nummeret på den variabel delphi skal læse
TAktie=Record
til_salg: string;
vrdi: integer;
antal_stk_til_salg: integer;
antal_stk_kbt: string;
kbt: integer;
navn: string;
solgt=:integer
end;
Aktiers:Array[1..100] of TAktie
if variabel=1 then nummer:=1
if variabel=2 then nummer:=3
if variabel=3 then nummer:=3
Aktiers[nummer].solgt:=Aktiers[nummer].solgt - Aktiers[nummer].kobt
Noget I den retning.
-----------------------------------------------------------------------------
Min side ->www.the-hive.dk/~donp/