подумал сделать через массив
Code: Select all
Program test;
const
hbook[NBK] = $4123BC50;
hbook[Sync] = $41272377;
var
i integer;
begin
AddToSystemJournal(inttostr(hbook[NBK])+' & '+inttostr(hbook[CharName]));
end.
Подскажите кто как решал подобную задачу?