Привет всем!
В общем столкнулся с такой проблемой. Есть код
Seek(F,$0009109C);
Ch:=Char($EC);
BlockWrite(F,Ch,1);
А мне нужно, чтобы offset и новый байт считывался из строки и подставлялся через переменную в код для
патча. перерыл уже кучу инфы. Зараза, на Kol в Delphi ничего не работает.Помогите!

| Сообщение посчитали полезным:

var
offset:integer;
str:string;
code:integer;
NewByte:byte;

begin
str:='$401000';
val(str,offset,code);
if code=0 then
begin
str:='$EC';
val(str,NewByte,code);
if code=0 then
begin
Seek(F,offset);
BlockWrite(F,NewByte,1);
end;
end;
else <Error>
end.

В общем смысл такой, если я вопрос правильно понял.

-----
Blame the victim!

| Сообщение посчитали полезным:

УРА! , работает!
Спасибо большое!оказалось проще, чем я думал. Thanks

| Сообщение посчитали полезным: