1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:

EditWert: C1CF2E29

So jetzt möchte ich immer 2 zeichen einlesen und in meine Variable schieben. Und das i := Length(String).

dh:
X : Integer;

X := C1;

nächster schleifen durchlauf 

X := CF und das so weiter bis ende Length(String).

X := 2E
...
X:= 29					

1:
2:
3:
4:
5:
6:
7:
8:
9:

var
  MyValue: Integer;
  MyString: string;

for i := 1 to Length(MyString) div 2 do
begin
  MyValue := StrToint('$' + Copy(MyString, i * 2 - 1, 2));
  // do something with MyValue
end;