aaa: pointer to byte;
bbb:string;
aaa:=ADR(bbb);
А лучше наоборот,
aaa:array [0...255] of byte;
pstring: pointer to string;
pstring:=adr(aaa);
и везде, где надо использовать STRING вставляете ^pstring;
aaa: pointer to byte;
bbb:string;
aaa:=ADR(bbb);
А лучше наоборот,
aaa:array [0...255] of byte;
pstring: pointer to string;
pstring:=adr(aaa);
и везде, где надо использовать STRING вставляете ^pstring;