на tbp:=pb(ans); компилятор выдает [Error] Unit1.pas(92): Missing operator or semicolon
часть кода, связанная с этим указателем:
Код:
var
ss:shortstring;
ans:ansistring;
ws:widestring;
c:shortstring;
wc:widechar;
v:variant;
pb:^tb;
tbp:^tb;
if(radiogroup1.ItemIndex=1) then //ansistring
begin
ans:=edit1.text;
tbp:=pb(ans); i:=-4; n:=length(edit1.text);
end;