Wert bestimmen ohne Format

**moperswings**

Hallo,

ich würde gerne wissen, wie ich mein Bsp.-programm verkürzen könnte!
Wie müsste der Code aussehen damit ich auf soetwas komme wie
summe := a_zeiger + b_zeiger; , damit ich mir die String-Konvertierung sparen kann?
Ihr könnt mir bestimmt helfen!
Viele Grüsse, moperswings

zusammenfalten · markieren

Delphi-Quellcode:

			var

   a,b: byte;

   a_zeiger, b_zeiger: byte^;

   a_wert, b_wert: string;

   summe: integer;

begin

   a := 1;

   b := 2;

   a_zeiger := @a;

   b_zeiger := @b;

   a_wert := Format('%d', [a_zeiger^]);

   b_wert := Format('%d', [b_zeiger^]);

   summe := strtoint(a_wert) + strtoint(b_wert);

   Label1.Caption := inttostr(summe);

end;

Wert bestimmen ohne Format

Wert bestimmen ohne Format

Forumregeln